[enh]ProjectNavigationMorph find button menu: open superswiki in scamper

Karl Ramberg karl.ramberg at chello.se
Sat Feb 10 15:42:20 UTC 2001


this time with the change set

Karl Ramberg wrote:
> 
> The subject line says it all.
> A shortcut for the rest of us that don't memorises ip addresses :-)
> 
> Karl
-------------- next part --------------
'From Squeak3.1alpha of 5 February 2001 [latest update: #3534] on 10 February 2001 at 12:33:36 pm'!

!ProjectNavigationMorph methodsFor: 'the actions' stamp: 'kfr 2/10/2001 12:32'!
doFindButtonMenuEvent: evt

	| menu selection |

	menu _ CustomMenu new.
	menu 
		add: 'find a project' action: [self findAProject];
		add: 'find any file' action: [self findAnything];
		add: 'search the SuperSwiki' action: [self findSomethingOnSuperSwiki];
		add: 'open SuperSwiki in Scamper' action: [Scamper openOnUrl: '209.143.91.36/super/'].

	selection _ menu build startUpCenteredWithCaption: 'Find options'.
	selection ifNil: [^self].
	selection value.

! !



More information about the Squeak-dev mailing list