admin_files: unlink() on delete

diff --git a/admin_files.php b/admin_files.php
index 56db7ca..034cfdf 100644 (file)
--- a/admin_files.php
+++ b/admin_files.php
@@ -93,8 +93,14 @@ function admin_files_main() {
 }
 
 function admin_files_main_delete($id) {
-       db_delete('files', 'where id=%i', $id);
-       message('File deleted.');
+       $fn = db_get_value('files', 'filename', 'where id=%i', $id);
+       if ($fn) {
+               unlink($fn);
+               db_delete('files', 'where id=%i', $id);
+               message('File deleted.');
+       } else {
+               message("Couldn't find file to delete. Maybe it's already been deleted?");
+       }
        return './admin_files';
 }
 

diff --git a/code/wfpl b/code/wfpl
index 0096619..5a2ac79 160000 (submodule)
--- a/code/wfpl
+++ b/code/wfpl
@@ -1 +1 @@
-Subproject commit 009661996a29825bae36d281c4b07ac55799d398
+Subproject commit 5a2ac791b1c0ae217a7dba9f972d22b900303932