From a11ba63928b00fec2385d081b14b9f073b894e19 Mon Sep 17 00:00:00 2001
From: h_vogt <h_vogt>
Date: Sat, 6 Dec 2008 12:33:43 +0000
Subject: [PATCH] remove problems with simple node names

---
 src/frontend/com_fft.c | 4 ++--
 src/frontend/spec.c    | 3 ++-
 2 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/src/frontend/com_fft.c b/src/frontend/com_fft.c
index 682798976..bb8e7a69a 100644
--- a/src/frontend/com_fft.c
+++ b/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);    
 }
 
 
diff --git a/src/frontend/spec.c b/src/frontend/spec.c
index 891c3a934..5c889b85a 100644
--- a/src/frontend/spec.c
+++ b/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);