Beginning of VFM cleanup.
[pspp-builds.git] / src / dfm.c
index 9905b6b3e25f8cc8c688a1bde3b268dbf2b61457..1ccbb71e3b0d8d44ad0c603ff89a36a9da2b766a 100644 (file)
--- a/src/dfm.c
+++ b/src/dfm.c
@@ -650,9 +650,9 @@ cmd_begin_data (void)
   /* FIXME: figure out the *exact* conditions, not these really
      lenient conditions. */
   if (vfm_source == NULL
-      || vfm_source == &vfm_memory_stream
-      || vfm_source == &vfm_disk_stream
-      || vfm_source == &sort_stream)
+      || case_source_is_class (vfm_source, &memory_source_class)
+      || case_source_is_class (vfm_source, &disk_source_class)
+      || case_source_is_class (vfm_source, &sort_source_class))
     {
       msg (SE, _("This command is not valid here since the current "
           "input program does not access the inline file."));