--- lib/Grep/Search.pm	2007/02/23 17:17:50	76
+++ lib/Grep/Search.pm	2007/02/24 11:42:10	95
@@ -192,10 +192,11 @@
 	if ($writer) {
 		warn "closing index\n";
 		$writer->close;
-		undef $writer;
 	}
+	undef $writer;
 	undef $store;
 	undef $create;
+	undef $analyzer;
 
 	return;
 }