Continue work on bug 12859, plus some code cleanup.

[pspp-builds.git] / src / dfm-read.c

diff --git a/src/dfm-read.c b/src/dfm-read.c
index 32b458e00f64be9f2b0255e38c2a9a510f6688d6..76f80ad0520f3a969e30575aefe901a84e681033 100644 (file)
--- a/src/dfm-read.c
+++ b/src/dfm-read.c
@@ -78,11 +78,12 @@ dfm_close_reader (struct dfm_reader *r)
       assert (inline_open_cnt > 0);
       still_open = --inline_open_cnt;
 
-      if (still_open) 
+      if (!still_open) 
         {
           /* Skip any remaining data on the inline file. */
-          while ((r->flags & DFM_EOF) == 0)
-            read_record (r);
+          if (r->flags & DFM_SAW_BEGIN_DATA)
+            while ((r->flags & DFM_EOF) == 0)
+              read_record (r);
           inline_file = NULL;
         }
     }