checkin from browser
authorClaus Gittinger <cg@exept.de>
Mon, 27 Jul 1998 13:09:07 +0200
changeset 1751 c42e758e842d
parent 1750 1e7547bc0724
child 1752 1602e27bb929
checkin from browser
FBrowser.st
FileBrowser.st
--- a/FBrowser.st	Mon Jul 27 12:38:12 1998 +0200
+++ b/FBrowser.st	Mon Jul 27 13:09:07 1998 +0200
@@ -718,9 +718,12 @@
                               ('HTML reader'           openHTMLReader      )
                               ('Image inspect'         openImageInspector  )
                               ('show file differences' openDiffView        )
-                              ('terminal'              openTerminal        )
                   ).
 
+    OperatingSystem isUNIXlike ifTrue:[
+        items := items , #( ('terminal'              openTerminal )).
+    ].
+
     JavaInterpreter notNil ifTrue:[
         items := items , #( ('Java Applet Viewer' openAppletViewer)).
     ].
@@ -747,7 +750,7 @@
     ^m
 
     "Modified: / 16.1.1998 / 16:42:59 / stefan"
-    "Modified: / 21.7.1998 / 12:55:49 / cg"
+    "Modified: / 27.7.1998 / 13:08:12 / cg"
 !
 
 filePrint
@@ -4042,5 +4045,5 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/FBrowser.st,v 1.234 1998-07-27 07:59:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/FBrowser.st,v 1.235 1998-07-27 11:09:07 cg Exp $'
 ! !
--- a/FileBrowser.st	Mon Jul 27 12:38:12 1998 +0200
+++ b/FileBrowser.st	Mon Jul 27 13:09:07 1998 +0200
@@ -718,9 +718,12 @@
                               ('HTML reader'           openHTMLReader      )
                               ('Image inspect'         openImageInspector  )
                               ('show file differences' openDiffView        )
-                              ('terminal'              openTerminal        )
                   ).
 
+    OperatingSystem isUNIXlike ifTrue:[
+        items := items , #( ('terminal'              openTerminal )).
+    ].
+
     JavaInterpreter notNil ifTrue:[
         items := items , #( ('Java Applet Viewer' openAppletViewer)).
     ].
@@ -747,7 +750,7 @@
     ^m
 
     "Modified: / 16.1.1998 / 16:42:59 / stefan"
-    "Modified: / 21.7.1998 / 12:55:49 / cg"
+    "Modified: / 27.7.1998 / 13:08:12 / cg"
 !
 
 filePrint
@@ -4042,5 +4045,5 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.234 1998-07-27 07:59:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.235 1998-07-27 11:09:07 cg Exp $'
 ! !