Installing Morphic UI designer in Pharo 1.1
Pardon the newbie question but I yet don't have a grip how Squeaker's load packages , it seems that there are many, many ways of doing so. In anycase, to my immediate need I would like to check out Morphic Designer. I've tried following the instructions on their web site which are: (Installer mc http: 'http://www.hpi.uni-potsdam.de/hirschfeld/squeaksource/') project: 'MetacelloRepository'; install: 'ConfigurationOfDesigner'. ConfigurationOfDesigner load. However, on the Pharo 1.1. image under Cog VM, there is no such animal as an "Installer", I tried using the Monticello Browser and went fishing for the package but to no avail. thanks in advance Charles www.nycsmalltalk.org -- View this message in context: http://forum.world.st/Installing-Morphic-UI-designer-in-Pharo-1-1-tp3093047p... Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.
On Fri, Dec 17, 2010 at 9:05 PM, Charles Monteiro <charles@nycsmalltalk.org>wrote:
Pardon the newbie question but I yet don't have a grip how Squeaker's load packages , it seems that there are many, many ways of doing so.
Hi Charles. We need to be clear in something: indeed, there are too many things to install. So....you can use Installer or Gofer to script your installation in code, but you can still use the normal Monticello Browser. Installer is not loaded in Pharo, so I suggest: a) Use Monticello Browser: open it, new repository -> MetacelloRepository, you search ConfigurationOfDesigner, select it, and then load. Just like lading any other monticello package. Easy. b) Script it. With Gofer, you can do: Gofer new repository: ' http://www.hpi.uni-potsdam.de/hirschfeld/squeaksource/MetacelloRepository'; package: 'ConfigurationOfDesigner'; load. Once you did a) or b) evaluate: ConfigurationOfDesigner load. Cheers Mariano
In anycase, to my immediate need I would like to check out Morphic Designer. I've tried following the instructions on their web site which are:
(Installer mc http: 'http://www.hpi.uni-potsdam.de/hirschfeld/squeaksource/') project: 'MetacelloRepository'; install: 'ConfigurationOfDesigner'. ConfigurationOfDesigner load.
However, on the Pharo 1.1. image under Cog VM, there is no such animal as an "Installer", I tried using the Monticello Browser and went fishing for the package but to no avail.
thanks in advance
Charles www.nycsmalltalk.org -- View this message in context: http://forum.world.st/Installing-Morphic-UI-designer-in-Pharo-1-1-tp3093047p... Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.
Mariano, thanks, that's exactly what I did i.e. "a", however , in this particular case "ConfigurationOfDesigner" was not available. I have now also tried "b" and that did not work either , pls see below for the stack, the issue being that "aRepository" does not get resolved to be a repository but rather remains a string and thus the DNU on #goferReferences From: charles@nycsmalltalk.org To: Pharo-project@lists.gforge.inria.fr Subject: [BUG]ByteString(Object)>>doesNotUnderstand: #goferReferences "Code I ran in workspace" Gofer new repository: 'http://www.hpi.uni-potsdam.de/hirschfeld/squeaksource/MetacelloRepository'; package: 'ConfigurationOfDesigner'; load. ######################################################################### 17 December 2010 10:32:41 pm VM: Win32 - IX86 - 6.1 - Croquet Closure Cog VM [CoInterpreter VMMaker-oscog.32] Image: Pharo1.1.1 [Latest update: #11414] SecurityManager state: Restricted: false FileAccess: true SocketAccess: true Working Dir K:\Apps\Pharo\Pharo-1.1\Pharo.app\Contents\Resources Trusted Dir K:\Apps\Pharo\Pharo-1.1\Pharo.app\Contents\Resources\charles Untrusted Dir C:\Users\charles\Documents\My Squeak ByteString(Object)>>doesNotUnderstand: #goferReferences Receiver: 'http://www.hpi.uni-potsdam.de/hirschfeld/squeaksource/MetacelloRepository' Arguments and temporary variables: aMessage: goferReferences exception: MessageNotUnderstood: ByteString>>goferReferences resumeValue: nil Receiver's instance variables: 'http://www.hpi.uni-potsdam.de/hirschfeld/squeaksource/MetacelloRepository' [] in Gofer>>basicReferencesIn: Receiver: a Gofer Arguments and temporary variables: aRepository: 'http://www.hpi.uni-potsdam.de/hirschfeld/squeaksource/MetacelloRe...etc... Receiver's instance variables: references: an OrderedCollection(a GoferPackageReference name: 'ConfigurationOf...etc... repositories: an OrderedCollection('http://www.hpi.uni-potsdam.de/hirschfeld/sq...etc... errorBlock: [:error | error pass] packageCacheRepository: a MCCacheRepository(K:\Apps\Pharo\Pharo-1.1\Pharo.app\C...etc... resolvedReferencesCache: a Dictionary(a MCCacheRepository(K:\Apps\Pharo\Pharo-1...etc... BlockClosure>>on:do: Receiver: [aRepository goferReferences asSortedCollection asArray] Arguments and temporary variables: exception: GoferRepositoryError handlerAction: [:error | error pass] handlerActive: true Receiver's instance variables: outerContext: Gofer>>basicReferencesIn: startpc: 38 numArgs: 0 Gofer>>basicReferencesIn: Receiver: a Gofer Arguments and temporary variables: aRepository: 'http://www.hpi.uni-potsdam.de/hirschfeld/squeaksource/MetacelloRe...etc... Receiver's instance variables: references: an OrderedCollection(a GoferPackageReference name: 'ConfigurationOf...etc... repositories: an OrderedCollection('http://www.hpi.uni-potsdam.de/hirschfeld/sq...etc... errorBlock: [:error | error pass] packageCacheRepository: a MCCacheRepository(K:\Apps\Pharo\Pharo-1.1\Pharo.app\C...etc... resolvedReferencesCache: a Dictionary(a MCCacheRepository(K:\Apps\Pharo\Pharo-1...etc... [] in Gofer>>allResolvedIn: Receiver: a Gofer Arguments and temporary variables: aRepository: 'http://www.hpi.uni-potsdam.de/hirschfeld/squeaksource/MetacelloRe...etc... Receiver's instance variables: references: an OrderedCollection(a GoferPackageReference name: 'ConfigurationOf...etc... repositories: an OrderedCollection('http://www.hpi.uni-potsdam.de/hirschfeld/sq...etc... errorBlock: [:error | error pass] packageCacheRepository: a MCCacheRepository(K:\Apps\Pharo\Pharo-1.1\Pharo.app\C...etc... resolvedReferencesCache: a Dictionary(a MCCacheRepository(K:\Apps\Pharo\Pharo-1...etc... [] in Dictionary>>at:ifAbsentPut: Receiver: a Dictionary(a MCCacheRepository(K:\Apps\Pharo\Pharo-1.1\Pharo.app\Contents\Resources\pack...etc... Arguments and temporary variables: key: 'http://www.hpi.uni-potsdam.de/hirschfeld/squeaksource/MetacelloRepository......... aBlock: [self basicReferencesIn: aRepository] Receiver's instance variables: tally: 1 array: an Array(nil nil nil a MCCacheRepository(K:\Apps\Pharo\Pharo-1.1\Pharo.a...etc... Dictionary>>at:ifAbsent: Receiver: a Dictionary(a MCCacheRepository(K:\Apps\Pharo\Pharo-1.1\Pharo.app\Contents\Resources\pack...etc... Arguments and temporary variables: key: 'http://www.hpi.uni-potsdam.de/hirschfeld/squeaksource/MetacelloRepository......... aBlock: [self at: key put: aBlock value] assoc: nil Receiver's instance variables: tally: 1 array: an Array(nil nil nil a MCCacheRepository(K:\Apps\Pharo\Pharo-1.1\Pharo.a...etc... Dictionary>>at:ifAbsentPut: Receiver: a Dictionary(a MCCacheRepository(K:\Apps\Pharo\Pharo-1.1\Pharo.app\Contents\Resources\pack...etc... Arguments and temporary variables: key: 'http://www.hpi.uni-potsdam.de/hirschfeld/squeaksource/MetacelloRepository......... aBlock: [self basicReferencesIn: aRepository] Receiver's instance variables: tally: 1 array: an Array(nil nil nil a MCCacheRepository(K:\Apps\Pharo\Pharo-1.1\Pharo.a...etc... Gofer>>allResolvedIn: Receiver: a Gofer Arguments and temporary variables: aRepository: 'http://www.hpi.uni-potsdam.de/hirschfeld/squeaksource/MetacelloRe...etc... Receiver's instance variables: references: an OrderedCollection(a GoferPackageReference name: 'ConfigurationOf...etc... repositories: an OrderedCollection('http://www.hpi.uni-potsdam.de/hirschfeld/sq...etc... errorBlock: [:error | error pass] packageCacheRepository: a MCCacheRepository(K:\Apps\Pharo\Pharo-1.1\Pharo.app\C...etc... resolvedReferencesCache: a Dictionary(a MCCacheRepository(K:\Apps\Pharo\Pharo-1...etc... [] in Gofer>>allResolved Receiver: a Gofer Arguments and temporary variables: resolved: 'http://www.hpi.uni-potsdam.de/hirschfeld/squeaksource/MetacelloRepos...etc... repository: an OrderedCollection(a GoferResolvedReference name: 'CairoGraphics-...etc... Receiver's instance variables: references: an OrderedCollection(a GoferPackageReference name: 'ConfigurationOf...etc... repositories: an OrderedCollection('http://www.hpi.uni-potsdam.de/hirschfeld/sq...etc... errorBlock: [:error | error pass] packageCacheRepository: a MCCacheRepository(K:\Apps\Pharo\Pharo-1.1\Pharo.app\C...etc... resolvedReferencesCache: a Dictionary(a MCCacheRepository(K:\Apps\Pharo\Pharo-1...etc... Array(SequenceableCollection)>>do: Receiver: an Array(a MCCacheRepository(K:\Apps\Pharo\Pharo-1.1\Pharo.app\Contents\Resources\package-...etc... Arguments and temporary variables: aBlock: [:repository | resolved addAll: (self allResolvedIn: repository)] index: 2 indexLimiT: 2 Receiver's instance variables: an Array(a MCCacheRepository(K:\Apps\Pharo\Pharo-1.1\Pharo.app\Contents\Resources\package-...etc... Gofer>>allResolved Receiver: a Gofer Arguments and temporary variables: resolved: an OrderedCollection(a GoferResolvedReference name: 'CairoGraphics-Ke...etc... Receiver's instance variables: references: an OrderedCollection(a GoferPackageReference name: 'ConfigurationOf...etc... repositories: an OrderedCollection('http://www.hpi.uni-potsdam.de/hirschfeld/sq...etc... errorBlock: [:error | error pass] packageCacheRepository: a MCCacheRepository(K:\Apps\Pharo\Pharo-1.1\Pharo.app\C...etc... resolvedReferencesCache: a Dictionary(a MCCacheRepository(K:\Apps\Pharo\Pharo-1...etc... GoferPackageReference(GoferReference)>>resolveAllWith: Receiver: a GoferPackageReference name: 'ConfigurationOfDesigner' Arguments and temporary variables: aGofer: a Gofer Receiver's instance variables: name: 'ConfigurationOfDesigner' GoferPackageReference(GoferReference)>>resolveWith: Receiver: a GoferPackageReference name: 'ConfigurationOfDesigner' Arguments and temporary variables: aGofer: a Gofer references: nil Receiver's instance variables: name: 'ConfigurationOfDesigner' [] in Gofer>>resolved Receiver: a Gofer Arguments and temporary variables: each: a GoferPackageReference name: 'ConfigurationOfDesigner' Receiver's instance variables: references: an OrderedCollection(a GoferPackageReference name: 'ConfigurationOf...etc... repositories: an OrderedCollection('http://www.hpi.uni-potsdam.de/hirschfeld/sq...etc... errorBlock: [:error | error pass] packageCacheRepository: a MCCacheRepository(K:\Apps\Pharo\Pharo-1.1\Pharo.app\C...etc... resolvedReferencesCache: a Dictionary(a MCCacheRepository(K:\Apps\Pharo\Pharo-1...etc... Array(SequenceableCollection)>>collect: Receiver: an Array(a GoferPackageReference name: 'ConfigurationOfDesigner') Arguments and temporary variables: aBlock: [:each | each resolveWith: self] newCollection: #(nil) index: 1 indexLimiT: 1 Receiver's instance variables: an Array(a GoferPackageReference name: 'ConfigurationOfDesigner') Gofer>>resolved Receiver: a Gofer Arguments and temporary variables: Receiver's instance variables: references: an OrderedCollection(a GoferPackageReference name: 'ConfigurationOf...etc... repositories: an OrderedCollection('http://www.hpi.uni-potsdam.de/hirschfeld/sq...etc... errorBlock: [:error | error pass] packageCacheRepository: a MCCacheRepository(K:\Apps\Pharo\Pharo-1.1\Pharo.app\C...etc... resolvedReferencesCache: a Dictionary(a MCCacheRepository(K:\Apps\Pharo\Pharo-1...etc... GoferLoad>>initializeOn: Receiver: a GoferLoad Arguments and temporary variables: aGofer: a Gofer Receiver's instance variables: gofer: a Gofer model: a MCVersionLoader GoferLoad class(GoferOperation class)>>on: Receiver: GoferLoad Arguments and temporary variables: aGofer: a Gofer Receiver's instance variables: superclass: GoferOperation methodDict: a MethodDictionary(#addResolved:->(GoferLoad>>#addResolved: "a Comp...etc... format: 134 instanceVariables: nil organization: ('accessing' versions) ('initialization' initializeOn:) ('running...etc... subclasses: {MetacelloGoferLoad} name: #GoferLoad classPool: nil sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'Gofer-Core' traitComposition: {} localSelectors: nil Gofer>>execute:do: Receiver: a Gofer Arguments and temporary variables: anOperationClass: GoferLoad aBlock: nil operation: nil result: nil Receiver's instance variables: references: an OrderedCollection(a GoferPackageReference name: 'ConfigurationOf...etc... repositories: an OrderedCollection('http://www.hpi.uni-potsdam.de/hirschfeld/sq...etc... errorBlock: [:error | error pass] packageCacheRepository: a MCCacheRepository(K:\Apps\Pharo\Pharo-1.1\Pharo.app\C...etc... resolvedReferencesCache: nil Gofer>>execute: Receiver: a Gofer Arguments and temporary variables: anOperationClass: GoferLoad Receiver's instance variables: references: an OrderedCollection(a GoferPackageReference name: 'ConfigurationOf...etc... repositories: an OrderedCollection('http://www.hpi.uni-potsdam.de/hirschfeld/sq...etc... errorBlock: [:error | error pass] packageCacheRepository: a MCCacheRepository(K:\Apps\Pharo\Pharo-1.1\Pharo.app\C...etc... resolvedReferencesCache: nil Gofer>>load Receiver: a Gofer Arguments and temporary variables: Receiver's instance variables: references: an OrderedCollection(a GoferPackageReference name: 'ConfigurationOf...etc... repositories: an OrderedCollection('http://www.hpi.uni-potsdam.de/hirschfeld/sq...etc... errorBlock: [:error | error pass] packageCacheRepository: a MCCacheRepository(K:\Apps\Pharo\Pharo-1.1\Pharo.app\C...etc... resolvedReferencesCache: nil UndefinedObject>>DoIt Receiver: nil Arguments and temporary variables: Receiver's instance variables: nil Compiler>>evaluate:in:to:notifying:ifFail:logged: Receiver: a Compiler Arguments and temporary variables: textOrStream: 'Gofer new repository: ''http://www.hpi.uni-potsdam.de/hirschf...etc... aContext: nil receiver: nil aRequestor: a TextMorphForShoutEditor failBlock: [FakeClassPool adopt: nil. ^ #failedDoit] logFlag: true methodNode: DoIt ^ Gofer new repository: 'http://www.hpi.uni-potsdam.de/hirsch...etc... method: (UndefinedObject>>#DoIt "a CompiledMethod(211025920)") value: nil toLog: nil itsSelection: nil itsSelectionString: nil Receiver's instance variables: sourceStream: a ReadStream 'Gofer new repository: ''http://www.hpi.uni-potsd...etc... requestor: a TextMorphForShoutEditor class: UndefinedObject category: nil context: nil parser: a Parser [] in TextMorphForShoutEditor(ParagraphEditor)>>evaluateSelection Receiver: a TextMorphForShoutEditor Arguments and temporary variables: rcvr: nil ctxt: nil Receiver's instance variables: model: a SHWorkspace paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 144 and rectangle 28@48 corner: 28@64 ...etc... stopBlock: a CharacterBlock with index 1 and character $G and rectangle 0@0 cor...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: Color black) initialText: a Text for 'Gofer new repository: ''http://www.hpi.uni-potsdam....etc... selectionShowing: false otherInterval: (1 to: 0) lastParentLocation: nil morph: a TextMorphForShout(44564480) oldInterval: (144 to: 143) pivotBlock: a CharacterBlock with index 1 and character $G and rectangle 0@0 co...etc... inBackTo: nil BlockClosure>>on:do: Receiver: [rcvr class evaluatorClass new evaluate: self selection asString in: ctxt to: rcvr ...etc... Arguments and temporary variables: exception: OutOfScopeNotification handlerAction: [:ex | ex resume: true] handlerActive: true Receiver's instance variables: outerContext: TextMorphForShoutEditor(ParagraphEditor)>>evaluateSelection startpc: 120 numArgs: 0 TextMorphForShoutEditor(ParagraphEditor)>>evaluateSelection Receiver: a TextMorphForShoutEditor Arguments and temporary variables: result: nil rcvr: nil ctxt: nil Receiver's instance variables: model: a SHWorkspace paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 144 and rectangle 28@48 corner: 28@64 ...etc... stopBlock: a CharacterBlock with index 1 and character $G and rectangle 0@0 cor...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: Color black) initialText: a Text for 'Gofer new repository: ''http://www.hpi.uni-potsdam....etc... selectionShowing: false otherInterval: (1 to: 0) lastParentLocation: nil morph: a TextMorphForShout(44564480) oldInterval: (144 to: 143) pivotBlock: a CharacterBlock with index 1 and character $G and rectangle 0@0 co...etc... inBackTo: nil [] in PluggableShoutMorph(PluggableTextMorph)>>doIt Receiver: a PluggableShoutMorph(792985600) Arguments and temporary variables: Receiver's instance variables: bounds: 998@168 corner: 1654@410 owner: a SystemWindow(83623936) submorphs: an Array(a TransformMorph(310116352)) fullBounds: 998@168 corner: 1654@410 color: Color white extension: a MorphExtension (260046848) [locked] borderWidth: 1 borderColor: (Color r: 0.833 g: 0.833 b: 0.833) model: a SHWorkspace slotName: nil open: false scrollBar: a ScrollBar(799277056) scroller: a TransformMorph(310116352) retractableScrollBar: false scrollBarOnLeft: false getMenuSelector: #codePaneMenu:shifted: getMenuTitleSelector: nil hasFocus: false hScrollBar: a ScrollBar(557056000) textMorph: a TextMorphForShout(44564480) getTextSelector: #contents setTextSelector: #acceptContents: getSelectionSelector: nil hasUnacceptedEdits: true askBeforeDiscardingEdits: true selectionInterval: (1 to: 143) hasEditingConflicts: false styler: a SHTextStylerST80 unstyledAcceptText: nil [] in PluggableShoutMorph(PluggableTextMorph)>>handleEdit: Receiver: a PluggableShoutMorph(792985600) Arguments and temporary variables: editBlock: [textMorph editor evaluateSelection] result: #(nil) Receiver's instance variables: bounds: 998@168 corner: 1654@410 owner: a SystemWindow(83623936) submorphs: an Array(a TransformMorph(310116352)) fullBounds: 998@168 corner: 1654@410 color: Color white extension: a MorphExtension (260046848) [locked] borderWidth: 1 borderColor: (Color r: 0.833 g: 0.833 b: 0.833) model: a SHWorkspace slotName: nil open: false scrollBar: a ScrollBar(799277056) scroller: a TransformMorph(310116352) retractableScrollBar: false scrollBarOnLeft: false getMenuSelector: #codePaneMenu:shifted: getMenuTitleSelector: nil hasFocus: false hScrollBar: a ScrollBar(557056000) textMorph: a TextMorphForShout(44564480) getTextSelector: #contents setTextSelector: #acceptContents: getSelectionSelector: nil hasUnacceptedEdits: true askBeforeDiscardingEdits: true selectionInterval: (1 to: 143) hasEditingConflicts: false styler: a SHTextStylerST80 unstyledAcceptText: nil TextMorphForShout(TextMorph)>>handleEdit: Receiver: a TextMorphForShout(44564480) Arguments and temporary variables: editBlock: [result := editBlock value] Receiver's instance variables: bounds: 0@0 corner: 648@66 owner: a TransformMorph(310116352) submorphs: #() fullBounds: 0@0 corner: 648@66 color: Color black extension: a MorphExtension (62390272) [other: (blinkStart -> 354141)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Gofer new repository: ''http://www.hpi.uni-potsdam.de/hirs...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: a TextMorphForShoutEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: a TextMorphCommandHistory editView: a PluggableShoutMorph(792985600) acceptOnCR: false PluggableShoutMorph(PluggableTextMorph)>>handleEdit: Receiver: a PluggableShoutMorph(792985600) Arguments and temporary variables: editBlock: [textMorph editor evaluateSelection] result: #(nil) Receiver's instance variables: bounds: 998@168 corner: 1654@410 owner: a SystemWindow(83623936) submorphs: an Array(a TransformMorph(310116352)) fullBounds: 998@168 corner: 1654@410 color: Color white extension: a MorphExtension (260046848) [locked] borderWidth: 1 borderColor: (Color r: 0.833 g: 0.833 b: 0.833) model: a SHWorkspace slotName: nil open: false scrollBar: a ScrollBar(799277056) scroller: a TransformMorph(310116352) retractableScrollBar: false scrollBarOnLeft: false getMenuSelector: #codePaneMenu:shifted: getMenuTitleSelector: nil hasFocus: false hScrollBar: a ScrollBar(557056000) textMorph: a TextMorphForShout(44564480) getTextSelector: #contents setTextSelector: #acceptContents: getSelectionSelector: nil hasUnacceptedEdits: true askBeforeDiscardingEdits: true selectionInterval: (1 to: 143) hasEditingConflicts: false styler: a SHTextStylerST80 unstyledAcceptText: nil PluggableShoutMorph(PluggableTextMorph)>>doIt Receiver: a PluggableShoutMorph(792985600) Arguments and temporary variables: Receiver's instance variables: bounds: 998@168 corner: 1654@410 owner: a SystemWindow(83623936) submorphs: an Array(a TransformMorph(310116352)) fullBounds: 998@168 corner: 1654@410 color: Color white extension: a MorphExtension (260046848) [locked] borderWidth: 1 borderColor: (Color r: 0.833 g: 0.833 b: 0.833) model: a SHWorkspace slotName: nil open: false scrollBar: a ScrollBar(799277056) scroller: a TransformMorph(310116352) retractableScrollBar: false scrollBarOnLeft: false getMenuSelector: #codePaneMenu:shifted: getMenuTitleSelector: nil hasFocus: false hScrollBar: a ScrollBar(557056000) textMorph: a TextMorphForShout(44564480) getTextSelector: #contents setTextSelector: #acceptContents: getSelectionSelector: nil hasUnacceptedEdits: true askBeforeDiscardingEdits: true selectionInterval: (1 to: 143) hasEditingConflicts: false styler: a SHTextStylerST80 unstyledAcceptText: nil UndefinedObject(Object)>>perform:orSendTo: Receiver: nil Arguments and temporary variables: selector: #doIt otherTarget: a PluggableShoutMorph(792985600) Receiver's instance variables: nil [] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(233308160)'do it (d)' Arguments and temporary variables: evt: [1073@215 mouseUp 762907 nil] selArgCount: 2 Receiver's instance variables: bounds: 1056@205 corner: 1194@223 owner: a MenuMorph(658767872) submorphs: #() fullBounds: 1056@205 corner: 1194@223 color: Color black extension: a MorphExtension (235929600) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'do it (d)' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: nil selector: #perform:orSendTo: arguments: an Array(#doIt a PluggableShoutMorph(792985600)) icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil BlockClosure>>ensure: Receiver: [| selArgCount | (selArgCount := selector numArgs) = 0 ifTrue: [target perform: selector...etc... Arguments and temporary variables: aBlock: [oldcursor show] complete: nil returnValue: nil Receiver's instance variables: outerContext: ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: startpc: 132 numArgs: 0 CursorWithMask(Cursor)>>showWhile: Receiver: ((CursorWithMask extent: 16@16 depth: 1 fromArray: #( 2r0 2r10000000000000000000000...etc... Arguments and temporary variables: aBlock: [| selArgCount | (selArgCount := selector numArgs) = 0 ifTrue: [targe...etc... oldcursor: ((CursorWithMask extent: 16@16 depth: 1 fromArray: #( 2r0 2r1...etc... Receiver's instance variables: bits: a Bitmap of length 16 width: 16 height: 16 depth: 1 offset: -1@ -1 maskForm: Form(16x16x1) ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(233308160)'do it (d)' Arguments and temporary variables: evt: [1073@215 mouseUp 762907 nil] w: a PasteUpMorph(425197568) [world] Receiver's instance variables: bounds: 1056@205 corner: 1194@223 owner: a MenuMorph(658767872) submorphs: #() fullBounds: 1056@205 corner: 1194@223 color: Color black extension: a MorphExtension (235929600) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'do it (d)' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: nil selector: #perform:orSendTo: arguments: an Array(#doIt a PluggableShoutMorph(792985600)) icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>mouseUp: Receiver: a ToggleMenuItemMorph(233308160)'do it (d)' Arguments and temporary variables: evt: [1073@215 mouseUp 762907 nil] Receiver's instance variables: bounds: 1056@205 corner: 1194@223 owner: a MenuMorph(658767872) submorphs: #() fullBounds: 1056@205 corner: 1194@223 color: Color black extension: a MorphExtension (235929600) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'do it (d)' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: nil selector: #perform:orSendTo: arguments: an Array(#doIt a PluggableShoutMorph(792985600)) icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp: Receiver: a ToggleMenuItemMorph(233308160)'do it (d)' Arguments and temporary variables: anEvent: [1073@215 mouseUp 762907 nil] Receiver's instance variables: bounds: 1056@205 corner: 1194@223 owner: a MenuMorph(658767872) submorphs: #() fullBounds: 1056@205 corner: 1194@223 color: Color black extension: a MorphExtension (235929600) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'do it (d)' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: nil selector: #perform:orSendTo: arguments: an Array(#doIt a PluggableShoutMorph(792985600)) icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil --- The full stack --- ByteString(Object)>>doesNotUnderstand: #goferReferences [] in Gofer>>basicReferencesIn: BlockClosure>>on:do: Gofer>>basicReferencesIn: [] in Gofer>>allResolvedIn: [] in Dictionary>>at:ifAbsentPut: Dictionary>>at:ifAbsent: Dictionary>>at:ifAbsentPut: Gofer>>allResolvedIn: [] in Gofer>>allResolved Array(SequenceableCollection)>>do: Gofer>>allResolved GoferPackageReference(GoferReference)>>resolveAllWith: GoferPackageReference(GoferReference)>>resolveWith: [] in Gofer>>resolved Array(SequenceableCollection)>>collect: Gofer>>resolved GoferLoad>>initializeOn: GoferLoad class(GoferOperation class)>>on: Gofer>>execute:do: Gofer>>execute: Gofer>>load UndefinedObject>>DoIt Compiler>>evaluate:in:to:notifying:ifFail:logged: [] in TextMorphForShoutEditor(ParagraphEditor)>>evaluateSelection BlockClosure>>on:do: TextMorphForShoutEditor(ParagraphEditor)>>evaluateSelection [] in PluggableShoutMorph(PluggableTextMorph)>>doIt [] in PluggableShoutMorph(PluggableTextMorph)>>handleEdit: TextMorphForShout(TextMorph)>>handleEdit: PluggableShoutMorph(PluggableTextMorph)>>handleEdit: PluggableShoutMorph(PluggableTextMorph)>>doIt UndefinedObject(Object)>>perform:orSendTo: [] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: BlockClosure>>ensure: CursorWithMask(Cursor)>>showWhile: ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: ToggleMenuItemMorph(MenuItemMorph)>>mouseUp: ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp: - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - MouseButtonEvent>>sentTo: ToggleMenuItemMorph(Morph)>>handleEvent: MorphicEventDispatcher>>dispatchDefault:with: MorphicEventDispatcher>>dispatchEvent:with: ToggleMenuItemMorph(Morph)>>processEvent:using: MorphicEventDispatcher>>dispatchDefault:with: MorphicEventDispatcher>>dispatchEvent:with: MenuMorph(Morph)>>processEvent:using: MenuMorph(Morph)>>processEvent: MenuMorph>>handleFocusEvent: [] in HandMorph>>sendFocusEvent:to:clear: [] in PasteUpMorph>>becomeActiveDuring: BlockClosure>>on:do: PasteUpMorph>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendMouseEvent: HandMorph>>handleEvent: HandMorph>>processEvents [] in WorldState>>doOneCycleNowFor: Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: WorldState>>doOneSubCycleFor: PasteUpMorph>>doOneSubCycle MenuMorph>>invokeModalAt:in:allowKeyboard: MenuMorph>>invokeModal: MenuMorph>>invokeModal PluggableShoutMorph(PluggableTextMorph)>>yellowButtonActivity: TextMorphForShout(TextMorphForEditView)>>mouseDown: TextMorphForShout(Morph)>>handleMouseDown: MouseButtonEvent>>sentTo: TextMorphForShout(Morph)>>handleEvent: MorphicEventDispatcher>>dispatchMouseDown:with: MorphicEventDispatcher>>dispatchEvent:with: TextMorphForShout(Morph)>>processEvent:using: MorphicEventDispatcher>>dispatchMouseDown:with: MorphicEventDispatcher>>dispatchEvent:with: TransformMorph(Morph)>>processEvent:using: MorphicEventDispatcher>>dispatchMouseDown:with: MorphicEventDispatcher>>dispatchEvent:with: PluggableShoutMorph(Morph)>>processEvent:using: MorphicEventDispatcher>>dispatchMouseDown:with: MorphicEventDispatcher>>dispatchEvent:with: SystemWindow(Morph)>>processEvent:using: MorphicEventDispatcher>>dispatchMouseDown:with: MorphicEventDispatcher>>dispatchEvent:with: PasteUpMorph(Morph)>>processEvent:using: PasteUpMorph>>processEvent:using: PasteUpMorph(Morph)>>processEvent: HandMorph>>sendEvent:focus:clear: HandMorph>>sendMouseEvent: HandMorph>>handleEvent: HandMorph>>processEvents [] in WorldState>>doOneCycleNowFor: Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: PasteUpMorph>>doOneCycle [] in Project class>>spawnNewProcess [] in BlockClosure>>newProcess -- View this message in context: http://forum.world.st/Installing-Morphic-UI-designer-in-Pharo-1-1-tp3093047p... Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.
On 17 December 2010 21:05, Charles Monteiro <charles@nycsmalltalk.org> wrote:
Pardon the newbie question but I yet don't have a grip how Squeaker's load packages , it seems that there are many, many ways of doing so. In anycase, to my immediate need I would like to check out Morphic Designer. I've tried following the instructions on their web site which are:
(Installer mc http: 'http://www.hpi.uni-potsdam.de/hirschfeld/squeaksource/') Â project: 'MetacelloRepository'; Â install: 'ConfigurationOfDesigner'. ConfigurationOfDesigner load.
However, on the Pharo 1.1. image under Cog VM, there is no such animal as an "Installer", I tried using the Monticello Browser and went fishing for the package but to no avail.
This is what my script does getInstaller (Smalltalk version beginsWith: 'Pharo') ifTrue: [ Smalltalk at: #Installer ifAbsent: [ ^ ScriptLoader new installingInstaller. ] ]. ^ Smalltalk at: #Installer
thanks in advance
Charles www.nycsmalltalk.org -- View this message in context: http://forum.world.st/Installing-Morphic-UI-designer-in-Pharo-1-1-tp3093047p... Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.
-- Best regards, Igor Stasenko AKA sig.
Igor, thank you, that worked i.e. as far as to getting the Installer setup. I was able to start the download of the configuration, however in the process of doing that it hanged, see here: http://screencast.com/t/Fo6u7xEf9 btw, I did encounter a warning in loading a pre-requisite i.e. MethodWrappers to which I decided to "proceed" , it then continued with the loading of the respective packages but unfortunately encountered a syntax error in trying to recompile. Anybody successful in loading the Morphic UI designer into a virgin Pharo 1.1.1 image ? thanks in advance, Charles www.nycsmalltalk.org -- View this message in context: http://forum.world.st/Installing-Morphic-UI-designer-in-Pharo-1-1-tp3093047p... Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.
I have installed on Pharo 1.1.1
From the project page here http:// http://www.hpi.uni-potsdam.de/hirschfeld/squeaksource/MetacelloRepository.ht... http:// http://www.hpi.uni-potsdam.de/hirschfeld/squeaksource/MetacelloRepository.ht...
I just inserted the code into the add repsoitory dialog, went configurationOfDesigner Load and installed I then added in widgets and that was okay. I physically just copied this over MCHttpRepository location: 'http://www.hpi.uni-potsdam.de/hirschfeld/squeaksource/MetacelloRepository' user: '' password: '' -- View this message in context: http://forum.world.st/Installing-Morphic-UI-designer-in-Pharo-1-1-tp3093047p... Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.
if you are still having trouble have you got latest metacello installed. Gofer new squeaksource: 'MetacelloRepository'; package: 'ConfigurationOfMetacello'; load. (Smalltalk at: #ConfigurationOfMetacello) perform: #loadLatestVersion. -- View this message in context: http://forum.world.st/Installing-Morphic-UI-designer-in-Pharo-1-1-tp3093047p... Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.
I did as you suggested, I then evaluated "ConfigurationDesigner load" which began loading the packages in question I then encountered this: http://screencast.com/t/jk4zi8aT after I proceeded thru that I got this: http://screencast.com/t/rvUlEajG just in case :), I'm running Win 7 64 bit, tho I would not think this would have any effect from what I can tell on the code being loaded. What is up with these MethodWrappers ? This is a virgin Pharo 1.1.1 . thanks -- View this message in context: http://forum.world.st/Installing-Morphic-UI-designer-in-Pharo-1-1-tp3093047p... Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.
thanks, I now did this as well , and Metacello itself loaded fine. I then went again to try to load ConfigurationOfDesigner, this time I decided to not choose the latest version but rather mt7.mcz , and I still get the same issue with MethodWrapper. So perhaps I need to find out where MethodWrapper lives and get the latest and greatest of that. Can't a configuration specify what the requisite version of a package is ? -Charles -- View this message in context: http://forum.world.st/Installing-Morphic-UI-designer-in-Pharo-1-1-tp3093047p... Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.
the sintax error with method wrappers is that it is using underscore as assignment, which is forbiden in Pharo. Try evaluating "Scanner allowUnderscoreAsAssignment: true." before loading everything. Maybe the developers of this project can update their ConfigurationOf to automatically evaluate this code in case of Pharo. cheers mariano On Sat, Dec 18, 2010 at 7:08 AM, Charles Monteiro <charles@nycsmalltalk.org>wrote:
thanks, I now did this as well , and Metacello itself loaded fine. I then went again to try to load ConfigurationOfDesigner, this time I decided to not choose the latest version but rather mt7.mcz , and I still get the same issue with MethodWrapper.
So perhaps I need to find out where MethodWrapper lives and get the latest and greatest of that.
Can't a configuration specify what the requisite version of a package is ?
-Charles -- View this message in context: http://forum.world.st/Installing-Morphic-UI-designer-in-Pharo-1-1-tp3093047p... Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.
I tried installing with using your underscores code on my win64 setup. I get to the end of setup and receive this error. The install then freezes with configurationOfDesigner Frozen textFor: aModelIndex | col package systemCategory class protocol method | col := aModelIndex column. package := aModelIndex valueOfProperty: #package ifAbsent: []. systemCategory := aModelIndex valueOfProperty: #systemCategory ifAbsent: []. class := aModelIndex valueOfProperty: #class ifAbsent: []. protocol := aModelIndex valueOfProperty: #protocol ifAbsent: []. method := aModelIndex valueOfProperty: #method ifAbsent: []. "Horizontal headers." aModelIndex row = 0 ifTrue: [ col = 1 ifTrue: [^ 'Name' asHtmlText]. col = 2 ifTrue: [^ 'Size' asHtmlText]. col = 3 ifTrue: [^ 'Type' asHtmlText]]. "Vertical headers." aModelIndex column = 0 ifTrue: [ ^ aModelIndex row asString]. package ifNotNil: [:p | col = 1 ifTrue: [^ p name]. col = 2 ifTrue: [^ ('', p systemCategories size asString, '') asHtmlText]. col = 3 ifTrue: [^ 'package' asHtmlText]]. systemCategory ifNotNil: [:cat | | prefix | prefix := aModelIndex valueOfProperty: #systemCategoryPrefix. col = 2 ifTrue: [^ ('', (SystemOrganization listAtCategoryNamed: cat) size asString, '') asHtmlText]. cat = prefix ifFalse: [Cannot store into ->cat := cat allButFirst: prefix size + 1]. col = 1 ifTrue: [^ cat]. col = 3 ifTrue: [^ 'system category' asHtmlText]]. class ifNotNil: [:c | col = 1 ifTrue: [^ c]. col = 2 ifTrue: [^ ('', (Smalltalk at: c) organization categories size asString, '') asHtmlText]. col = 3 ifTrue: [^ 'class' asHtmlText]]. protocol ifNotNil: [:p | | organization | organization := aModelIndex valueOfProperty: #organization. col = 1 ifTrue: [^ p]. col = 2 ifTrue: [^ ('', (organization listAtCategoryNamed: p) size asString, '') asHtmlText]. col = 3 ifTrue: [^ 'protocol' asHtmlText]]. method ifNotNil: [:m | col = 1 ifTrue: [^ '#', m]. col = 3 ifTrue: [^ 'method' asHtmlText]]. ^ nil -- View this message in context: http://forum.world.st/Installing-Morphic-UI-designer-in-Pharo-1-1-tp3093047p... Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.
I have some concerns about the design of this method. Stef On Dec 18, 2010, at 12:51 PM, flebber wrote:
I tried installing with using your underscores code on my win64 setup. I get to the end of setup and receive this error. The install then freezes with configurationOfDesigner Frozen
textFor: aModelIndex
| col package systemCategory class protocol method | col := aModelIndex column. package := aModelIndex valueOfProperty: #package ifAbsent: []. systemCategory := aModelIndex valueOfProperty: #systemCategory ifAbsent: []. class := aModelIndex valueOfProperty: #class ifAbsent: []. protocol := aModelIndex valueOfProperty: #protocol ifAbsent: []. method := aModelIndex valueOfProperty: #method ifAbsent: [].
"Horizontal headers." aModelIndex row = 0 ifTrue: [ col = 1 ifTrue: [^ 'Name' asHtmlText]. col = 2 ifTrue: [^ 'Size' asHtmlText]. col = 3 ifTrue: [^ 'Type' asHtmlText]].
"Vertical headers." aModelIndex column = 0 ifTrue: [ ^ aModelIndex row asString].
package ifNotNil: [:p | col = 1 ifTrue: [^ p name]. col = 2 ifTrue: [^ ('', p systemCategories size asString, '') asHtmlText]. col = 3 ifTrue: [^ 'package' asHtmlText]].
systemCategory ifNotNil: [:cat | | prefix | prefix := aModelIndex valueOfProperty: #systemCategoryPrefix.
col = 2 ifTrue: [^ ('', (SystemOrganization listAtCategoryNamed: cat) size asString, '') asHtmlText].
cat = prefix ifFalse: [Cannot store into ->cat := cat allButFirst: prefix size + 1]. col = 1 ifTrue: [^ cat]. col = 3 ifTrue: [^ 'system category' asHtmlText]].
class ifNotNil: [:c | col = 1 ifTrue: [^ c]. col = 2 ifTrue: [^ ('', (Smalltalk at: c) organization categories size asString, '') asHtmlText]. col = 3 ifTrue: [^ 'class' asHtmlText]].
protocol ifNotNil: [:p | | organization | organization := aModelIndex valueOfProperty: #organization. col = 1 ifTrue: [^ p]. col = 2 ifTrue: [^ ('', (organization listAtCategoryNamed: p) size asString, '') asHtmlText]. col = 3 ifTrue: [^ 'protocol' asHtmlText]].
method ifNotNil: [:m | col = 1 ifTrue: [^ '#', m]. col = 3 ifTrue: [^ 'method' asHtmlText]].
^ nil -- View this message in context: http://forum.world.st/Installing-Morphic-UI-designer-in-Pharo-1-1-tp3093047p... Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.
fiebber, maybe you should contact the designer developers, or put them on CC. Cheers mariano On Sat, Dec 18, 2010 at 1:08 PM, Stéphane Ducasse <stephane.ducasse@inria.fr
wrote:
I have some concerns about the design of this method. Stef
On Dec 18, 2010, at 12:51 PM, flebber wrote:
I tried installing with using your underscores code on my win64 setup. I
get
to the end of setup and receive this error. The install then freezes with configurationOfDesigner Frozen
textFor: aModelIndex
| col package systemCategory class protocol method | col := aModelIndex column. package := aModelIndex valueOfProperty: #package ifAbsent: []. systemCategory := aModelIndex valueOfProperty: #systemCategory ifAbsent: []. class := aModelIndex valueOfProperty: #class ifAbsent: []. protocol := aModelIndex valueOfProperty: #protocol ifAbsent: []. method := aModelIndex valueOfProperty: #method ifAbsent: [].
"Horizontal headers." aModelIndex row = 0 ifTrue: [ col = 1 ifTrue: [^ 'Name' asHtmlText]. col = 2 ifTrue: [^ 'Size' asHtmlText]. col = 3 ifTrue: [^ 'Type' asHtmlText]].
"Vertical headers." aModelIndex column = 0 ifTrue: [ ^ aModelIndex row asString].
package ifNotNil: [:p | col = 1 ifTrue: [^ p name]. col = 2 ifTrue: [^ ('', p systemCategories size asString, '') asHtmlText]. col = 3 ifTrue: [^ 'package' asHtmlText]].
systemCategory ifNotNil: [:cat | | prefix | prefix := aModelIndex valueOfProperty: #systemCategoryPrefix.
col = 2 ifTrue: [^ ('', (SystemOrganization listAtCategoryNamed: cat) size asString, '') asHtmlText].
cat = prefix ifFalse: [Cannot store into ->cat := cat allButFirst: prefix size + 1]. col = 1 ifTrue: [^ cat]. col = 3 ifTrue: [^ 'system category' asHtmlText]].
class ifNotNil: [:c | col = 1 ifTrue: [^ c]. col = 2 ifTrue: [^ ('', (Smalltalk at: c) organization categories size asString, '') asHtmlText]. col = 3 ifTrue: [^ 'class' asHtmlText]].
protocol ifNotNil: [:p | | organization | organization := aModelIndex valueOfProperty: #organization. col = 1 ifTrue: [^ p]. col = 2 ifTrue: [^ ('', (organization listAtCategoryNamed: p) size asString, '') asHtmlText]. col = 3 ifTrue: [^ 'protocol' asHtmlText]].
method ifNotNil: [:m | col = 1 ifTrue: [^ '#', m]. col = 3 ifTrue: [^ 'method' asHtmlText]].
^ nil -- View this message in context: http://forum.world.st/Installing-Morphic-UI-designer-in-Pharo-1-1-tp3093047p... Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.
I did as suggested both thru the settings tool and via the code provided and still encounter the same problem. Maybe its noteworthy to mention that prior to that I get a warning from Monticello advising me that I'm about to update a package that is locally dirty i.e. MethodWrappers. Apparently, the version is: an OrderedCollection(a MCVersion(MethodWrappers-bs.19)). Can I assume that this will load into a pure Squeak image ? thanks -Charles -- View this message in context: http://forum.world.st/Installing-Morphic-UI-designer-in-Pharo-1-1-tp3093047p... Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.
finally it worked, but not thru the instructions on the Morphic Designer site, rather by manually going to that repository and loading ConfigurationDesigner -- View this message in context: http://forum.world.st/Installing-Morphic-UI-designer-in-Pharo-1-1-tp3093047p... Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.
Dear charles In pharo we use Gofer to script monticello. Now in the new future we will have the complete infrastructure to have repositories for each versions and we will use metacello (maps of packages) to make sure that each package published in a distribution loads without putting the user in bad situations (Why as a user would i have to knowwhat package version should be loaded :)). So we hope to provide a much better infrastructure for people. For the UI designer, I did not try it now let us know what you find. I'm not sure that there is a way to store and rebuild constructed interface. There is a also UIBuilder which serialize the Moprh and that should be adapted to use a windowSpec stef
participants (5)
-
Charles Monteiro -
flebber -
Igor Stasenko -
Mariano Martinez Peck -
Stéphane Ducasse