Index: test/pragma.test
==================================================================
--- test/pragma.test
+++ test/pragma.test
@@ -10,11 +10,11 @@
 #***********************************************************************
 # This file implements regression tests for SQLite library.
 #
 # This file implements tests for the PRAGMA command.
 #
-# $Id: pragma.test,v 1.49 2007/01/27 14:04:13 drh Exp $
+# $Id: pragma.test,v 1.50 2007/01/27 14:11:42 drh Exp $
 
 set testdir [file dirname $argv0]
 source $testdir/tester.tcl
 
 # Test organization:
@@ -389,12 +389,12 @@
 Page 6 is never used} {rowid 1 missing from index i2}}
 }
 do_test pragma-3.99 {
   catchsql {DETACH t3}
   catchsql {DETACH t2}
-  catchsql {DROP INDEX i2}
   file delete -force testerr.db testerr.db-journal
+  catchsql {DROP INDEX i2}
 } {0 {}}
 
 # Test modifying the cache_size of an attached database.
 ifcapable pager_pragmas {
 do_test pragma-4.1 {