remove problems with simple node names

src/frontend/com_fft.c

@@ -166,7 +166,7 @@ com_fft(wordlist *wl)
             ngood++;
         }
     }
-    free_pnode(first_name);
+
     if (!ngood) {
        return;
     }
@@ -240,7 +240,7 @@ com_fft(wordlist *wl)
     
     tfree(tdvec);
     tfree(fdvec);    
-    
+    free_pnode(first_name);    
 }
 
 

src/frontend/spec.c

@@ -188,7 +188,7 @@ com_spec(wordlist *wl)
             ngood++;
         }
     }
-    free_pnode(first_name);
+/*    free_pnode(first_name);  h_vogt 081206 */
     if (!ngood) {
        tfree(win);
        return;
@@ -272,6 +272,7 @@ com_spec(wordlist *wl)
     tfree(dc);
     tfree(tdvec);
     tfree(fdvec);
+    free_pnode(first_name);
 
 #ifdef KEEPWINDOW
     f = alloc(struct dvec);