Delete EXIF information when deleting an image.
authorSteinar H. Gunderson <sesse@debian.org>
Mon, 26 Mar 2007 19:03:23 +0000 (21:03 +0200)
committerSteinar H. Gunderson <sesse@debian.org>
Mon, 26 Mar 2007 19:03:23 +0000 (21:03 +0200)
perl/Sesse/pr0n/Rotate.pm

index 9cf18d8ef69ed8f790ced723733a812366730838..be023123373e40979cafe96bcca1bca8c01c1967 100644 (file)
@@ -50,6 +50,8 @@ sub handler {
                                                        undef, $id);
                                                $dbh->do('INSERT INTO deleted_images SELECT * FROM images WHERE id=?',
                                                        undef, $id);
+                                               $dbh->do('DELETE FROM exif_info WHERE image=?',
+                                                       undef, $id);
                                                $dbh->do('DELETE FROM images WHERE id=?',
                                                        undef, $id);
                                        };