--- a/NewLauncher.st Mon Jul 27 13:09:07 1998 +0200
+++ b/NewLauncher.st Mon Jul 27 13:44:58 1998 +0200
@@ -751,6 +751,15 @@
#translateLabel: true
#value: #startOldChangesBrowser
)
+ #(#MenuItem
+ #label: '-'
+ )
+ #(#MenuItem
+ #label: 'Terminal'
+ #translateLabel: true
+ #isVisible: #canDoTerminal
+ #value: #openTerminal
+ )
) nil
nil
)
@@ -1459,7 +1468,7 @@
nil
)
- "Modified: / 8.7.1998 / 20:36:03 / cg"
+ "Modified: / 27.7.1998 / 12:47:11 / cg"
!
menuToolbar
@@ -1764,6 +1773,12 @@
!NewLauncher methodsFor:'aspects'!
+canDoTerminal
+ ^ [OperatingSystem isUNIXlike]
+
+ "Created: / 27.7.1998 / 12:47:54 / cg"
+!
+
enableDangerousMenuItemsInRemoteLauncher
|holder|
@@ -5038,6 +5053,12 @@
Project notNil ifTrue: [(ProjectView for: Project new) open]
!
+openTerminal
+ VT100TerminalView open
+
+ "Created: / 27.7.1998 / 12:48:30 / cg"
+!
+
selectProject
"asks for and switch to another project"
@@ -5259,5 +5280,5 @@
!NewLauncher class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.81 1998-07-09 08:32:03 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.82 1998-07-27 11:44:58 cg Exp $'
! !