equal
deleted
inserted
replaced
2413 #translateLabel: true |
2413 #translateLabel: true |
2414 #value: #buildLoadAllFile |
2414 #value: #buildLoadAllFile |
2415 #enabled: #hasProjectSelectedAndProjectFilenameHolderAndProjectCodeIsLoaded |
2415 #enabled: #hasProjectSelectedAndProjectFilenameHolderAndProjectCodeIsLoaded |
2416 ) |
2416 ) |
2417 #(#MenuItem |
2417 #(#MenuItem |
|
2418 #label: 'abbrev file (for autoload)' |
|
2419 #translateLabel: true |
|
2420 #value: #buildAbbrevFile |
|
2421 #enabled: #hasProjectSelectedAndProjectFilenameHolderAndProjectCodeIsLoaded |
|
2422 ) |
|
2423 #(#MenuItem |
2418 #label: 'Binary class library (non portable)' |
2424 #label: 'Binary class library (non portable)' |
2419 #translateLabel: true |
2425 #translateLabel: true |
2420 #value: #buildCompiledClassLibrary |
2426 #value: #buildCompiledClassLibrary |
2421 #enabled: #hasProjectSelectedAndProjectFilenameHolderAndProjectCodeIsLoaded |
2427 #enabled: #hasProjectSelectedAndProjectFilenameHolderAndProjectCodeIsLoaded |
2422 ) |
2428 ) |
5673 |
5679 |
5674 |
5680 |
5675 |
5681 |
5676 ! |
5682 ! |
5677 |
5683 |
|
5684 buildAbbrevFile |
|
5685 "generate an abbrev.stc file in the projects directory" |
|
5686 |
|
5687 |p | |
|
5688 |
|
5689 p := self currentProject. |
|
5690 p isNil ifTrue:[ |
|
5691 self information:'No project selected'. |
|
5692 ^ self |
|
5693 ]. |
|
5694 |
|
5695 self withCursor:Cursor wait do:[ |
|
5696 self makeTranscriptVisible. |
|
5697 TextCollector transcriptQuerySignal answer:self transcript |
|
5698 do:[ |
|
5699 p createAbbrevFile. |
|
5700 ] |
|
5701 ] |
|
5702 ! |
|
5703 |
5678 buildAll |
5704 buildAll |
5679 "build all as specified in the deployment section" |
5705 "build all as specified in the deployment section" |
5680 |
5706 |
5681 |p| |
5707 |p| |
5682 |
5708 |