Adding action to template?
by Michael Rueger
Hi all,
I'm trying to add a custom action to a template (Squeak version).
I did everything in the FAQ (even registering the action with SWPage
etc) and I'm also able to evaluate the action using the ? notation.
But, when I'm editing the template settings the add, remove, up, down
button are not doing anything.
I'm probably overlooking something really obvious ;-)
Michael
19 years, 7 months
Re: Collecting SmallWiki, SqueakSource Sites...and the rest
by Colin Putney
Stéphane ducasse posted to squeak-dev:
> What we are doing or planning to do:
> - port SmallWiki to Seaside so that we can have a better CMS. If you
> want to help
> please contact send an email in the smallWiki mailing list
> - David rothlisberger is starting to have a forum on top of Seaside
> and will start to
> port smallWiki to Seaside.
> - this means that we could integrate a forum with a super extra
> SmallWiki and SqueakSource.
I've been thinking about this as well. My Wiresong site
(www.wiresong.ca) runs Smallwiki for the main part of the site, but
Smallblog for the blog section - it's a completely separate app in a
separate image. I'd also like to better integrate my Monticello
repository with the site, but SqueakSource isn't quite what I want for
that...
So, yes, a Seaside version of SmallWiki would be great. I won't be able
to do any work on it until after I get back from StS though.
Another thing I was thinking about is a VW port of Monticello. That
would let us maintain SmallWiki in MC and keep the Squeak version in
synch with the main VW branch more easily. I sat up and took notice
when Lukas mentioned recently that he didn't want to do a merge with
StORE. Avi and I have kicked around a few ideas for how to maintain
cross-platform packages using MC, but we didn't come up with anything
really solid. I guess we'll have to try it out to find out what works
and what doesn't. Anybody else interested in that?
Cheers,
Colin
19 years, 7 months
Re: i18n for VW SmallWiki
by Lukas Renggli
> This parcel is a bundle of 'SmallWikiI18N'. It consists with several
> packages overriding corresponded packages of SmallWiki, and additional
> new 'SmallWikiI18N Encoder' package.
Thanks for your submission, but unfortunately I'm unable to load those
packages into my VisualWorks 7.2 image: I get the following exception
while the files are read:
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
Unhandled exception: BlockClosure [] in Object>>doesNotUnderstand:
BehaviorShell(Object)>>doesNotUnderstand:
ResolvedDeferredConstant>>flushBinding
optimized [] in [] in SystemUtils class>>linkSystem
Array(SequenceableCollection)>>do:
optimized [] in SystemUtils class>>linkSystem
DeferredBinding class(Behavior)>>allSubclassesDo:
SystemUtils class>>linkSystem
optimized [] in SystemUtils class>>modifySystem:
BlockClosure>>valueAsUnwindBlockFrom:
BlockClosure>>ensure:
SystemUtils class>>modifySystem:
CodeReader>>readScopeZones
CodeReader>>readPackage
optimized [] in CodeReader>>readFrom:
BlockClosure>>ensure:
CodeReader>>readFrom:
optimized [] in CodeComponent>>loadFrom:using:
BlockClosure>>on:do:
Parcel class(CodeComponent class)>>handleCodeReaderSignalsDo:for:
Parcel(CodeComponent)>>loadFrom:using:
Parcel(CodeComponent)>>loadFrom:
optimized [] in [] in [] in Parcel class>>loadParcelCachedFrom:
BlockClosure>>on:do:
optimized [] in [] in Parcel class>>loadParcelCachedFrom:
BlockClosure>>on:do:
[] in Parcel class>>loadParcelCachedFrom:
BlockClosure>>ensure:
Parcel class>>loadParcelCachedFrom:
optimized [] in [] in Parcel class>>loadParcelFrom:
BlockClosure>>ensure:
Parcel class>>withFileCachesDo:
optimized [] in Parcel class>>loadParcelFrom:
Cursor>>showWhile:
Parcel class>>loadParcelFrom:
optimized [] in ParcelManager>>loadParcelFromFile
optimized [] in [] in Notice class>>show:while:
BlockClosure>>ensure:
Cursor>>showWhile:
optimized [] in Notice class>>show:while:
BlockClosure>>ensure:
Notice class>>show:while:
ParcelManager>>loadParcelFromFile
Win98MenuBarButtonController(MenuBarButtonController)>>dispatchMenuSymbo
l:
Win98MenuBarButtonController(MenuBarButtonController)>>dispatchMenuSelec
tion:
optimized [] in MenuBarButtonController>>menuBarActionForMenu:
BlockClosure>>ensure:
Win98MenuBarButtonController(MenuBarButtonController)>>menuBarActionForM
enu:
Win98MenuBarButtonController(MenuBarButtonController)>>menuBarAction
Win98MenuBarButtonController(MenuBarButtonController)>>redButtonPressedE
vent:
RedButtonPressedEvent>>dispatchTo:
Win98MenuBarButtonController(Controller)>>handleEvent:
EventDispatcher>>dispatch:to:
EventDispatcher>>dispatchEvent:
RedButtonPressedEvent(Event)>>dispatch
RedButtonPressedEvent(Event)>>dispatchForWindowManager:
optimized [] in WindowManager>>safelyDispatchForWindowManager:
BlockClosure>>on:do:
WindowManager>>safelyDispatchForWindowManager:
WindowManager>>processNextEvent
optimized [] in [] in WindowManager>>newProcess
BlockClosure>>on:do:
optimized [] in WindowManager>>newProcess
BlockClosure>>on:do:
optimized [] in Process class>>forBlock:priority:
----------------------------------------------------------------------
BehaviorShell(Object)>>doesNotUnderstand:
Receiver:
a BehaviorShell
Arguments:
aMessage = a Message with selector: #instanceBehavior and arguments:
#()
Temporaries:
excpt = a MessageNotUnderstood
resumeValue = nil
Context PC = 25
----------------------------------------------------------------------
ResolvedDeferredConstant>>flushBinding
Receiver:
a ResolvedDeferredConstant
Instance Variables:
key = #Login
resolved = (VariableBinding key: #Login)
resolvedValue = SmallWiki.Login
method = CompiledBlock [] in [] in [] in a descendent of
BehaviorShell>>renderSolution
Temporaries:
mc = a descendent of BehaviorShell
class = nil
Context PC = 16
----------------------------------------------------------------------
optimized [] in [] in SystemUtils class>>linkSystem
Receiver:
an UndefinedObject
Arguments:
db = (ResolvedDeferredConstant key: #Login)
Context PC = 3
----------------------------------------------------------------------
Array(SequenceableCollection)>>do:
Receiver:
an Array
Arguments:
aBlock = BlockClosure [] in [] in SystemUtils class>>linkSystem
Temporaries:
i = 3141
Context PC = 19
----------------------------------------------------------------------
optimized [] in SystemUtils class>>linkSystem
Receiver:
an UndefinedObject
Arguments:
cl = ResolvedDeferredConstant
Context PC = 6
----------------------------------------------------------------------
DeferredBinding class(Behavior)>>allSubclassesDo:
Receiver:
a DeferredBinding class
Instance Variables:
superclass = Magnitude
methodDict = a MethodDictionary[23]
format = 16388
subclasses = an Array[2]
instanceVariables = an Array[4]
organization = ('initialize' #flushBinding #forBinding: #forKey:
#method:)
('accessing' #key #value #value:)
('comparing' #< #= #hash #isEqualTo:within:and:)
('printing' #displayString #printOn:)
('tracing' #binding #traceFrom:)
('testing' #isDeferred #isVariableBinding #refersToLiteral:)
('converting' #asDeferred)
('private' #method #resolveBinding)
('binary storage' #isCodeReaderEquivalentTo:within:and:)
('RefactoringBrowser' #nonDeferredBinding)
name = #DeferredBinding
classPool = nil
environment = a NameSpace[227]
Arguments:
aBlock = BlockClosure [] in SystemUtils class>>linkSystem
Temporaries:
subs = an Array[2]
i = 2
cl = ResolvedDeferredConstant
Context PC = 28
----------------------------------------------------------------------
SystemUtils class>>linkSystem
Receiver:
a SystemUtils class
Instance Variables:
superclass = Object
methodDict = a MethodDictionary[0]
format = 16384
subclasses = nil
instanceVariables = nil
organization =
name = #SystemUtils
classPool = a NameSpaceOfClass[3]
environment = a NameSpace[227]
linkState = a Signal nil
Context PC = 4
----------------------------------------------------------------------
optimized [] in SystemUtils class>>modifySystem:
Receiver:
an UndefinedObject
Temporaries:
.linkHere = nil
.self = SystemUtils
Context PC = 10
----------------------------------------------------------------------
BlockClosure>>valueAsUnwindBlockFrom:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in SystemUtils class>>modifySystem:
outerContext = nil
copiedValues = an Array[2]
Arguments:
aContextOrNil = nil
Context PC = 4
----------------------------------------------------------------------
BlockClosure>>ensure:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in SystemUtils class>>modifySystem:
outerContext = nil
copiedValues = an Array[2]
Arguments:
aBlock = BlockClosure [] in SystemUtils class>>modifySystem:
Temporaries:
result = nil
Context PC = 8
----------------------------------------------------------------------
SystemUtils class>>modifySystem:
Receiver:
a SystemUtils class
Instance Variables:
superclass = Object
methodDict = a MethodDictionary[0]
format = 16384
subclasses = nil
instanceVariables = nil
organization =
name = #SystemUtils
classPool = a NameSpaceOfClass[3]
environment = a NameSpace[227]
linkState = a Signal nil
Arguments:
aBlock = BlockClosure [] in CodeReader>>readScopeZones
Temporaries:
linkHere = nil
Context PC = 16
----------------------------------------------------------------------
CodeReader>>readScopeZones
Receiver:
a CodeReader
Instance Variables:
stream = a CodeReaderStream on 'SmallWikiI18N.pcl'
pointer = 388
format = 16
parcelName = 'SmallWikiI18N'
versionString = ''
dateString = 'April 25, 2004'
timeString = '9:53:07 pm'
numNamedObjects = 0
numClasses = 17
numExtensionMethods = 0
definedObjects = an Array[0]
definedBindings = an IdentityDictionary[1]
definedExternals = an IdentityDictionary[0]
classes = an Array[17]
classSelectors = nil
categories = an Array[17]
packageEnvironment = a NameSpace[3]
packageUndeclared = a NameSpace[0]
extensionMethods = an Array[0]
objectSpaceSize = 689
objectSpace = an Array[689]
symbolNum = 181
twoByteSymbolNum = 0
stringNum = 68
twoByteStringNum = 0
byteArrayNum = 52
floatNum = 0
doubleNum = 0
fixedNum = 0
largePositiveNum = 0
largeNegativeNum = 0
mclassNum = 24
mclassclassNum = 2
refNamObjNum = 2
scopeZonesNum = 16
defObjOrganizerNum = 0
classOrganizerNum = 34
arbClassNum = 12
arbObjectNum = 268
messageSendIndices = an Interval[0]
properties = nil
userStringsNum = 3
namedObjects = nil
namedObjectsNum = 0
postLoadObjects = nil
streamDir = a
LogicalFilename('/Users/lukas/Programming/VisualWorks/smallwiki')
sourceFile = 'SmallWikiI18N.pst'
hideSource = false
importMaps = an IdentityDictionary[7]
overriddenExtensions = nil
versionSelectionBlock = BlockClosure [] in [] in
CodeReader>>compileActions:
warningSuppressionBlock = BlockClosure [] in [] in
CodeReader>>compileActions:
preReadBlock = nil
currentSuperclass = WriteStream
mustRecompile = false
lateOperations = an OrderedCollection[1]
updates = nil
tempSourceFile = nil
Context PC = 12
----------------------------------------------------------------------
CodeReader>>readPackage
Receiver:
a CodeReader
Instance Variables:
stream = a CodeReaderStream on 'SmallWikiI18N.pcl'
pointer = 388
format = 16
parcelName = 'SmallWikiI18N'
versionString = ''
dateString = 'April 25, 2004'
timeString = '9:53:07 pm'
numNamedObjects = 0
numClasses = 17
numExtensionMethods = 0
definedObjects = an Array[0]
definedBindings = an IdentityDictionary[1]
definedExternals = an IdentityDictionary[0]
classes = an Array[17]
classSelectors = nil
categories = an Array[17]
packageEnvironment = a NameSpace[3]
packageUndeclared = a NameSpace[0]
extensionMethods = an Array[0]
objectSpaceSize = 689
objectSpace = an Array[689]
symbolNum = 181
twoByteSymbolNum = 0
stringNum = 68
twoByteStringNum = 0
byteArrayNum = 52
floatNum = 0
doubleNum = 0
fixedNum = 0
largePositiveNum = 0
largeNegativeNum = 0
mclassNum = 24
mclassclassNum = 2
refNamObjNum = 2
scopeZonesNum = 16
defObjOrganizerNum = 0
classOrganizerNum = 34
arbClassNum = 12
arbObjectNum = 268
messageSendIndices = an Interval[0]
properties = nil
userStringsNum = 3
namedObjects = nil
namedObjectsNum = 0
postLoadObjects = nil
streamDir = a
LogicalFilename('/Users/lukas/Programming/VisualWorks/smallwiki')
sourceFile = 'SmallWikiI18N.pst'
hideSource = false
importMaps = an IdentityDictionary[7]
overriddenExtensions = nil
versionSelectionBlock = BlockClosure [] in [] in
CodeReader>>compileActions:
warningSuppressionBlock = BlockClosure [] in [] in
CodeReader>>compileActions:
preReadBlock = nil
currentSuperclass = WriteStream
mustRecompile = false
lateOperations = an OrderedCollection[1]
updates = nil
tempSourceFile = nil
Temporaries:
organizerStart = nil
Context PC = 57
----------------------------------------------------------------------
optimized [] in CodeReader>>readFrom:
Receiver:
an UndefinedObject
Temporaries:
.self = a CodeReader
Context PC = 6
----------------------------------------------------------------------
BlockClosure>>ensure:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in CodeReader>>readFrom:
outerContext = nil
copiedValues = a CodeReader
Arguments:
aBlock = BlockClosure [] in CodeReader>>readFrom:
Temporaries:
result = nil
Context PC = 4
----------------------------------------------------------------------
CodeReader>>readFrom:
Receiver:
a CodeReader
Instance Variables:
stream = a CodeReaderStream on 'SmallWikiI18N.pcl'
pointer = 388
format = 16
parcelName = 'SmallWikiI18N'
versionString = ''
dateString = 'April 25, 2004'
timeString = '9:53:07 pm'
numNamedObjects = 0
numClasses = 17
numExtensionMethods = 0
definedObjects = an Array[0]
definedBindings = an IdentityDictionary[1]
definedExternals = an IdentityDictionary[0]
classes = an Array[17]
classSelectors = nil
categories = an Array[17]
packageEnvironment = a NameSpace[3]
packageUndeclared = a NameSpace[0]
extensionMethods = an Array[0]
objectSpaceSize = 689
objectSpace = an Array[689]
symbolNum = 181
twoByteSymbolNum = 0
stringNum = 68
twoByteStringNum = 0
byteArrayNum = 52
floatNum = 0
doubleNum = 0
fixedNum = 0
largePositiveNum = 0
largeNegativeNum = 0
mclassNum = 24
mclassclassNum = 2
refNamObjNum = 2
scopeZonesNum = 16
defObjOrganizerNum = 0
classOrganizerNum = 34
arbClassNum = 12
arbObjectNum = 268
messageSendIndices = an Interval[0]
properties = nil
userStringsNum = 3
namedObjects = nil
namedObjectsNum = 0
postLoadObjects = nil
streamDir = a
LogicalFilename('/Users/lukas/Programming/VisualWorks/smallwiki')
sourceFile = 'SmallWikiI18N.pst'
hideSource = false
importMaps = an IdentityDictionary[7]
overriddenExtensions = nil
versionSelectionBlock = BlockClosure [] in [] in
CodeReader>>compileActions:
warningSuppressionBlock = BlockClosure [] in [] in
CodeReader>>compileActions:
preReadBlock = nil
currentSuperclass = WriteStream
mustRecompile = false
lateOperations = an OrderedCollection[1]
updates = nil
tempSourceFile = nil
Arguments:
aSource = 'SmallWikiI18N.pcl'
Context PC = 15
----------------------------------------------------------------------
optimized [] in CodeComponent>>loadFrom:using:
Receiver:
an UndefinedObject
Temporaries:
.aCodeReader = a CodeReader
.aSource = 'SmallWikiI18N.pcl'
Context PC = 6
----------------------------------------------------------------------
BlockClosure>>on:do:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in CodeComponent>>loadFrom:using:
outerContext = nil
copiedValues = an Array[2]
Arguments:
anExceptionSelector = CodeStorageError
handlerBlock = BlockClosure [] in CodeComponent
class>>handleCodeReaderSignalsDo:for:
Context PC = 18
----------------------------------------------------------------------
Parcel class(CodeComponent class)>>handleCodeReaderSignalsDo:for:
Receiver:
a Parcel class
Instance Variables:
superclass = CodeComponent
methodDict = a MethodDictionary[229]
format = 16393
subclasses = nil
instanceVariables = an Array[7]
organization = ('initialize-release' #initialize)
('accessing' #bundleName #bundleName: #packageName #packageName:
#postUnloadBlock #pundleName #summary #toolListIcon #version #version:
#versionString)
('copying' #postCopy)
('printing' #displayString #listEntry #printOn: #putStatsOn:)
('change management' #addBinding:in: #addBinding:in:attributes:
#addClass: #addClass:attributes: #addDoIt: #addNameSpace:
#addNameSpace:attributes: #addSelector:class:
#addSelector:class:attributes: #changeBinding:in:
#changeBinding:in:attributes: #changeClass: #changeClass:attributes:
#changeNameSpace: #changeNameSpace:attributes: #changeSelector:class:
#changeSelector:class:attributes: #changeSelector:class:protocol:
#commentClass: #commentNameSpace: #relocateBinding:from:to:
#relocateClass:from:to: #relocateNameSpace:from:to: #removeBinding:in:
#removeClass: #removeDoIt: #removeEntiretyOfClass: #removeNameSpace:
#removeSelector:class: #renameBinding:in:as: #renameClass:as:
#renameNameSpace:as: #reorganizeClass: #reorganizeClassData:
#reorganizeNameSpace:)
('editing' #addChangeSet: #addChangesToChangeList:
#addClassAndAllSelectors: #addClasses: #addClassesAndAllSelectors:
#addEntiretyOfClass: #addEntiretyOfClasses: #addName:in: #addNames:in:
#addObject: #addObject:named: #addSelector:forClass:
#addSelector:toClass: #addSelectors:forClass: #addStatic:to: #cleanse
#discard #empty #removeChangeSet: #removeClasses:
#removeEntiretyOfClasses: #removeName:in: #removeNames:in:
#removeObject: #removeSelector:forClass: #removeSelectors:forClass:
#removeStatic:from: #undefineClass: #update:with:from:)
('ui' #fileOutAsFor: #saveParcelDialogFor:
#saveParcelDialogFor:preOpen:preSave: #uiForEmpty #uiForRename)
('load/unload' #abortLoadBecause: #abortSaveBecause:
#abortUnloadBecause: #createOrFindExpression #fileIntoFrom: #fileOutOn:
#packageEnvironment #packageUndeclared
#parcelOutOn:withSource:hideOnLoad:republish:backup:
#prerequisitesForLoading #remove #unload)
('queries' #allCallsOn: #allImplementorsOf: #classesAndSelectorsDo:
#containsSelectors:forClass: #danglingReferencesIfUnloadedDo:
#definedAndExtendedClasses #definedBindings #definedBindingsDo:
#definedBindingsFor: #definedClasses #definedClassesDo:
#definedNamesFor: #definedNameSpaces #definedObjects #definedObjectsDo:
#definedOrExtendedClassNamesFor: #definedProtocolsFor:
#definedSelectorsFor: #definedSelectorsFor:andProtocol:
#definedStaticReferences #definedThings #definesClass:
#definesClassOrNameSpace: #definesName:in: #definesObject:
#definesOrExtendsBehavior: #definesOrExtendsClass:
#definesSelector:forClass: #extendedBehaviors #extendedClasses
#extendsBehavior: #extendsClass: #extendsObject: #extensionsDo:
#externalMethodsUsedExclusively #getCategoriesOfClasses
#getChildrenObjects #loadedPrerequisites #methodsDo: #namedObjects
#overridesDo: #unparceledMethodsOfDefinedClasses)
('change set compatibility' #addOtherChange: #atClass:includes:
#atName:includes: #atSelector:class: #changedClasses #propertyChanged:
#propertyChanged:value:)
('testing' #hasCodeOverriddenByOtherParcels
#hasDanglingReferencesIfUnloaded #hasExtendedClasses
#hasExtendedNameSpaces #hasExtensions #hasItselfBeenModified
#hasOverriddenCode #hasUninstalledCode #isDirty #isEmpty #isLoaded
#isParcel #isSaveable #notEmpty)
('private' #adviseManager #checkedActionMethod:
#definedClassesExcludedSelectors #definedClassExcludedSelectors:
#extensionMethods #forPackage:do: #installUninstalledBindings
#installUninstalledClasses #installUninstalledMethods #manager
#markAsClean #markAsDirty #markNotModified #nonMetaClassOf:
#performAction: #postLoad: #setActionMethod:class:selector:
#unloadLogged: #unloadSource #unloadSourceSafely: #writeDefinition:on:
#writeMethods:on: #writeRemovalScriptOn:)
('private-selectors' #classesThatHaveBindings #classesThatHaveSelectors
#hasBindingsFor: #hasSelectorsFor: #objectsThatHaveBindings
#selectorsAt:)
('actions' #executeActionBlock:for:)
('overrides' #comparesTo: #overriddenClass: #overriddenNameSpace:
#overriddenSelector:class: #overriddenStatic:in: #reinstalledClass:
#reinstalledNameSpace: #reinstalledSelector:class:
#reinstalledStatic:in: #removeOverriddenClass:
#removeOverriddenNameSpace: #removeOverriddenSelector:class:
#removeOverriddenStatic:nameSpace:)
('store-utilities' #classOfDbRecord #relatedPackage #relatedParcel)
('store' #asDBRecord #asPackage #asPackageNamed:
#checkPrerequisiteNamed:withVersion:requiredVersion: #copyPropertiesTo:
#moveContentsTo: #traceVersion #traceVersionString)
('private-load/unload' #addSpecialItemsFrom: #doComponentLoadedActions
#doComponentUpdatingActions: #putStoredPropertiesIn:
#queryLoaded:ifLoadedAndOK:ifFail: #removeClass:unloaded:
#removeNameSpace:unloaded: #runClassExtensionPostLoadMethods
#setParcelPropertyFrom:)
('converting' #asParcel)
('private-editing'
#addChangesFor:instanceSelectors:classSelectors:to:bindings:source:)
('Refactoring Browser' #allClassesAndNameSpaces #isUnparceledParcel
#textForItem)
name = #Parcel
classPool = a NameSpaceOfClass[2]
environment = a NameSpace[227]
parcels = a List[63]
classParcelMap = an IdentityDictionary[1782]
parcelFileInfoCache = a Dictionary[0]
parcelFileDirectoryCache = a Dictionary[0]
Arguments:
aBlock = BlockClosure [] in CodeComponent>>loadFrom:using:
componentSource = 'SmallWikiI18N.pcl'
Temporaries:
acceptAbsentClassImports = false
componentName = 'SmallWikiI18N.pcl'
Context PC = 22
----------------------------------------------------------------------
Parcel(CodeComponent)>>loadFrom:using:
Receiver:
a Parcel
Instance Variables:
name = nil
properties = an IdentityDictionary[1]
definedObjects = an IdentitySet[0]
definedClasses = an IdentitySet[0]
definedBindings = an IdentityDictionary[0]
classSelectors = an IdentityDictionary[0]
namedObjects = a Dictionary[0]
dirty = false
loaded = false
Arguments:
aSource = 'SmallWikiI18N.pcl'
aCodeReader = a CodeReader
Context PC = 11
----------------------------------------------------------------------
Parcel(CodeComponent)>>loadFrom:
Receiver:
a Parcel
Instance Variables:
name = nil
properties = an IdentityDictionary[1]
definedObjects = an IdentitySet[0]
definedClasses = an IdentitySet[0]
definedBindings = an IdentityDictionary[0]
classSelectors = an IdentityDictionary[0]
namedObjects = a Dictionary[0]
dirty = false
loaded = false
Arguments:
aSource = 'SmallWikiI18N.pcl'
Context PC = 7
----------------------------------------------------------------------
optimized [] in [] in [] in Parcel class>>loadParcelCachedFrom:
Receiver:
an UndefinedObject
Temporaries:
loadedParcel = Parcel parcelNamed: nil
.aStringOrFilename = 'SmallWikiI18N.pcl'
Context PC = 7
----------------------------------------------------------------------
BlockClosure>>on:do:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in [] in [] in Parcel
class>>loadParcelCachedFrom:
outerContext = nil
copiedValues = an Array[2]
Arguments:
anExceptionSelector = QueryNotification
handlerBlock = BlockClosure [] in [] in [] in Parcel
class>>loadParcelCachedFrom:
Context PC = 18
----------------------------------------------------------------------
optimized [] in [] in Parcel class>>loadParcelCachedFrom:
Receiver:
an UndefinedObject
Temporaries:
loadedParcel = Parcel parcelNamed: nil
.aStringOrFilename = 'SmallWikiI18N.pcl'
.loadTag = #parcel->'SmallWikiI18N.pcl'
.self = Parcel
Context PC = 16
----------------------------------------------------------------------
BlockClosure>>on:do:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in [] in Parcel class>>loadParcelCachedFrom:
outerContext = nil
copiedValues = an Array[4]
Arguments:
anExceptionSelector = Parcel abortedActionSignal
handlerBlock = BlockClosure [] in [] in Parcel
class>>loadParcelCachedFrom:
Context PC = 18
----------------------------------------------------------------------
[] in Parcel class>>loadParcelCachedFrom:
Receiver:
a Parcel class
Instance Variables:
superclass = CodeComponent
methodDict = a MethodDictionary[229]
format = 16393
subclasses = nil
instanceVariables = an Array[7]
organization = ('initialize-release' #initialize)
('accessing' #bundleName #bundleName: #packageName #packageName:
#postUnloadBlock #pundleName #summary #toolListIcon #version #version:
#versionString)
('copying' #postCopy)
('printing' #displayString #listEntry #printOn: #putStatsOn:)
('change management' #addBinding:in: #addBinding:in:attributes:
#addClass: #addClass:attributes: #addDoIt: #addNameSpace:
#addNameSpace:attributes: #addSelector:class:
#addSelector:class:attributes: #changeBinding:in:
#changeBinding:in:attributes: #changeClass: #changeClass:attributes:
#changeNameSpace: #changeNameSpace:attributes: #changeSelector:class:
#changeSelector:class:attributes: #changeSelector:class:protocol:
#commentClass: #commentNameSpace: #relocateBinding:from:to:
#relocateClass:from:to: #relocateNameSpace:from:to: #removeBinding:in:
#removeClass: #removeDoIt: #removeEntiretyOfClass: #removeNameSpace:
#removeSelector:class: #renameBinding:in:as: #renameClass:as:
#renameNameSpace:as: #reorganizeClass: #reorganizeClassData:
#reorganizeNameSpace:)
('editing' #addChangeSet: #addChangesToChangeList:
#addClassAndAllSelectors: #addClasses: #addClassesAndAllSelectors:
#addEntiretyOfClass: #addEntiretyOfClasses: #addName:in: #addNames:in:
#addObject: #addObject:named: #addSelector:forClass:
#addSelector:toClass: #addSelectors:forClass: #addStatic:to: #cleanse
#discard #empty #removeChangeSet: #removeClasses:
#removeEntiretyOfClasses: #removeName:in: #removeNames:in:
#removeObject: #removeSelector:forClass: #removeSelectors:forClass:
#removeStatic:from: #undefineClass: #update:with:from:)
('ui' #fileOutAsFor: #saveParcelDialogFor:
#saveParcelDialogFor:preOpen:preSave: #uiForEmpty #uiForRename)
('load/unload' #abortLoadBecause: #abortSaveBecause:
#abortUnloadBecause: #createOrFindExpression #fileIntoFrom: #fileOutOn:
#packageEnvironment #packageUndeclared
#parcelOutOn:withSource:hideOnLoad:republish:backup:
#prerequisitesForLoading #remove #unload)
('queries' #allCallsOn: #allImplementorsOf: #classesAndSelectorsDo:
#containsSelectors:forClass: #danglingReferencesIfUnloadedDo:
#definedAndExtendedClasses #definedBindings #definedBindingsDo:
#definedBindingsFor: #definedClasses #definedClassesDo:
#definedNamesFor: #definedNameSpaces #definedObjects #definedObjectsDo:
#definedOrExtendedClassNamesFor: #definedProtocolsFor:
#definedSelectorsFor: #definedSelectorsFor:andProtocol:
#definedStaticReferences #definedThings #definesClass:
#definesClassOrNameSpace: #definesName:in: #definesObject:
#definesOrExtendsBehavior: #definesOrExtendsClass:
#definesSelector:forClass: #extendedBehaviors #extendedClasses
#extendsBehavior: #extendsClass: #extendsObject: #extensionsDo:
#externalMethodsUsedExclusively #getCategoriesOfClasses
#getChildrenObjects #loadedPrerequisites #methodsDo: #namedObjects
#overridesDo: #unparceledMethodsOfDefinedClasses)
('change set compatibility' #addOtherChange: #atClass:includes:
#atName:includes: #atSelector:class: #changedClasses #propertyChanged:
#propertyChanged:value:)
('testing' #hasCodeOverriddenByOtherParcels
#hasDanglingReferencesIfUnloaded #hasExtendedClasses
#hasExtendedNameSpaces #hasExtensions #hasItselfBeenModified
#hasOverriddenCode #hasUninstalledCode #isDirty #isEmpty #isLoaded
#isParcel #isSaveable #notEmpty)
('private' #adviseManager #checkedActionMethod:
#definedClassesExcludedSelectors #definedClassExcludedSelectors:
#extensionMethods #forPackage:do: #installUninstalledBindings
#installUninstalledClasses #installUninstalledMethods #manager
#markAsClean #markAsDirty #markNotModified #nonMetaClassOf:
#performAction: #postLoad: #setActionMethod:class:selector:
#unloadLogged: #unloadSource #unloadSourceSafely: #writeDefinition:on:
#writeMethods:on: #writeRemovalScriptOn:)
('private-selectors' #classesThatHaveBindings #classesThatHaveSelectors
#hasBindingsFor: #hasSelectorsFor: #objectsThatHaveBindings
#selectorsAt:)
('actions' #executeActionBlock:for:)
('overrides' #comparesTo: #overriddenClass: #overriddenNameSpace:
#overriddenSelector:class: #overriddenStatic:in: #reinstalledClass:
#reinstalledNameSpace: #reinstalledSelector:class:
#reinstalledStatic:in: #removeOverriddenClass:
#removeOverriddenNameSpace: #removeOverriddenSelector:class:
#removeOverriddenStatic:nameSpace:)
('store-utilities' #classOfDbRecord #relatedPackage #relatedParcel)
('store' #asDBRecord #asPackage #asPackageNamed:
#checkPrerequisiteNamed:withVersion:requiredVersion: #copyPropertiesTo:
#moveContentsTo: #traceVersion #traceVersionString)
('private-load/unload' #addSpecialItemsFrom: #doComponentLoadedActions
#doComponentUpdatingActions: #putStoredPropertiesIn:
#queryLoaded:ifLoadedAndOK:ifFail: #removeClass:unloaded:
#removeNameSpace:unloaded: #runClassExtensionPostLoadMethods
#setParcelPropertyFrom:)
('converting' #asParcel)
('private-editing'
#addChangesFor:instanceSelectors:classSelectors:to:bindings:source:)
('Refactoring Browser' #allClassesAndNameSpaces #isUnparceledParcel
#textForItem)
name = #Parcel
classPool = a NameSpaceOfClass[2]
environment = a NameSpace[227]
parcels = a List[63]
classParcelMap = an IdentityDictionary[1782]
parcelFileInfoCache = a Dictionary[0]
parcelFileDirectoryCache = a Dictionary[0]
Temporaries:
loadedParcel = Parcel parcelNamed: nil
.aStringOrFilename = 'SmallWikiI18N.pcl'
.loadTag = #parcel->'SmallWikiI18N.pcl'
.self = Parcel
Context PC = 20
----------------------------------------------------------------------
BlockClosure>>ensure:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in Parcel class>>loadParcelCachedFrom:
outerContext = Parcel class>>loadParcelCachedFrom:
copiedValues = an Array[4]
Arguments:
aBlock = BlockClosure [] in Parcel class>>loadParcelCachedFrom:
Temporaries:
result = nil
Context PC = 4
----------------------------------------------------------------------
Parcel class>>loadParcelCachedFrom:
Receiver:
a Parcel class
Instance Variables:
superclass = CodeComponent
methodDict = a MethodDictionary[229]
format = 16393
subclasses = nil
instanceVariables = an Array[7]
organization = ('initialize-release' #initialize)
('accessing' #bundleName #bundleName: #packageName #packageName:
#postUnloadBlock #pundleName #summary #toolListIcon #version #version:
#versionString)
('copying' #postCopy)
('printing' #displayString #listEntry #printOn: #putStatsOn:)
('change management' #addBinding:in: #addBinding:in:attributes:
#addClass: #addClass:attributes: #addDoIt: #addNameSpace:
#addNameSpace:attributes: #addSelector:class:
#addSelector:class:attributes: #changeBinding:in:
#changeBinding:in:attributes: #changeClass: #changeClass:attributes:
#changeNameSpace: #changeNameSpace:attributes: #changeSelector:class:
#changeSelector:class:attributes: #changeSelector:class:protocol:
#commentClass: #commentNameSpace: #relocateBinding:from:to:
#relocateClass:from:to: #relocateNameSpace:from:to: #removeBinding:in:
#removeClass: #removeDoIt: #removeEntiretyOfClass: #removeNameSpace:
#removeSelector:class: #renameBinding:in:as: #renameClass:as:
#renameNameSpace:as: #reorganizeClass: #reorganizeClassData:
#reorganizeNameSpace:)
('editing' #addChangeSet: #addChangesToChangeList:
#addClassAndAllSelectors: #addClasses: #addClassesAndAllSelectors:
#addEntiretyOfClass: #addEntiretyOfClasses: #addName:in: #addNames:in:
#addObject: #addObject:named: #addSelector:forClass:
#addSelector:toClass: #addSelectors:forClass: #addStatic:to: #cleanse
#discard #empty #removeChangeSet: #removeClasses:
#removeEntiretyOfClasses: #removeName:in: #removeNames:in:
#removeObject: #removeSelector:forClass: #removeSelectors:forClass:
#removeStatic:from: #undefineClass: #update:with:from:)
('ui' #fileOutAsFor: #saveParcelDialogFor:
#saveParcelDialogFor:preOpen:preSave: #uiForEmpty #uiForRename)
('load/unload' #abortLoadBecause: #abortSaveBecause:
#abortUnloadBecause: #createOrFindExpression #fileIntoFrom: #fileOutOn:
#packageEnvironment #packageUndeclared
#parcelOutOn:withSource:hideOnLoad:republish:backup:
#prerequisitesForLoading #remove #unload)
('queries' #allCallsOn: #allImplementorsOf: #classesAndSelectorsDo:
#containsSelectors:forClass: #danglingReferencesIfUnloadedDo:
#definedAndExtendedClasses #definedBindings #definedBindingsDo:
#definedBindingsFor: #definedClasses #definedClassesDo:
#definedNamesFor: #definedNameSpaces #definedObjects #definedObjectsDo:
#definedOrExtendedClassNamesFor: #definedProtocolsFor:
#definedSelectorsFor: #definedSelectorsFor:andProtocol:
#definedStaticReferences #definedThings #definesClass:
#definesClassOrNameSpace: #definesName:in: #definesObject:
#definesOrExtendsBehavior: #definesOrExtendsClass:
#definesSelector:forClass: #extendedBehaviors #extendedClasses
#extendsBehavior: #extendsClass: #extendsObject: #extensionsDo:
#externalMethodsUsedExclusively #getCategoriesOfClasses
#getChildrenObjects #loadedPrerequisites #methodsDo: #namedObjects
#overridesDo: #unparceledMethodsOfDefinedClasses)
('change set compatibility' #addOtherChange: #atClass:includes:
#atName:includes: #atSelector:class: #changedClasses #propertyChanged:
#propertyChanged:value:)
('testing' #hasCodeOverriddenByOtherParcels
#hasDanglingReferencesIfUnloaded #hasExtendedClasses
#hasExtendedNameSpaces #hasExtensions #hasItselfBeenModified
#hasOverriddenCode #hasUninstalledCode #isDirty #isEmpty #isLoaded
#isParcel #isSaveable #notEmpty)
('private' #adviseManager #checkedActionMethod:
#definedClassesExcludedSelectors #definedClassExcludedSelectors:
#extensionMethods #forPackage:do: #installUninstalledBindings
#installUninstalledClasses #installUninstalledMethods #manager
#markAsClean #markAsDirty #markNotModified #nonMetaClassOf:
#performAction: #postLoad: #setActionMethod:class:selector:
#unloadLogged: #unloadSource #unloadSourceSafely: #writeDefinition:on:
#writeMethods:on: #writeRemovalScriptOn:)
('private-selectors' #classesThatHaveBindings #classesThatHaveSelectors
#hasBindingsFor: #hasSelectorsFor: #objectsThatHaveBindings
#selectorsAt:)
('actions' #executeActionBlock:for:)
('overrides' #comparesTo: #overriddenClass: #overriddenNameSpace:
#overriddenSelector:class: #overriddenStatic:in: #reinstalledClass:
#reinstalledNameSpace: #reinstalledSelector:class:
#reinstalledStatic:in: #removeOverriddenClass:
#removeOverriddenNameSpace: #removeOverriddenSelector:class:
#removeOverriddenStatic:nameSpace:)
('store-utilities' #classOfDbRecord #relatedPackage #relatedParcel)
('store' #asDBRecord #asPackage #asPackageNamed:
#checkPrerequisiteNamed:withVersion:requiredVersion: #copyPropertiesTo:
#moveContentsTo: #traceVersion #traceVersionString)
('private-load/unload' #addSpecialItemsFrom: #doComponentLoadedActions
#doComponentUpdatingActions: #putStoredPropertiesIn:
#queryLoaded:ifLoadedAndOK:ifFail: #removeClass:unloaded:
#removeNameSpace:unloaded: #runClassExtensionPostLoadMethods
#setParcelPropertyFrom:)
('converting' #asParcel)
('private-editing'
#addChangesFor:instanceSelectors:classSelectors:to:bindings:source:)
('Refactoring Browser' #allClassesAndNameSpaces #isUnparceledParcel
#textForItem)
name = #Parcel
classPool = a NameSpaceOfClass[2]
environment = a NameSpace[227]
parcels = a List[63]
classParcelMap = an IdentityDictionary[1782]
parcelFileInfoCache = a Dictionary[0]
parcelFileDirectoryCache = a Dictionary[0]
Arguments:
aStringOrFilename = 'SmallWikiI18N.pcl'
Temporaries:
loadedParcel = Parcel parcelNamed: nil
loadTag = #parcel->'SmallWikiI18N.pcl'
Context PC = 46
----------------------------------------------------------------------
optimized [] in [] in Parcel class>>loadParcelFrom:
Receiver:
an UndefinedObject
Temporaries:
.self = Parcel
.aStringOrFilename = 'SmallWikiI18N.pcl'
newParcel = nil
Context PC = 7
----------------------------------------------------------------------
BlockClosure>>ensure:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in [] in Parcel class>>loadParcelFrom:
outerContext = nil
copiedValues = an Array[3]
Arguments:
aBlock = BlockClosure [] in Parcel class>>withFileCachesDo:
Temporaries:
result = nil
Context PC = 4
----------------------------------------------------------------------
Parcel class>>withFileCachesDo:
Receiver:
a Parcel class
Instance Variables:
superclass = CodeComponent
methodDict = a MethodDictionary[229]
format = 16393
subclasses = nil
instanceVariables = an Array[7]
organization = ('initialize-release' #initialize)
('accessing' #bundleName #bundleName: #packageName #packageName:
#postUnloadBlock #pundleName #summary #toolListIcon #version #version:
#versionString)
('copying' #postCopy)
('printing' #displayString #listEntry #printOn: #putStatsOn:)
('change management' #addBinding:in: #addBinding:in:attributes:
#addClass: #addClass:attributes: #addDoIt: #addNameSpace:
#addNameSpace:attributes: #addSelector:class:
#addSelector:class:attributes: #changeBinding:in:
#changeBinding:in:attributes: #changeClass: #changeClass:attributes:
#changeNameSpace: #changeNameSpace:attributes: #changeSelector:class:
#changeSelector:class:attributes: #changeSelector:class:protocol:
#commentClass: #commentNameSpace: #relocateBinding:from:to:
#relocateClass:from:to: #relocateNameSpace:from:to: #removeBinding:in:
#removeClass: #removeDoIt: #removeEntiretyOfClass: #removeNameSpace:
#removeSelector:class: #renameBinding:in:as: #renameClass:as:
#renameNameSpace:as: #reorganizeClass: #reorganizeClassData:
#reorganizeNameSpace:)
('editing' #addChangeSet: #addChangesToChangeList:
#addClassAndAllSelectors: #addClasses: #addClassesAndAllSelectors:
#addEntiretyOfClass: #addEntiretyOfClasses: #addName:in: #addNames:in:
#addObject: #addObject:named: #addSelector:forClass:
#addSelector:toClass: #addSelectors:forClass: #addStatic:to: #cleanse
#discard #empty #removeChangeSet: #removeClasses:
#removeEntiretyOfClasses: #removeName:in: #removeNames:in:
#removeObject: #removeSelector:forClass: #removeSelectors:forClass:
#removeStatic:from: #undefineClass: #update:with:from:)
('ui' #fileOutAsFor: #saveParcelDialogFor:
#saveParcelDialogFor:preOpen:preSave: #uiForEmpty #uiForRename)
('load/unload' #abortLoadBecause: #abortSaveBecause:
#abortUnloadBecause: #createOrFindExpression #fileIntoFrom: #fileOutOn:
#packageEnvironment #packageUndeclared
#parcelOutOn:withSource:hideOnLoad:republish:backup:
#prerequisitesForLoading #remove #unload)
('queries' #allCallsOn: #allImplementorsOf: #classesAndSelectorsDo:
#containsSelectors:forClass: #danglingReferencesIfUnloadedDo:
#definedAndExtendedClasses #definedBindings #definedBindingsDo:
#definedBindingsFor: #definedClasses #definedClassesDo:
#definedNamesFor: #definedNameSpaces #definedObjects #definedObjectsDo:
#definedOrExtendedClassNamesFor: #definedProtocolsFor:
#definedSelectorsFor: #definedSelectorsFor:andProtocol:
#definedStaticReferences #definedThings #definesClass:
#definesClassOrNameSpace: #definesName:in: #definesObject:
#definesOrExtendsBehavior: #definesOrExtendsClass:
#definesSelector:forClass: #extendedBehaviors #extendedClasses
#extendsBehavior: #extendsClass: #extendsObject: #extensionsDo:
#externalMethodsUsedExclusively #getCategoriesOfClasses
#getChildrenObjects #loadedPrerequisites #methodsDo: #namedObjects
#overridesDo: #unparceledMethodsOfDefinedClasses)
('change set compatibility' #addOtherChange: #atClass:includes:
#atName:includes: #atSelector:class: #changedClasses #propertyChanged:
#propertyChanged:value:)
('testing' #hasCodeOverriddenByOtherParcels
#hasDanglingReferencesIfUnloaded #hasExtendedClasses
#hasExtendedNameSpaces #hasExtensions #hasItselfBeenModified
#hasOverriddenCode #hasUninstalledCode #isDirty #isEmpty #isLoaded
#isParcel #isSaveable #notEmpty)
('private' #adviseManager #checkedActionMethod:
#definedClassesExcludedSelectors #definedClassExcludedSelectors:
#extensionMethods #forPackage:do: #installUninstalledBindings
#installUninstalledClasses #installUninstalledMethods #manager
#markAsClean #markAsDirty #markNotModified #nonMetaClassOf:
#performAction: #postLoad: #setActionMethod:class:selector:
#unloadLogged: #unloadSource #unloadSourceSafely: #writeDefinition:on:
#writeMethods:on: #writeRemovalScriptOn:)
('private-selectors' #classesThatHaveBindings #classesThatHaveSelectors
#hasBindingsFor: #hasSelectorsFor: #objectsThatHaveBindings
#selectorsAt:)
('actions' #executeActionBlock:for:)
('overrides' #comparesTo: #overriddenClass: #overriddenNameSpace:
#overriddenSelector:class: #overriddenStatic:in: #reinstalledClass:
#reinstalledNameSpace: #reinstalledSelector:class:
#reinstalledStatic:in: #removeOverriddenClass:
#removeOverriddenNameSpace: #removeOverriddenSelector:class:
#removeOverriddenStatic:nameSpace:)
('store-utilities' #classOfDbRecord #relatedPackage #relatedParcel)
('store' #asDBRecord #asPackage #asPackageNamed:
#checkPrerequisiteNamed:withVersion:requiredVersion: #copyPropertiesTo:
#moveContentsTo: #traceVersion #traceVersionString)
('private-load/unload' #addSpecialItemsFrom: #doComponentLoadedActions
#doComponentUpdatingActions: #putStoredPropertiesIn:
#queryLoaded:ifLoadedAndOK:ifFail: #removeClass:unloaded:
#removeNameSpace:unloaded: #runClassExtensionPostLoadMethods
#setParcelPropertyFrom:)
('converting' #asParcel)
('private-editing'
#addChangesFor:instanceSelectors:classSelectors:to:bindings:source:)
('Refactoring Browser' #allClassesAndNameSpaces #isUnparceledParcel
#textForItem)
name = #Parcel
classPool = a NameSpaceOfClass[2]
environment = a NameSpace[227]
parcels = a List[63]
classParcelMap = an IdentityDictionary[1782]
parcelFileInfoCache = a Dictionary[0]
parcelFileDirectoryCache = a Dictionary[0]
Arguments:
aBlock = BlockClosure [] in [] in Parcel class>>loadParcelFrom:
Context PC = 20
----------------------------------------------------------------------
optimized [] in Parcel class>>loadParcelFrom:
Receiver:
an UndefinedObject
Temporaries:
.self = Parcel
.aStringOrFilename = 'SmallWikiI18N.pcl'
newParcel = nil
Context PC = 12
----------------------------------------------------------------------
Cursor>>showWhile:
Receiver:
a Cursor
Instance Variables:
errorCode = 0
handle = a ByteArray[4]
image = Depth1Image(extent: 16@16 depth: 1)
mask = Depth1Image(extent: 16@16 depth: 1)
hotSpot = 0@0
name = 'wait'
Arguments:
aBlock = BlockClosure [] in Parcel class>>loadParcelFrom:
Temporaries:
oldcursor = Cursor wait
Context PC = 13
----------------------------------------------------------------------
Parcel class>>loadParcelFrom:
Receiver:
a Parcel class
Instance Variables:
superclass = CodeComponent
methodDict = a MethodDictionary[229]
format = 16393
subclasses = nil
instanceVariables = an Array[7]
organization = ('initialize-release' #initialize)
('accessing' #bundleName #bundleName: #packageName #packageName:
#postUnloadBlock #pundleName #summary #toolListIcon #version #version:
#versionString)
('copying' #postCopy)
('printing' #displayString #listEntry #printOn: #putStatsOn:)
('change management' #addBinding:in: #addBinding:in:attributes:
#addClass: #addClass:attributes: #addDoIt: #addNameSpace:
#addNameSpace:attributes: #addSelector:class:
#addSelector:class:attributes: #changeBinding:in:
#changeBinding:in:attributes: #changeClass: #changeClass:attributes:
#changeNameSpace: #changeNameSpace:attributes: #changeSelector:class:
#changeSelector:class:attributes: #changeSelector:class:protocol:
#commentClass: #commentNameSpace: #relocateBinding:from:to:
#relocateClass:from:to: #relocateNameSpace:from:to: #removeBinding:in:
#removeClass: #removeDoIt: #removeEntiretyOfClass: #removeNameSpace:
#removeSelector:class: #renameBinding:in:as: #renameClass:as:
#renameNameSpace:as: #reorganizeClass: #reorganizeClassData:
#reorganizeNameSpace:)
('editing' #addChangeSet: #addChangesToChangeList:
#addClassAndAllSelectors: #addClasses: #addClassesAndAllSelectors:
#addEntiretyOfClass: #addEntiretyOfClasses: #addName:in: #addNames:in:
#addObject: #addObject:named: #addSelector:forClass:
#addSelector:toClass: #addSelectors:forClass: #addStatic:to: #cleanse
#discard #empty #removeChangeSet: #removeClasses:
#removeEntiretyOfClasses: #removeName:in: #removeNames:in:
#removeObject: #removeSelector:forClass: #removeSelectors:forClass:
#removeStatic:from: #undefineClass: #update:with:from:)
('ui' #fileOutAsFor: #saveParcelDialogFor:
#saveParcelDialogFor:preOpen:preSave: #uiForEmpty #uiForRename)
('load/unload' #abortLoadBecause: #abortSaveBecause:
#abortUnloadBecause: #createOrFindExpression #fileIntoFrom: #fileOutOn:
#packageEnvironment #packageUndeclared
#parcelOutOn:withSource:hideOnLoad:republish:backup:
#prerequisitesForLoading #remove #unload)
('queries' #allCallsOn: #allImplementorsOf: #classesAndSelectorsDo:
#containsSelectors:forClass: #danglingReferencesIfUnloadedDo:
#definedAndExtendedClasses #definedBindings #definedBindingsDo:
#definedBindingsFor: #definedClasses #definedClassesDo:
#definedNamesFor: #definedNameSpaces #definedObjects #definedObjectsDo:
#definedOrExtendedClassNamesFor: #definedProtocolsFor:
#definedSelectorsFor: #definedSelectorsFor:andProtocol:
#definedStaticReferences #definedThings #definesClass:
#definesClassOrNameSpace: #definesName:in: #definesObject:
#definesOrExtendsBehavior: #definesOrExtendsClass:
#definesSelector:forClass: #extendedBehaviors #extendedClasses
#extendsBehavior: #extendsClass: #extendsObject: #extensionsDo:
#externalMethodsUsedExclusively #getCategoriesOfClasses
#getChildrenObjects #loadedPrerequisites #methodsDo: #namedObjects
#overridesDo: #unparceledMethodsOfDefinedClasses)
('change set compatibility' #addOtherChange: #atClass:includes:
#atName:includes: #atSelector:class: #changedClasses #propertyChanged:
#propertyChanged:value:)
('testing' #hasCodeOverriddenByOtherParcels
#hasDanglingReferencesIfUnloaded #hasExtendedClasses
#hasExtendedNameSpaces #hasExtensions #hasItselfBeenModified
#hasOverriddenCode #hasUninstalledCode #isDirty #isEmpty #isLoaded
#isParcel #isSaveable #notEmpty)
('private' #adviseManager #checkedActionMethod:
#definedClassesExcludedSelectors #definedClassExcludedSelectors:
#extensionMethods #forPackage:do: #installUninstalledBindings
#installUninstalledClasses #installUninstalledMethods #manager
#markAsClean #markAsDirty #markNotModified #nonMetaClassOf:
#performAction: #postLoad: #setActionMethod:class:selector:
#unloadLogged: #unloadSource #unloadSourceSafely: #writeDefinition:on:
#writeMethods:on: #writeRemovalScriptOn:)
('private-selectors' #classesThatHaveBindings #classesThatHaveSelectors
#hasBindingsFor: #hasSelectorsFor: #objectsThatHaveBindings
#selectorsAt:)
('actions' #executeActionBlock:for:)
('overrides' #comparesTo: #overriddenClass: #overriddenNameSpace:
#overriddenSelector:class: #overriddenStatic:in: #reinstalledClass:
#reinstalledNameSpace: #reinstalledSelector:class:
#reinstalledStatic:in: #removeOverriddenClass:
#removeOverriddenNameSpace: #removeOverriddenSelector:class:
#removeOverriddenStatic:nameSpace:)
('store-utilities' #classOfDbRecord #relatedPackage #relatedParcel)
('store' #asDBRecord #asPackage #asPackageNamed:
#checkPrerequisiteNamed:withVersion:requiredVersion: #copyPropertiesTo:
#moveContentsTo: #traceVersion #traceVersionString)
('private-load/unload' #addSpecialItemsFrom: #doComponentLoadedActions
#doComponentUpdatingActions: #putStoredPropertiesIn:
#queryLoaded:ifLoadedAndOK:ifFail: #removeClass:unloaded:
#removeNameSpace:unloaded: #runClassExtensionPostLoadMethods
#setParcelPropertyFrom:)
('converting' #asParcel)
('private-editing'
#addChangesFor:instanceSelectors:classSelectors:to:bindings:source:)
('Refactoring Browser' #allClassesAndNameSpaces #isUnparceledParcel
#textForItem)
name = #Parcel
classPool = a NameSpaceOfClass[2]
environment = a NameSpace[227]
parcels = a List[63]
classParcelMap = an IdentityDictionary[1782]
parcelFileInfoCache = a Dictionary[0]
parcelFileDirectoryCache = a Dictionary[0]
Arguments:
aStringOrFilename = 'SmallWikiI18N.pcl'
Temporaries:
newParcel = nil
Context PC = 15
----------------------------------------------------------------------
optimized [] in ParcelManager>>loadParcelFromFile
Receiver:
an UndefinedObject
Temporaries:
.filename = 'SmallWikiI18N.pcl'
parcel = nil
Context PC = 6
----------------------------------------------------------------------
optimized [] in [] in Notice class>>show:while:
Receiver:
an UndefinedObject
Temporaries:
.aBlock = BlockClosure [] in ParcelManager>>loadParcelFromFile
result = an UIBuilder
babyWindow = an ApplicationWindow 11488
babyWindowManager = a WindowManager
Context PC = 5
----------------------------------------------------------------------
BlockClosure>>ensure:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in [] in Notice class>>show:while:
outerContext = nil
copiedValues = an Array[2]
Arguments:
aBlock = BlockClosure [] in Cursor>>showWhile:
Temporaries:
result = nil
Context PC = 4
----------------------------------------------------------------------
Cursor>>showWhile:
Receiver:
a Cursor
Instance Variables:
errorCode = 0
handle = a ByteArray[4]
image = Depth1Image(extent: 16@16 depth: 1)
mask = Depth1Image(extent: 16@16 depth: 1)
hotSpot = 0@0
name = 'wait'
Arguments:
aBlock = BlockClosure [] in [] in Notice class>>show:while:
Temporaries:
oldcursor = Cursor normal
Context PC = 23
----------------------------------------------------------------------
optimized [] in Notice class>>show:while:
Receiver:
an UndefinedObject
Temporaries:
.baby = a Notice
result = an UIBuilder
babyWindow = an ApplicationWindow 11488
babyWindowManager = a WindowManager
.aBlock = BlockClosure [] in ParcelManager>>loadParcelFromFile
Context PC = 48
----------------------------------------------------------------------
BlockClosure>>ensure:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in Notice class>>show:while:
outerContext = nil
copiedValues = an Array[3]
Arguments:
aBlock = BlockClosure [] in Notice class>>show:while:
Temporaries:
result = nil
Context PC = 4
----------------------------------------------------------------------
Notice class>>show:while:
Receiver:
a Notice class
Instance Variables:
superclass = ApplicationModel
methodDict = a MethodDictionary[9]
format = 16390
subclasses = nil
instanceVariables = an Array[2]
organization = ('interface opening' #postOpenWith:)
('aspects' #message: #notice #show: #textView)
('updating' #changedMessages)
('private' #invokePostOpen #on:)
('interface closing' #requestForWindowClose)
name = #Notice
classPool = a NameSpaceOfClass[0]
environment = a NameSpace[568]
savedWindowInformation = an IdentityDictionary[0]
Arguments:
aStringOrUserMessage = 'Loading Parcel from file
SmallWikiI18N.pcl'
aBlock = BlockClosure [] in ParcelManager>>loadParcelFromFile
Temporaries:
baby = a Notice
result = an UIBuilder
babyWindow = an ApplicationWindow 11488
babyWindowManager = a WindowManager
Context PC = 27
----------------------------------------------------------------------
ParcelManager>>loadParcelFromFile
Receiver:
a ParcelManager
Instance Variables:
dependents = an ApplicationWindow 8160
builder = an UIBuilder
uiSession = a ControlManager
eventHandlers = nil
categoryHolder = a SelectionInList
parcelHolder = a SelectionInList
detailHolder = a SelectionInList
statusTextHolder = a ValueHolder on: an UserMessage
categorySubapplication = a ParcelFavoritesTool
parcelSubapplication = a ParcelListTool
detailSubapplication = a ParcelCommentTool
selectedGroups = an Array[0]
displayedParcels = an OrderedCollection[0]
selectedParcels = an OrderedCollection[0]
Temporaries:
filename = 'SmallWikiI18N.pcl'
parcel = nil
parcelHandle = nil
Context PC = 37
----------------------------------------------------------------------
Win98MenuBarButtonController(MenuBarButtonController)>>dispatchMenuSymbo
l:
Receiver:
a Win98MenuBarButtonController
Instance Variables:
model = nil
view = a Win98MenuBarButtonView
sensor = a TranslatingSensor
Arguments:
menuSelection = #loadParcelFromFile
Context PC = 38
----------------------------------------------------------------------
Win98MenuBarButtonController(MenuBarButtonController)>>dispatchMenuSelec
tion:
Receiver:
a Win98MenuBarButtonController
Instance Variables:
model = nil
view = a Win98MenuBarButtonView
sensor = a TranslatingSensor
Arguments:
menuSelection = #loadParcelFromFile
Context PC = 21
----------------------------------------------------------------------
optimized [] in MenuBarButtonController>>menuBarActionForMenu:
Receiver:
an UndefinedObject
Temporaries:
valueResult = a MenuItem 'Load Parcel File...'
.self = a Win98MenuBarButtonController
.aMenu = a Menu
Context PC = 35
----------------------------------------------------------------------
BlockClosure>>ensure:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in
MenuBarButtonController>>menuBarActionForMenu:
outerContext = nil
copiedValues = an Array[2]
Arguments:
aBlock = BlockClosure [] in
MenuBarButtonController>>menuBarActionForMenu:
Temporaries:
result = nil
Context PC = 4
----------------------------------------------------------------------
Win98MenuBarButtonController(MenuBarButtonController)>>menuBarActionForM
enu:
Receiver:
a Win98MenuBarButtonController
Instance Variables:
model = nil
view = a Win98MenuBarButtonView
sensor = a TranslatingSensor
Arguments:
aMenu = a Menu
Temporaries:
performer = a ParcelManager
Context PC = 31
----------------------------------------------------------------------
Win98MenuBarButtonController(MenuBarButtonController)>>menuBarAction
Receiver:
a Win98MenuBarButtonController
Instance Variables:
model = nil
view = a Win98MenuBarButtonView
sensor = a TranslatingSensor
Temporaries:
theMenu = a Menu
Context PC = 20
----------------------------------------------------------------------
Win98MenuBarButtonController(MenuBarButtonController)>>redButtonPressedE
vent:
Receiver:
a Win98MenuBarButtonController
Instance Variables:
model = nil
view = a Win98MenuBarButtonView
sensor = a TranslatingSensor
Arguments:
event = a RedButtonPressedEvent
Context PC = 10
----------------------------------------------------------------------
RedButtonPressedEvent>>dispatchTo:
Receiver:
a RedButtonPressedEvent
Instance Variables:
time = 54751907
initiator = an EventDispatcher
window = an ApplicationWindow 8160
state = 1
x = 28
y = 19
gx = 318
gy = 63
buttonNumber = 1
Arguments:
anObject = a Win98MenuBarButtonController
Context PC = 4
----------------------------------------------------------------------
Win98MenuBarButtonController(Controller)>>handleEvent:
Receiver:
a Win98MenuBarButtonController
Instance Variables:
model = nil
view = a Win98MenuBarButtonView
sensor = a TranslatingSensor
Arguments:
event = a RedButtonPressedEvent
Context PC = 4
----------------------------------------------------------------------
EventDispatcher>>dispatch:to:
Receiver:
an EventDispatcher
Instance Variables:
windowController = an ApplicationStandardSystemController
currentMouseConsumer = nil
grabbingMouse = false
keyboardProcessor = a KeyboardProcessor
lastControlObject = a TabControlBarController
trapList = nil
state = nil
repairDamageWhenDebugging = true
flushQueueAfterError = true
distributeEventsWhenDebugging = true
dragDropInProgress = false
dragDropTracker = nil
dispatchUnknownEvents = false
Arguments:
event = a RedButtonPressedEvent
object = a Win98MenuBarButtonController
Temporaries:
tmp = nil
Context PC = 10
----------------------------------------------------------------------
EventDispatcher>>dispatchEvent:
Receiver:
an EventDispatcher
Instance Variables:
windowController = an ApplicationStandardSystemController
currentMouseConsumer = nil
grabbingMouse = false
keyboardProcessor = a KeyboardProcessor
lastControlObject = a TabControlBarController
trapList = nil
state = nil
repairDamageWhenDebugging = true
flushQueueAfterError = true
distributeEventsWhenDebugging = true
dragDropInProgress = false
dragDropTracker = nil
dispatchUnknownEvents = false
Arguments:
event = a RedButtonPressedEvent
Temporaries:
objectWantingControl = a Win98MenuBarButtonController
targetKeyboardProcessor = nil
Context PC = 113
----------------------------------------------------------------------
RedButtonPressedEvent(Event)>>dispatch
Receiver:
a RedButtonPressedEvent
Instance Variables:
time = 54751907
initiator = an EventDispatcher
window = an ApplicationWindow 8160
state = 1
x = 28
y = 19
gx = 318
gy = 63
buttonNumber = 1
Context PC = 16
----------------------------------------------------------------------
RedButtonPressedEvent(Event)>>dispatchForWindowManager:
Receiver:
a RedButtonPressedEvent
Instance Variables:
time = 54751907
initiator = an EventDispatcher
window = an ApplicationWindow 8160
state = 1
x = 28
y = 19
gx = 318
gy = 63
buttonNumber = 1
Arguments:
aWinMgr = a WindowManager
Context PC = 4
----------------------------------------------------------------------
optimized [] in WindowManager>>safelyDispatchForWindowManager:
Receiver:
an UndefinedObject
Temporaries:
.event = a RedButtonPressedEvent
.self = a WindowManager
Context PC = 6
----------------------------------------------------------------------
BlockClosure>>on:do:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in
WindowManager>>safelyDispatchForWindowManager:
outerContext = nil
copiedValues = an Array[2]
Arguments:
anExceptionSelector = BadControllerError
handlerBlock = BlockClosure [] in
WindowManager>>safelyDispatchForWindowManager:
Context PC = 18
----------------------------------------------------------------------
WindowManager>>safelyDispatchForWindowManager:
Receiver:
a WindowManager
Instance Variables:
windows = an OrderedCollection[2]
activeController = a NoticeSystemController
interruptLock = false
outstandingMetaOrDamage = false
modalWindowChain = nil
openInProgress = false
eventQueue = an EventQueue
baseProcess = a Process in Semaphore>>wait
dontFilterEvents = false
Arguments:
event = a RedButtonPressedEvent
Context PC = 13
----------------------------------------------------------------------
WindowManager>>processNextEvent
Receiver:
a WindowManager
Instance Variables:
windows = an OrderedCollection[2]
activeController = a NoticeSystemController
interruptLock = false
outstandingMetaOrDamage = false
modalWindowChain = nil
openInProgress = false
eventQueue = an EventQueue
baseProcess = a Process in Semaphore>>wait
dontFilterEvents = false
Temporaries:
event = a RedButtonPressedEvent
Context PC = 12
----------------------------------------------------------------------
optimized [] in [] in WindowManager>>newProcess
Receiver:
an UndefinedObject
Temporaries:
.self = a WindowManager
Context PC = 13
----------------------------------------------------------------------
BlockClosure>>on:do:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in [] in WindowManager>>newProcess
outerContext = nil
copiedValues = a WindowManager
Arguments:
anExceptionSelector = TerminateException
handlerBlock = BlockClosure [] in [] in WindowManager>>newProcess
Context PC = 18
----------------------------------------------------------------------
optimized [] in WindowManager>>newProcess
Receiver:
an UndefinedObject
Temporaries:
.self = a WindowManager
Context PC = 15
----------------------------------------------------------------------
BlockClosure>>on:do:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in WindowManager>>newProcess
outerContext = nil
copiedValues = a WindowManager
Arguments:
anExceptionSelector = TerminateException
handlerBlock = BlockClosure [] in [] in Process
class>>forBlock:priority:
Context PC = 18
----------------------------------------------------------------------
optimized [] in Process class>>forBlock:priority:
Receiver:
an UndefinedObject
Temporaries:
.aBlock = BlockClosure [] in WindowManager>>newProcess
Context PC = 9
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
Is there something wrong with the package? Am I doing something wrong
when loading it? It should be possible just to load it into a current
version of SmallWiki, right?
Cheers,
Lukas
--
Lukas Renggli
http://renggli.freezope.org
19 years, 7 months
[Bug] Renaming page
by Adriaan van Os
You can't change the title of a page by adding or removing a space of
semicolon, or whatever character that is ignored in the structure name.
As a workaround you change the title in two steps by making an extra
change in the first step and remove that again in the second step.
regards,
Adriaan.
19 years, 7 months
i18n for VW SmallWiki
by Koji Yokokawa
Hi,
I made a patch of internationalization for the VisualWorks SmallWiki.
You can set any charset by admin menu with this patch. Then, it encodes
pages by the VisualWorks encoder corresponded with the charset.
I hope this code will be merged into the core packages. How can I
contribute my patch? send it Lukas or publish a bundle on the public
store registry temporally?
--
Koji Yokokawa <yokokawa(a)logical.design.co.jp>
http://yengawa.webhop.org/
19 years, 7 months
Custom syntax
by Frank Shearar
I see the fine manual says
"As Table 2.1 shows, the syntax of SmallWiki is similar to SqueakWiki or
WikiWorks. Changing the grammar of the parser is no big deal, if you are
more familiar with a different one and want to support that. However, as for
all other parsers, it is difficult to write extensions that can be added and
removed independently in order to parse new document entities."
Where can I find tutorials/pointers/whatever on how to change the grammar?
frank
19 years, 7 months
Re: smallwiki howto's
by Lukas Renggli
Hi Adriaan,
> Sorry to bother you at this time with this subject. Do you know if I
> can
> use '[', ']', '<' and '>' in a SmallWiki page? Or else tell me where I
> can
> read this.
> The problem is that I want to describe the syntax of my test tool using
> regular expressions:
>
> <command> <mandatory parameter> [optional parameter]
you can use all special wiki characters by escaping them: that is you
escape them by putting a back-slash in front like \[, \*, \!, ... For <
and > this is slightly different, as they are used to build the xhtml
and are preserved by SmallWiki. You have to write them using
html-syntax: > and <
Actually all the escaping isn't necessary if you use preformatted-text,
maybe want to do this anyway when displaying source-code.
= #( a b c ) do: [ :eaach |
= Transcript show: '<'; show: each; show: '>'; cr ]
Hope this helps,
Lukas
> Preferably it should work within a table.
Escaping works in any context :)
Cheers,
Lukas
--
Lukas Renggli
http://renggli.freezope.org
19 years, 7 months