diff tests/automated/database-tests.el @ 410:de805c49cfc1 r21-2-35

Import from CVS: tag r21-2-35
author cvs
date Mon, 13 Aug 2007 11:19:21 +0200
parents 74fd4e045ea6
children 697ef44129c6
line wrap: on
line diff
--- a/tests/automated/database-tests.el	Mon Aug 13 11:18:12 2007 +0200
+++ b/tests/automated/database-tests.el	Mon Aug 13 11:19:21 2007 +0200
@@ -37,7 +37,10 @@
      (require 'test-harness))))
 
 (flet ((delete-database-files (filename)
-	(dolist (fn (list filename (concat filename ".db")))
+	(dolist (fn (list filename
+			  (concat filename ".db")
+			  (concat filename ".pag")
+			  (concat filename ".dir")))
 	  (ignore-file-errors (delete-file fn))))
 
        (test-database (db)