[BUG]MarvinOtlEditor(Object)>>doesNotUnderstand: #scrollbarWidth
[was: Outliner]
Klaus D. Witzel
klaus.witzel at cobss.com
Fri Aug 25 07:38:12 UTC 2006
Hi Pavel,
is there anything special needed (.image release, other package(s), etc).
/Klaus
25 August 2006 9:33:04 am
VM: Win32 - a SmalltalkImage
Image: Squeak3.9alpha [latest update: #7051]
SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir ...\kWitzel\My Documents\Squeak3.9
Trusted Dir ...\kWitzel\My Documents\Squeak3.9\kWitzel
Untrusted Dir ...\My Squeak\kWitzel
MarvinOtlEditor(Object)>>doesNotUnderstand: #scrollbarWidth
Receiver: a MarvinOtlEditor(3637)
Arguments and temporary variables:
aMessage: scrollbarWidth
Receiver's instance variables:
bounds: 0 at 0 corner: 320 at 120
owner: nil
submorphs: an Array(a MarvinOtlEditorResizingMorph(1979) a
ScrollBar(2316) a Tr...etc...
fullBounds: nil
color: Color white
extension: a MorphExtension (3809) [other: (borderStyle -> a
SimpleBorder) (vS...etc...
borderWidth: 2
borderColor: Color black
model: nil
slotName: nil
open: false
pinSpecs: nil
scrollBar: a ScrollBar(2316)
scroller: a TransformMorph(21)
retractableScrollBar: false
scrollBarOnLeft: true
getMenuSelector: nil
getMenuTitleSelector: nil
scrollBarHidden: nil
hasFocus: false
hScrollBar: a ScrollBar(1084)
textMorph: nil
getTextSelector: nil
setTextSelector: nil
getSelectionSelector: nil
hasUnacceptedEdits: false
askBeforeDiscardingEdits: true
selectionInterval: nil
hasEditingConflicts: false
resizingMorph: a MarvinOtlEditorResizingMorph(1979)
resizeAction: nil
resizerOffset: 0 at 0
MarvinOtlEditor>>initialize
Receiver: a MarvinOtlEditor(3637)
Arguments and temporary variables:
Receiver's instance variables:
bounds: 0 at 0 corner: 320 at 120
owner: nil
submorphs: an Array(a MarvinOtlEditorResizingMorph(1979) a
ScrollBar(2316) a Tr...etc...
fullBounds: nil
color: Color white
extension: a MorphExtension (3809) [other: (borderStyle -> a
SimpleBorder) (vS...etc...
borderWidth: 2
borderColor: Color black
model: nil
slotName: nil
open: false
pinSpecs: nil
scrollBar: a ScrollBar(2316)
scroller: a TransformMorph(21)
retractableScrollBar: false
scrollBarOnLeft: true
getMenuSelector: nil
getMenuTitleSelector: nil
scrollBarHidden: nil
hasFocus: false
hScrollBar: a ScrollBar(1084)
textMorph: nil
getTextSelector: nil
setTextSelector: nil
getSelectionSelector: nil
hasUnacceptedEdits: false
askBeforeDiscardingEdits: true
selectionInterval: nil
hasEditingConflicts: false
resizingMorph: a MarvinOtlEditorResizingMorph(1979)
resizeAction: nil
resizerOffset: 0 at 0
MarvinOtlEditor class(Behavior)>>new
Receiver: MarvinOtlEditor
Arguments and temporary variables:
Receiver's instance variables:
superclass: PluggableTextMorph
methodDict: a MethodDictionary(#drawOn:->a CompiledMethod (125)
#initialize->a ...etc...
format: 194
instanceVariables: #('resizingMorph' 'resizeAction' 'resizerOffset')
organization: ('as yet unclassified' drawOn: initialize initializeFor:)
('acces...etc...
subclasses: nil
name: #MarvinOtlEditor
classPool: nil
sharedPools: nil
environment: a SystemDictionary(lots of globals)
category: #'Marvin-Outliner'
traitComposition: nil
localSelectors: nil
prototype: nil
MarvinOtlEditor class(MorphicModel class)>>new
Receiver: MarvinOtlEditor
Arguments and temporary variables:
Receiver's instance variables:
superclass: PluggableTextMorph
methodDict: a MethodDictionary(#drawOn:->a CompiledMethod (125)
#initialize->a ...etc...
format: 194
instanceVariables: #('resizingMorph' 'resizeAction' 'resizerOffset')
organization: ('as yet unclassified' drawOn: initialize initializeFor:)
('acces...etc...
subclasses: nil
name: #MarvinOtlEditor
classPool: nil
sharedPools: nil
environment: a SystemDictionary(lots of globals)
category: #'Marvin-Outliner'
traitComposition: nil
localSelectors: nil
prototype: nil
--- The full stack ---
MarvinOtlEditor(Object)>>doesNotUnderstand: #scrollbarWidth
MarvinOtlEditor>>initialize
MarvinOtlEditor class(Behavior)>>new
MarvinOtlEditor class(MorphicModel class)>>new
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
MarvinOtlEditor class(PluggableTextMorph
class)>>on:text:accept:readSelection:menu:
MarvinOtlEditor class>>on:
MarvinOtlEvaluator>>initialize
MarvinOtlEvaluator class(MarvinOtlComponent class)>>for:
...etc...
On Fri, 25 Aug 2006 00:30:57 +0200, Pavel Krivanek wrote:
> Hi all,
>
> I've got the next toy for you :-)
>
> It's couple of months when I was doing something with Marvin (the Self
> dialect for Squeak). But there's one part of this project that was
> never published and that may be interesting for you - the prototype of
> the Self-like outliner. It's stand-alone code so it's not dependent on
> the rest of this project.
>
> You can download it here:
> http://squeaksource.com/Marvin/Marvin-Outliner-pk.1.mcz
> and it looks like this:
> http://www.comtalk.net/Squeak/uploads/95/outliner.PNG
>
> You can create some outliners using this code
>
> o := MarvinOutliner for: MarvinOtlObjectAbstractModel new.
> o flyTo: 100 at 100.
>
> Then you can create slots, create sections of slots, open evaluator,
> move slots from one outliner to another, create new object from slots
> and so on. But connectors are not working well now and if I remember
> it well, the code needs some cleanup.
>
> In fact Marvin is not absolutely dead project (the public repository
> doesn't contain the latest version) but SmaCC doesn't have some
> features that I need for working with source code and clone families
> so I need to write new compiler and I don't have enough time for it
> now.
>
> Enjoy!
> -- Pavel
>
>
More information about the Squeak-dev
mailing list
|