--- a/ProjectBrowser.st Mon Jan 17 12:29:31 2000 +0100
+++ b/ProjectBrowser.st Wed Jan 19 17:00:12 2000 +0100
@@ -2389,6 +2389,14 @@
#label: 'Makefile'
#translateLabel: true
#value: #buildMakefile
+ #isVisible: #osIsUnix
+ #enabled: #hasProjectSelectedAndProjectFilenameHolderAndProjectCodeIsLoaded
+ )
+ #(#MenuItem
+ #label: 'Makefile for windows (nt.mak)'
+ #translateLabel: true
+ #value: #buildNTMakefile
+ #isVisible: #osIsWindows
#enabled: #hasProjectSelectedAndProjectFilenameHolderAndProjectCodeIsLoaded
)
#(#MenuItem
@@ -2450,7 +2458,7 @@
nil
)
- "Modified: / 16.12.1999 / 01:28:48 / cg"
+ "Modified: / 19.1.2000 / 16:52:31 / cg"
!
methodItemMenu
@@ -3470,6 +3478,19 @@
!
+osIsUnix
+ ^ OperatingSystem isUNIXlike
+
+ "Created: / 19.1.2000 / 16:45:16 / cg"
+!
+
+osIsWindows
+ ^ OperatingSystem isMSWINDOWSlike
+
+ "Created: / 19.1.2000 / 16:37:33 / cg"
+ "Modified: / 19.1.2000 / 16:43:54 / cg"
+!
+
patchesList
"automatically generated by UIPainter ..."
@@ -5783,6 +5804,28 @@
].
!
+buildNTMakefile
+ "generate an nt.mak in the projects directory"
+
+ |p |
+
+ p := self currentProject.
+ p isNil ifTrue:[
+ self information:'No project selected'.
+ ^ self
+ ].
+
+ self withCursor:Cursor wait do:[
+ self makeTranscriptVisible.
+ TextCollector transcriptQuerySignal answer:self transcript
+ do:[
+ p createNTMakefile
+ ]
+ ].
+
+ "Created: / 19.1.2000 / 15:55:17 / cg"
+!
+
checkInAllClasses
"check in all classes"