diff --git a/modules/not-found-handler.pl b/modules/not-found-handler.pl
index 4cd73094..9241208c 100644
--- a/modules/not-found-handler.pl
+++ b/modules/not-found-handler.pl
@@ -16,7 +16,7 @@
 #    59 Temple Place, Suite 330
 #    Boston, MA 02111-1307 USA
 
-$ModulesDescription .= '<p>$Id: not-found-handler.pl,v 1.1 2004/06/05 00:31:23 as Exp $</p>';
+$ModulesDescription .= '<p>$Id: not-found-handler.pl,v 1.2 2004/06/12 11:27:27 as Exp $</p>';
 
 use vars qw($NotFoundHandlerDir);
 
@@ -37,3 +37,12 @@ sub NewNotFoundHandlerSave {
     unlink("$NotFoundHandlerDir/$id");
   }
 }
+
+*OldNotFoundHandlerDeletePage = *DeletePage;
+*DeletePage = *NewNotFoundHandlerDeletePage;
+
+sub NewNotFoundHandlerDeletePage {
+  my $id = shift;
+  unlink("$NotFoundHandlerDir/$id");
+  return OldNotFoundHandlerDeletePage($id);
+}