Index: trunk/Ohana/src/imregister/spreg/delete.c
===================================================================
--- trunk/Ohana/src/imregister/spreg/delete.c	(revision 3509)
+++ trunk/Ohana/src/imregister/spreg/delete.c	(revision 3593)
@@ -20,4 +20,9 @@
   }
   fprintf (stderr, "delete %d spectra\n", Nbad);
+  if (Nbad == 0) { 
+    fprintf (stderr, "SUCCESS\n");
+    fits_close_db (&db);
+    exit (0);
+  }
 
   Nsubset = Nspectrum - Nbad;
@@ -29,6 +34,6 @@
     j++;
   }
-
   free (keep);
+  free (spectrum);
 
   /** we may later want to pull this out and put it elsewhere **/