# HG changeset patch
# User tz
# Date 891368641 -7200
# Node ID d28fb65967a93b27e54edb612398fc92e3a03d28
# Parent  52a76ec8828dcdd98efcce9552fa992cc70aee2c
execute command bug fixed

diff -r 52a76ec8828d -r d28fb65967a9 ShellView.st
--- a/ShellView.st	Mon Mar 30 14:50:20 1998 +0200
+++ b/ShellView.st	Tue Mar 31 20:24:01 1998 +0200
@@ -49,80 +49,80 @@
 !ShellView class methodsFor:'interface specs'!
 
 windowSpec
-    "this window spec was automatically generated by the ST/X UIPainter"
+    "This resource specification was automatically generated
+     by the UIPainter of ST/X."
 
-    "do not manually edit this - the painter/builder may not be able to
-     handle the specification if its corrupted."
+    "Do not manually edit this!! If it is corrupted,
+     the UIPainter may not be able to read the specification."
 
     "
      UIPainter new openOnClass:ShellView andSelector:#windowSpec
      ShellView new openInterface:#windowSpec
+     ShellView open
     "
-    "ShellView open"
 
     <resource: #canvas>
 
     ^
      
        #(#FullSpec
-          #'window:' 
+          #window: 
            #(#WindowSpec
-              #'name:' 'unnamed canvas'
-              #'layout:' #(#LayoutFrame 197 0 172 0 496 0 440 0)
-              #'label:' 'unnamed canvas'
-              #'min:' #(#Point 10 10)
-              #'max:' #(#Point 1152 864)
-              #'bounds:' #(#Rectangle 197 172 497 441)
-              #'usePreferredExtent:' false
+              #name: 'unnamed canvas'
+              #layout: #(#LayoutFrame 252 0 229 0 551 0 497 0)
+              #label: 'unnamed canvas'
+              #min: #(#Point 10 10)
+              #max: #(#Point 1152 864)
+              #bounds: #(#Rectangle 252 229 552 498)
+              #usePreferredExtent: false
           )
-          #'component:' 
+          #component: 
            #(#SpecCollection
-              #'collection:' 
+              #collection: 
                #(
                  #(#TextEditorSpec
-                    #'name:' 'fileContentsView'
-                    #'layout:' #(#LayoutFrame 0 0 0 0.0 0 1 -22 1)
-                    #'model:' #valueOfFileContents
-                    #'hasHorizontalScrollBar:' true
-                    #'hasVerticalScrollBar:' true
-                    #'miniScrollerHorizontal:' true
+                    #name: 'fileContentsView'
+                    #layout: #(#LayoutFrame 0 0 0 0.0 0 1 -22 1)
+                    #model: #valueOfFileContents
+                    #hasHorizontalScrollBar: true
+                    #hasVerticalScrollBar: true
+                    #miniScrollerHorizontal: true
                 )
                  #(#SequenceViewSpec
-                    #'name:' 'shellOutputView'
-                    #'layout:' #(#LayoutFrame 0 0.0 0 0.0 0 1.0 -22 1.0)
-                    #'model:' #selectionOfShellOutput
-                    #'style:' #(#FontDescription #courier #medium #roman 12)
-                    #'hasHorizontalScrollBar:' true
-                    #'hasVerticalScrollBar:' true
-                    #'miniScrollerHorizontal:' true
-                    #'doubleClickSelector:' #'listDoubleClicked:'
-                    #'useIndex:' true
-                    #'sequenceList:' #listOfShellOutput
+                    #name: 'shellOutputView'
+                    #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 -22 1.0)
+                    #model: #selectionOfShellOutput
+                    #style: #(#FontDescription #courier #medium #roman 12)
+                    #hasHorizontalScrollBar: true
+                    #hasVerticalScrollBar: true
+                    #doubleClickSelector: #listDoubleClicked:
+                    #useIndex: true
+                    #sequenceList: #listOfShellOutput
                 )
                  #(#ActionButtonSpec
-                    #'name:' 'fileNameButton'
-                    #'layout:' #(#LayoutFrame 0 0.0 -22 1 -60 1.0 0 1.0)
-                    #'model:' #toggleViews
+                    #name: 'fileNameButton'
+                    #layout: #(#LayoutFrame 0 0.0 -22 1 -60 1.0 0 1.0)
+                    #model: #toggleViews
                 )
                  #(#ActionButtonSpec
-                    #'name:' 'saveButton'
-                    #'layout:' #(#LayoutFrame -60 1 -22 1 0 1.0 0 1.0)
-                    #'label:' 'Save'
-                    #'model:' #saveFileContents
+                    #name: 'saveButton'
+                    #layout: #(#LayoutFrame -60 1 -22 1 0 1.0 0 1.0)
+                    #label: 'Save'
+                    #model: #saveFileContents
                 )
                  #(#ActionButtonSpec
-                    #'name:' 'stopButton'
-                    #'layout:' #(#LayoutFrame 0 0 -22 1 0 1.0 0 1)
-                    #'label:' 'Stop'
-                    #'model:' #terminateTask
+                    #name: 'stopButton'
+                    #layout: #(#LayoutFrame 0 0 -22 1 0 1.0 0 1)
+                    #label: 'Stop'
+                    #model: #terminateTask
                 )
                  #(#InputFieldSpec
-                    #'name:' 'commandInputField'
-                    #'layout:' #(#LayoutFrame 0 0 -22 1 0 1.0 0 1)
-                    #'model:' #valueOfCommand
-                    #'type:' #string
-                    #'acceptOnReturn:' false
-                    #'acceptOnTab:' false
+                    #name: 'commandInputField'
+                    #layout: #(#LayoutFrame 0 0 -22 1 0 1.0 0 1)
+                    #model: #valueOfCommand
+                    #type: #string
+                    #acceptOnReturn: false
+                    #acceptOnTab: false
                 )
               )
           )
@@ -189,6 +189,7 @@
 
     |s|       
     aCommand isNil | task notNil | directory isNil ifTrue: [^nil].
+    aCommand isString ifTrue: [^self executeCommands: (Array with: aCommand)].
     aCommand key size = 0 ifTrue: [^aCommand key: ''].
 
     self valueOfCommand value: ''.