GnuplotGraphView.st
changeset 5762 13f699b3e47c
parent 5759 08dbdd438639
child 5765 57796607f252
--- a/GnuplotGraphView.st	Thu May 03 11:40:20 2018 +0200
+++ b/GnuplotGraphView.st	Thu May 03 23:21:22 2018 +0200
@@ -78,7 +78,7 @@
 set term %(outputFormat) size %(width),%(height)
 set output "%(outputFile)"
 set title "%(title)"
-plot [-10:110] ''%(data)'' with dots 
+plot [-10:110] ''%(data)''
 '
 !
 
@@ -129,6 +129,7 @@
           )
          (MenuItem
             label: 'Format'
+            isVisible: hasNoScript
             submenu: 
            (Menu
               (
@@ -138,7 +139,7 @@
                   choiceValue: histogram
                 )
                (MenuItem
-                  label: 'Lines'
+                  label: 'Line Graph'
                   choice: formatHolder
                   choiceValue: lines
                 )
@@ -174,6 +175,14 @@
     data := something.
 !
 
+hasNoScript
+    ^ [ script isEmptyOrNil ]
+!
+
+hasScript
+    ^ [ script notEmptyOrNil ]
+!
+
 magnificationFactor:aNumber
     image := nil.
     super magnificationFactor:aNumber.