[Q] "Namespaces" in SmallWiki(1)
by Markus Gaelli
Hi,
as I understood the folders, they can be used like name-spaces, no?
I created a folder "scg" (to mirror our swiki), then there I wanted to
create another folder
"Howtos" for scg-stuff. BUT: howtos was already taken on a higher level.
Is this my misunderstanding or a bug? How should I proceed?
Cheers,
Markus
18 years, 10 months
- 2
- 2
[SW2] Some new features
by David Röthlisberger
Hello,
There's a new version of SmallWiki 2 available in Cincom store, which fixes
some minor bugs of earlier versions and adds some new features: Links are
now implemented, the same is true for Smilies. There's a new renderer to
search the wiki and two new components are implemented: one can find broken
links in the entire wiki, the other lists all outgoing links.
So the basic things are now implemented and should work, but there are still
a lot of missing things.
Currently I'm working on a new user interface, so if you have some
suggestions / wishes for that, please let me know.
Then I have two questions to Lukas:
- I have noticed that you have removed inst var 'resolver' from
InternalLink, which was there in SW1 and was used to determine the target of
the internal link. Now there's a setting method for the target instead. So
is your intention to set this target every time when a link is created, in
WikiParser>>createLink ? I'm not sure if that's the ways to go because you
haven't done any preparation for that in WikiParser.
- Some components that aren't implemented yet I don't understand. For
instance the NearbyLinksComponent, what should be its purpose? When is a
link "nearby" another? Or the PopularLinksComponent. To implement such a
thing, we need something like an access counter for every page. Is your
intention to add such a counter?
kind regards,
David
18 years, 10 months
- 8
- 14
Tracking who changed what
by Charles A. Monteiro
There does not seem to be an admin view that provides info on whom created
a particular version of a page. For example the admin history view shows:
Title: My Second Page
Modified: July 26, 2004 11:25:17.051 by admin from 127.0.0.1
Version: 24
Document: Edit your page ... *My link>myGif* MOre stuff other stuff stuff
from admin..
The documents are already tagged via their properties with their creator,
I personally would like to see a "creator" or "author" field in the above
view.
-Charles
--
Using Opera's revolutionary e-mail client: http://www.opera.com/m2/
18 years, 10 months
- 1
- 0
Design questions
by Ralph Johnson
We spent a day at Camp Smalltalk working with the old version of SmallWiki
and have been spending some time with the new one.
In the old one, Folder was a subclass of Page. This was reasonable. In the
new one, Page is a subclass of Folder, and this seems wrong. It looks like
Folder is never used, and all Pages can be Folders.
The worst part of the old SmallWiki was the callbacks. They are a horrible
design, virtually impossible to understand. I had hoped that the Seaside
version would fix them, but it didn't. Actions went away, and they weren't
that bad, aside from the callbacks. So, tell us why the Seaside version is
an improvement? In my opinion, it is a big step backward.
One of the bad features of the Seaside version is that actions are performed
in the user interface, not in the model. For example, a page is edited in
the #save version of EditRenderer, but in the accept (or maybe document:)
method of DocumentEditor. It looks like DocumentEditor does not create
history, so the trippy interface does something different from the Seaside
interface. This bug is due partly to bad design. There should be a single
place where documents are edited, like an Action. The model should change
the model.
We got an error in the new SmallWiki whenever we tried to put a new link on
a page. Is there a newer version?
-Ralph Johnson
18 years, 10 months
- 7
- 16
[SW2] First Commit to Cincom Public StORE
by Lukas Renggli
Hi everybody,
I published a first version of SmallWiki 2 to Cincom Public StORE
(SmallWiki2, 1.12, renggli). I hope it loads without troubles :/
Don't expect much! And *don't use it on your production server*, the
model might still change and I won't care about backward compatibility
before reaching the final 2.0 version!
Some of the consideration of the new implementation:
- the model is completely separated from the view: e.g. there is a view
based on Seaside and for demonstration purposes a very simple and buggy
one on the trippy-inspector framework.
- the model of the structure has been refined to allow better
versioning, external storage, etc.
- even better extensibility ;)
- the model of the document and the parser has been improved to allow a
more generic use of the entities: smilies, code are now possible within
headings and links; links are now possible within headings, etc.
- the parser tests have been improved and all the production rules are
covered now.
- the old model is easily transformable into the new one by writing a
visitor (not proven yet, but I expect it to be very easy).
I'm looking for any comments and feedback on the new implementation.
I'm looking for people as well that are willing to help and/or comment
in the following areas:
- Improving the model.
- Writing more tests.
- Improving the Renderers: e.g. error-checking, more functionality,
better user experience, etc.
creating a nice userinterface.
- Finish the existing but incomplete and add more subclasses to
WikiComponent. Currently most of them are empty classes without any
useful functunatliy.
- Improving the trippy-inspector wiki, that is nice to use but
currently badly implemented.
- A SmallWiki 1 to SmallWiki 2 model convertor.
Cheers,
Lukas
--
Lukas Renggli
http://renggli.freezope.org
18 years, 10 months
- 4
- 6
Bernish SmallWikiers....
by stéphane ducasse
Hi guys
lukas was planning to come to present his results about SW2.
Lukas what is a good date for you?
Stef
18 years, 10 months
- 1
- 0
clear text passwords
by Charles A. Monteiro
Talking about security, it would be nice not to have unecrypted passwords
fly into the wiki. I noticed that Swazoo has apparently support for SSL
i.e https. Therefore, I was wondering if it is feasible to run the wiki
under https or to at least login into the wiki via https and once the user
is authenticated to re-direct to the normal wiki. My main concern is just
the clear text passwords. Of course, the next question is does Seaside
have any support for https?
thanks
Charles
--
Using Opera's revolutionary e-mail client: http://www.opera.com/m2/
18 years, 10 months
- 2
- 1
Security for SmallWiki
by Ralph Johnson
I'd like to have a folder for a particular course. Inside this folder is
another folder called "students", and inside this folder is a folder for
every student in the class. Let's say there are 40 students in the class,
so 40 folders in "students". I want to give each student the ability to
administrate his folder, and to keep other students from reading files.
It appears to me that the only way to do this is to create 40 roles, one for
each student, and to say that role N can administer folder N. This is
because roles are defined relative to structures, but users are global.
What I'd really like to do is to define a role "owner" and to say that user
N has role "owneer" inside folder N, but not in any other folders. However,
I don't think this is possible.
Any comments? Do I really have to create 40 roles? I suppose I can make
an admin action to do this.
-Ralph Johnson
18 years, 10 months
- 1
- 0
Status and question from Camp Smalltalk
by Ralph Johnson
There are half a dozen of us here working on SmallWiki. We spent yesterday
working only with the old version, but a couple of people are going to start
looking at the new version today. We have been mostly focusing on
persistence, and have made good progress.
We are using the "Prevaylor pattern", though of course Smalltalker have done
this long before Java was invented. We are basically keeping a change log
so that we can recover from a crash by restarting the last saved image and
replaying the log. That is not quite complete yet. We also store resources
in the file system, not the image. That is complete.
With the old version, we often found that an action would produce a blank
page. For example, logging in usually did this, and sometimes editing a
page or resource would do this. We are hoping that the new version will fix
this. Is it a known problem with the old version?
-Ralph Johnson
18 years, 10 months
- 2
- 1
Here is the copy stack for bug when loading examples
by Charles A. Monteiro
I have attached the copy stack below. Some sniffing around indicates that:
Apparently upon checking for the pre-reqs to: {'SmallWiki
Examples'-'0.9.26'-10312}
package'SmallWiki' of version: '0.9.49' is found. Then the parcel loading
code and I quote:
"If the parcel is already loaded check its version and bail if its not
acceptable." and it does indeed bail :)
because I have SmallWiki version '0.9.51' loaded i.e. the latest version.
So changing the pre-req to 'SmallWiki Examples' so that it does not
specify a version for SmallWiki would work unless of course it really only
works with version SmallWiki '0.9.49' and not with '0.9.51'.
Please let me know when this has been addressed, I am eager to check out
what is there as far as extensions.
-Charles
---------------------------------------------------------
Unhandled exception: BlockClosure [] in Signal>>newException
Parcel class>>ensureLoadedParcel:withVersion:for:
optimized [] in [] in Parcel
class>>ensureLoadedParcel:withVersion:forPundle:
BlockClosure>>ensure:
Parcel class>>withFileCachesDo:
optimized [] in Parcel class>>ensureLoadedParcel:withVersion:forPundle:
Cursor>>showWhile:
Parcel class>>ensureLoadedParcel:withVersion:forPundle:
optimized [] in Store.Pundle>>checkParcelPrerequisite:version:
BlockClosure>>on:do:
Store.Bundle(Store.Pundle)>>checkParcelPrerequisite:version:
Store.Bundle(Store.Pundle)>>checkPrerequisite:name:version:
[] in Store.Bundle(Store.Pundle)>>checkPrerequisites
Array(SequenceableCollection)>>do:
Store.Bundle(Store.Pundle)>>checkPrerequisites
Store.BundleModel class>>loadFromDB:within:
optimized [] in Store.BundleModel class>>newFromDB:within:
BlockClosure>>on:do:
Store.BundleModel class>>newFromDB:within:
Store.Bundle>>loadSrcWithin:
optimized [] in [] in Store.Bundle>>loadSrc
BlockClosure>>on:do:
optimized [] in Store.Bundle>>loadSrc
optimized [] in [] in [] in [] in [] in Notice
class>>showNotice:complete:while:title:
BlockClosure>>ensure:
Cursor>>showWhile:
optimized [] in [] in [] in [] in Notice
class>>showNotice:complete:while:title:
BlockClosure>>on:do:
optimized [] in [] in [] in Notice class>>showNotice:complete:while:title:
BlockClosure>>on:do:
optimized [] in [] in Notice class>>showNotice:complete:while:title:
BlockClosure>>on:do:
optimized [] in Notice class>>showNotice:complete:while:title:
BlockClosure>>ensure:
Notice class>>showNotice:complete:while:title:
Store.Bundle>>loadSrc
Store.Bundle(Store.Pundle)>>loadSrcWithImgPundle:
[] in Store.VersionBrowser(Store.AbstractTool)>>loadPundle
OrderedCollection>>do:
Store.VersionBrowser(Store.AbstractTool)>>loadPundle
Store.MultiSequenceController(SequenceController)>>dispatchMenuSymbol:
Store.MultiSequenceController(SequenceController)>>dispatchMenuSelection:
Store.MultiSequenceController(ControllerWithMenu)>>processMenu:at:centered:
Store.MultiSequenceController(ControllerWithMenu)>>processMenuAt:centered:
Store.MultiSequenceController(ControllerWithMenu)>>yellowButtonPressedEvent:
Store.MultiSequenceController(SequenceController)>>yellowButtonPressedEvent:
YellowButtonPressedEvent>>dispatchTo:
Store.MultiSequenceController(ControllerWithMenu)>>handleEvent:
EventDispatcher>>dispatch:to:
EventDispatcher>>dispatchEvent:
YellowButtonPressedEvent(Event)>>dispatch
YellowButtonPressedEvent(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:
----------------------------------------------------------------------
Parcel class>>ensureLoadedParcel:withVersion: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[58]
classParcelMap = nil
parcelFileInfoCache = a Dictionary[0]
parcelFileDirectoryCache = a Dictionary[0]
Arguments:
parcelName = 'SmallWiki'
versionString = '0.9.49'
codeReaderOrNil = {'SmallWiki Examples'-'0.9.26'-10312}
Temporaries:
aDirectoryOrNil = nil
parcelOrPundle = {SmallWiki}
dirs = nil
found = nil
i = nil
dirName = nil
dir = nil
Context PC = 50
----------------------------------------------------------------------
optimized [] in [] in Parcel
class>>ensureLoadedParcel:withVersion:forPundle:
Receiver:
an UndefinedObject
Temporaries:
.self = Parcel
.parcelName = 'SmallWiki'
.versionString = '0.9.49'
.aPundle = {'SmallWiki Examples'-'0.9.26'-10312}
newParcel = nil
Context PC = 9
----------------------------------------------------------------------
BlockClosure>>ensure:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in [] in Parcel
class>>ensureLoadedParcel:withVersion:forPundle:
outerContext = nil
copiedValues = an Array[5]
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[58]
classParcelMap = nil
parcelFileInfoCache = a Dictionary[0]
parcelFileDirectoryCache = a Dictionary[0]
Arguments:
aBlock = BlockClosure [] in [] in Parcel
class>>ensureLoadedParcel:withVersion:forPundle:
Context PC = 20
----------------------------------------------------------------------
optimized [] in Parcel class>>ensureLoadedParcel:withVersion:forPundle:
Receiver:
an UndefinedObject
Temporaries:
.self = Parcel
.parcelName = 'SmallWiki'
.versionString = '0.9.49'
.aPundle = {'SmallWiki Examples'-'0.9.26'-10312}
newParcel = nil
Context PC = 14
----------------------------------------------------------------------
Cursor>>showWhile:
Receiver:
a Cursor
Instance Variables:
errorCode = 0
handle = 36
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>>ensureLoadedParcel:withVersion:forPundle:
Temporaries:
oldcursor = Cursor wait
Context PC = 13
----------------------------------------------------------------------
Parcel class>>ensureLoadedParcel:withVersion:forPundle:
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[58]
classParcelMap = nil
parcelFileInfoCache = a Dictionary[0]
parcelFileDirectoryCache = a Dictionary[0]
Arguments:
parcelName = 'SmallWiki'
versionString = '0.9.49'
aPundle = {'SmallWiki Examples'-'0.9.26'-10312}
Temporaries:
newParcel = nil
Context PC = 17
----------------------------------------------------------------------
optimized [] in Store.Pundle>>checkParcelPrerequisite:version:
Receiver:
an UndefinedObject
Temporaries:
.reqName = 'SmallWiki'
.reqVersion = '0.9.49'
.self = {'SmallWiki Examples'-'0.9.26'-10312}
Context PC = 9
----------------------------------------------------------------------
BlockClosure>>on:do:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in
Store.Pundle>>checkParcelPrerequisite:version:
outerContext = nil
copiedValues = an Array[3]
Arguments:
anExceptionSelector = Parcel missingParcelSignal
handlerBlock = BlockClosure [] in
Store.Pundle>>checkParcelPrerequisite:version:
Context PC = 18
----------------------------------------------------------------------
Store.Bundle(Store.Pundle)>>checkParcelPrerequisite:version:
Receiver:
a Store.Bundle
Instance Variables:
primaryKey = 10312
name = 'SmallWiki Examples'
timeStamp = 342584266
version = '0.9.26'
userName = 'lukas'
trace = 9469
dbIdentifier = #psql_public_cst
blessingLevel = 20
commentID = 0
propertiesID = 966265
properties = an IdentityDictionary[3]
commentStr = nil
vanguardID = nil
rearguardID = nil
vanguardStr = nil
rearguardStr = nil
contents = a List[7]
Arguments:
reqName = 'SmallWiki'
reqVersion = '0.9.49'
Context PC = 12
----------------------------------------------------------------------
Store.Bundle(Store.Pundle)>>checkPrerequisite:name:version:
Receiver:
a Store.Bundle
Instance Variables:
primaryKey = 10312
name = 'SmallWiki Examples'
timeStamp = 342584266
version = '0.9.26'
userName = 'lukas'
trace = 9469
dbIdentifier = #psql_public_cst
blessingLevel = 20
commentID = 0
propertiesID = 966265
properties = an IdentityDictionary[3]
commentStr = nil
vanguardID = nil
rearguardID = nil
vanguardStr = nil
rearguardStr = nil
contents = a List[7]
Arguments:
reqType = #any
reqName = 'SmallWiki'
reqVersion = '0.9.49'
Temporaries:
pref = #parcelsFirst
message = nil
Context PC = 31
----------------------------------------------------------------------
[] in Store.Bundle(Store.Pundle)>>checkPrerequisites
Receiver:
a Store.Bundle
Instance Variables:
primaryKey = 10312
name = 'SmallWiki Examples'
timeStamp = 342584266
version = '0.9.26'
userName = 'lukas'
trace = 9469
dbIdentifier = #psql_public_cst
blessingLevel = 20
commentID = 0
propertiesID = 966265
properties = an IdentityDictionary[3]
commentStr = nil
vanguardID = nil
rearguardID = nil
vanguardStr = nil
rearguardStr = nil
contents = a List[7]
Arguments:
req = an Array[3]
Temporaries:
.self = {'SmallWiki Examples'-'0.9.26'-10312}
Context PC = 15
----------------------------------------------------------------------
Array(SequenceableCollection)>>do:
Receiver:
an Array
Arguments:
aBlock = BlockClosure [] in Store.Pundle>>checkPrerequisites
Temporaries:
i = 1
Context PC = 19
----------------------------------------------------------------------
Store.Bundle(Store.Pundle)>>checkPrerequisites
Receiver:
a Store.Bundle
Instance Variables:
primaryKey = 10312
name = 'SmallWiki Examples'
timeStamp = 342584266
version = '0.9.26'
userName = 'lukas'
trace = 9469
dbIdentifier = #psql_public_cst
blessingLevel = 20
commentID = 0
propertiesID = 966265
properties = an IdentityDictionary[3]
commentStr = nil
vanguardID = nil
rearguardID = nil
vanguardStr = nil
rearguardStr = nil
contents = a List[7]
Temporaries:
reqs = an Array[1]
Context PC = 17
----------------------------------------------------------------------
Store.BundleModel class>>loadFromDB:within:
Receiver:
a Store.BundleModel class
Instance Variables:
superclass = Store.PundleModel
methodDict = a MethodDictionary[124]
format = 16388
subclasses = nil
instanceVariables = an Array[0]
organization = ('relationships' #relatedBy:)
('printing' #classDescription #describeContents #describeContentsOn:level:
#displayString #fileOutChangesForDb:on:within: #fileOutChangesOn:within:
#printOn: #storeOn:)
('private-file out' #createOrFindExpression #fileOutChangesOn: #fileOutOn:)
('binary storage' #adjustComponents #dbLoadComponentsWithin:)
('initialize-release' #initializeForReconcileWith: #initializeFromDB:
#initializeFromImage: #setContentsFromDB:)
('unloading' #preUnloadChecksFromBundle: #unloadFromImage #unloadLogged:)
('private-change set access' #structureMark)
('public-change set access' #inspectChangeSet)
('accessing-browser' #allClasses #allMetaclasses #allNameSpaces
#dataForNamed: #dataForNamed:andProtocol: #includesDataKey:ownerName:
#includesDefinitionOf: #includesMethod: #includesSelector:class:
#includesSelector:className:meta: #methodsForClassNamed:andProtocol:meta:
#methodsForClassNamed:meta: #protocolsForClassNamed:meta:
#protocolsForDataIn: #toolListIcon)
('accessing' #addItem: #allContainedItems #allItems #anyContainedItems
#changedItemCount #changedItemCountFor: #databaseInformationClass
#descriptionsAndLevels #itemCount #leafDescriptions #leafItems
#pundleChangesClass #structure #structure: #traceBundle
#typeStringForBlessing #uniqueDescriptionsAndLevels)
('private - db storage' #dbContent #dbContentPundleFragments: #storeInDB
#updateFrom:)
('table of contents' #completeTableOfContentsNamed:
#tableOfBundleContentsOn: #tableOfBundleContentsOn:level:
#tableOfBundleContentsOnFile: #tableOfContentsOn: #tableOfContentsOnFile:)
('private-validation' #removeNonexistentComponents
#removeNonexistentComponentsRecursive #validateLoadOrder)
('private' #asDBDescription #classOfDbRecord #comparePackages:
#descriptionClass #dialogForException: #doUnloadFromImage #emergencyUnload
#loadContentsFromDBWithin: #manager #pundlesNotIn:or: #removeComponent:
#validateOkayToPublish)
('queries' #definedBindings #definedClasses
#definedClassesExcludedSelectors #definedNameSpaces #definedObjects
#extensionMethods)
('parcel support' #copyContentsToParcel: #dataNotInParcel:on:
#definedClassesNotInParcel: #definedClassesNotInParcel:on:
#definedNameSpacesNotInParcel: #definedNameSpacesNotInParcel:on:
#methodsNotInParcel:on: #namedObjects
#saveAsParcel:saveStructure:saveLinks:
#saveAsParcel:saveStructure:saveLinks:parcelOptions:
#saveAsParcelFromSpecs:)
('db utilities' #cleanUpOverrides #reconcileWithDb: #setNewTraceTo:)
('private-differences calculation' #computeDiffsBetween:into:
#computeDiffsBetweenDBBundle:into: #modifications #modificationsFor:)
('content management' #addComponent: #allContentCollectionsDo:
#anyContentDescriptions #component:beingRenamedTo: #containedItems
#containedItems: #contentDescriptions #contentDescriptionsFor: #contents)
('compaisons' #comparesTo:)
('testing' #containsDescription: #containsItem: #hasBeenModified
#hasBeenModifiedIn: #hasCodeOverridden #hasExtensions #isBundle #isEmpty
#isLeaf #overridesSelf)
name = #BundleModel
classPool = a NameSpaceOfClass[1]
environment = a NameSpace[218]
Arguments:
aDBBundle = {'SmallWiki Examples'-'0.9.26'-10312}
parentBundle = {'SmallWiki Examples'-'0.9.26'-10312}
Temporaries:
imgBundle = nil
Context PC = 3
----------------------------------------------------------------------
optimized [] in Store.BundleModel class>>newFromDB:within:
Receiver:
an UndefinedObject
Temporaries:
.self = Store.BundleModel
.aDBBundle = {'SmallWiki Examples'-'0.9.26'-10312}
.parentBundle = {'SmallWiki Examples'-'0.9.26'-10312}
Context PC = 8
----------------------------------------------------------------------
BlockClosure>>on:do:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in Store.BundleModel class>>newFromDB:within:
outerContext = nil
copiedValues = an Array[3]
Arguments:
anExceptionSelector = Store.PundleModel emergencyUnloadSignal
handlerBlock = BlockClosure [] in Store.BundleModel
class>>newFromDB:within:
Context PC = 18
----------------------------------------------------------------------
Store.BundleModel class>>newFromDB:within:
Receiver:
a Store.BundleModel class
Instance Variables:
superclass = Store.PundleModel
methodDict = a MethodDictionary[124]
format = 16388
subclasses = nil
instanceVariables = an Array[0]
organization = ('relationships' #relatedBy:)
('printing' #classDescription #describeContents #describeContentsOn:level:
#displayString #fileOutChangesForDb:on:within: #fileOutChangesOn:within:
#printOn: #storeOn:)
('private-file out' #createOrFindExpression #fileOutChangesOn: #fileOutOn:)
('binary storage' #adjustComponents #dbLoadComponentsWithin:)
('initialize-release' #initializeForReconcileWith: #initializeFromDB:
#initializeFromImage: #setContentsFromDB:)
('unloading' #preUnloadChecksFromBundle: #unloadFromImage #unloadLogged:)
('private-change set access' #structureMark)
('public-change set access' #inspectChangeSet)
('accessing-browser' #allClasses #allMetaclasses #allNameSpaces
#dataForNamed: #dataForNamed:andProtocol: #includesDataKey:ownerName:
#includesDefinitionOf: #includesMethod: #includesSelector:class:
#includesSelector:className:meta: #methodsForClassNamed:andProtocol:meta:
#methodsForClassNamed:meta: #protocolsForClassNamed:meta:
#protocolsForDataIn: #toolListIcon)
('accessing' #addItem: #allContainedItems #allItems #anyContainedItems
#changedItemCount #changedItemCountFor: #databaseInformationClass
#descriptionsAndLevels #itemCount #leafDescriptions #leafItems
#pundleChangesClass #structure #structure: #traceBundle
#typeStringForBlessing #uniqueDescriptionsAndLevels)
('private - db storage' #dbContent #dbContentPundleFragments: #storeInDB
#updateFrom:)
('table of contents' #completeTableOfContentsNamed:
#tableOfBundleContentsOn: #tableOfBundleContentsOn:level:
#tableOfBundleContentsOnFile: #tableOfContentsOn: #tableOfContentsOnFile:)
('private-validation' #removeNonexistentComponents
#removeNonexistentComponentsRecursive #validateLoadOrder)
('private' #asDBDescription #classOfDbRecord #comparePackages:
#descriptionClass #dialogForException: #doUnloadFromImage #emergencyUnload
#loadContentsFromDBWithin: #manager #pundlesNotIn:or: #removeComponent:
#validateOkayToPublish)
('queries' #definedBindings #definedClasses
#definedClassesExcludedSelectors #definedNameSpaces #definedObjects
#extensionMethods)
('parcel support' #copyContentsToParcel: #dataNotInParcel:on:
#definedClassesNotInParcel: #definedClassesNotInParcel:on:
#definedNameSpacesNotInParcel: #definedNameSpacesNotInParcel:on:
#methodsNotInParcel:on: #namedObjects
#saveAsParcel:saveStructure:saveLinks:
#saveAsParcel:saveStructure:saveLinks:parcelOptions:
#saveAsParcelFromSpecs:)
('db utilities' #cleanUpOverrides #reconcileWithDb: #setNewTraceTo:)
('private-differences calculation' #computeDiffsBetween:into:
#computeDiffsBetweenDBBundle:into: #modifications #modificationsFor:)
('content management' #addComponent: #allContentCollectionsDo:
#anyContentDescriptions #component:beingRenamedTo: #containedItems
#containedItems: #contentDescriptions #contentDescriptionsFor: #contents)
('compaisons' #comparesTo:)
('testing' #containsDescription: #containsItem: #hasBeenModified
#hasBeenModifiedIn: #hasCodeOverridden #hasExtensions #isBundle #isEmpty
#isLeaf #overridesSelf)
name = #BundleModel
classPool = a NameSpaceOfClass[1]
environment = a NameSpace[218]
Arguments:
aDBBundle = {'SmallWiki Examples'-'0.9.26'-10312}
parentBundle = {'SmallWiki Examples'-'0.9.26'-10312}
Context PC = 19
----------------------------------------------------------------------
Store.Bundle>>loadSrcWithin:
Receiver:
a Store.Bundle
Instance Variables:
primaryKey = 10312
name = 'SmallWiki Examples'
timeStamp = 342584266
version = '0.9.26'
userName = 'lukas'
trace = 9469
dbIdentifier = #psql_public_cst
blessingLevel = 20
commentID = 0
propertiesID = 966265
properties = an IdentityDictionary[3]
commentStr = nil
vanguardID = nil
rearguardID = nil
vanguardStr = nil
rearguardStr = nil
contents = a List[7]
Arguments:
parentBundle = {'SmallWiki Examples'-'0.9.26'-10312}
Context PC = 5
----------------------------------------------------------------------
optimized [] in [] in Store.Bundle>>loadSrc
Receiver:
an UndefinedObject
Temporaries:
.self = {'SmallWiki Examples'-'0.9.26'-10312}
imgBundle = nil
Context PC = 7
----------------------------------------------------------------------
BlockClosure>>on:do:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in [] in Store.Bundle>>loadSrc
outerContext = nil
copiedValues = an Array[2]
Arguments:
anExceptionSelector = RedefinitionNotification
handlerBlock = BlockClosure [] in [] in Store.Bundle>>loadSrc
Context PC = 18
----------------------------------------------------------------------
optimized [] in Store.Bundle>>loadSrc
Receiver:
an UndefinedObject
Temporaries:
.self = {'SmallWiki Examples'-'0.9.26'-10312}
imgBundle = nil
.leafNames = an OrderedCollection[7]
Context PC = 15
----------------------------------------------------------------------
optimized [] in [] in [] in [] in [] in Notice
class>>showNotice:complete:while:title:
Receiver:
an UndefinedObject
Temporaries:
.aBlock = BlockClosure [] in Store.Bundle>>loadSrc
increment = 0.00581395
res = nil
newValue = nil
Context PC = 5
----------------------------------------------------------------------
BlockClosure>>ensure:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in [] in [] in [] in [] in Notice
class>>showNotice:complete:while:title:
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 = 36
image = Depth1Image(extent: 16@16 depth: 1)
mask = Depth1Image(extent: 16@16 depth: 1)
hotSpot = 0@0
name = 'wait'
Arguments:
aBlock = BlockClosure [] in [] in [] in [] in [] in Notice
class>>showNotice:complete:while:title:
Temporaries:
oldcursor = Cursor normal
Context PC = 23
----------------------------------------------------------------------
optimized [] in [] in [] in [] in Notice
class>>showNotice:complete:while:title:
Receiver:
an UndefinedObject
Temporaries:
.aBlock = BlockClosure [] in Store.Bundle>>loadSrc
increment = 0.00581395
res = nil
newValue = nil
Context PC = 13
----------------------------------------------------------------------
BlockClosure>>on:do:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in [] in [] in [] in Notice
class>>showNotice:complete:while:title:
outerContext = nil
copiedValues = an Array[2]
Arguments:
anExceptionSelector = IncrementNotification
handlerBlock = BlockClosure [] in [] in [] in [] in Notice
class>>showNotice:complete:while:title:
Context PC = 18
----------------------------------------------------------------------
optimized [] in [] in [] in Notice class>>showNotice:complete:while:title:
Receiver:
an UndefinedObject
Temporaries:
.aBlock = BlockClosure [] in Store.Bundle>>loadSrc
increment = 0.00581395
res = nil
newValue = nil
.noticeModel = a Notice
.progress = a ValueHolder on: 0.0
.title = 'Store : <1s>%% done'
Context PC = 18
----------------------------------------------------------------------
BlockClosure>>on:do:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in [] in [] in Notice
class>>showNotice:complete:while:title:
outerContext = nil
copiedValues = an Array[5]
Arguments:
anExceptionSelector = MessageNotification
handlerBlock = BlockClosure [] in [] in [] in Notice
class>>showNotice:complete:while:title:
Context PC = 18
----------------------------------------------------------------------
optimized [] in [] in Notice class>>showNotice:complete:while:title:
Receiver:
an UndefinedObject
Temporaries:
.aBlock = BlockClosure [] in Store.Bundle>>loadSrc
increment = 0.00581395
res = nil
newValue = nil
.noticeModel = a Notice
.progress = a ValueHolder on: 0.0
.title = 'Store : <1s>%% done'
Context PC = 18
----------------------------------------------------------------------
BlockClosure>>on:do:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in [] in Notice
class>>showNotice:complete:while:title:
outerContext = nil
copiedValues = an Array[5]
Arguments:
anExceptionSelector = ResetIncrementNotification
handlerBlock = BlockClosure [] in [] in Notice
class>>showNotice:complete:while:title:
Context PC = 18
----------------------------------------------------------------------
optimized [] in Notice class>>showNotice:complete:while:title:
Receiver:
an UndefinedObject
Temporaries:
.aBlock = BlockClosure [] in Store.Bundle>>loadSrc
increment = 0.00581395
res = nil
newValue = nil
.noticeModel = a Notice
.progress = a ValueHolder on: 0.0
.title = 'Store : <1s>%% done'
Context PC = 21
----------------------------------------------------------------------
BlockClosure>>ensure:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in Notice
class>>showNotice:complete:while:title:
outerContext = nil
copiedValues = an Array[5]
Arguments:
aBlock = BlockClosure [] in Notice class>>showNotice:complete:while:title:
Temporaries:
result = nil
Context PC = 4
----------------------------------------------------------------------
Notice class>>showNotice:complete:while:title:
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[560]
savedWindowInformation = an IdentityDictionary[0]
Arguments:
aString = 'Loading SmallWiki Examples(0.9.26,lukas)'
anInteger = 172
aBlock = BlockClosure [] in Store.Bundle>>loadSrc
titleString = 'Store'
Temporaries:
noticeModel = a Notice
int = 172
increment = 0.00581395
progress = a ValueHolder on: 0.0
res = nil
title = 'Store : <1s>%% done'
newValue = nil
Context PC = 125
----------------------------------------------------------------------
Store.Bundle>>loadSrc
Receiver:
a Store.Bundle
Instance Variables:
primaryKey = 10312
name = 'SmallWiki Examples'
timeStamp = 342584266
version = '0.9.26'
userName = 'lukas'
trace = 9469
dbIdentifier = #psql_public_cst
blessingLevel = 20
commentID = 0
propertiesID = 966265
properties = an IdentityDictionary[3]
commentStr = nil
vanguardID = nil
rearguardID = nil
vanguardStr = nil
rearguardStr = nil
contents = a List[7]
Temporaries:
imgBundle = nil
leafNames = an OrderedCollection[7]
Context PC = 30
----------------------------------------------------------------------
Store.Bundle(Store.Pundle)>>loadSrcWithImgPundle:
Receiver:
a Store.Bundle
Instance Variables:
primaryKey = 10312
name = 'SmallWiki Examples'
timeStamp = 342584266
version = '0.9.26'
userName = 'lukas'
trace = 9469
dbIdentifier = #psql_public_cst
blessingLevel = 20
commentID = 0
propertiesID = 966265
properties = an IdentityDictionary[3]
commentStr = nil
vanguardID = nil
rearguardID = nil
vanguardStr = nil
rearguardStr = nil
contents = a List[7]
Arguments:
imgPundle = {SmallWiki Examples}
Context PC = 35
----------------------------------------------------------------------
[] in Store.VersionBrowser(Store.AbstractTool)>>loadPundle
Receiver:
a Store.VersionBrowser
Instance Variables:
dependents = nil
builder = an UIBuilder
uiSession = nil
eventHandlers = nil
versions = a MultiSelectionInList
pundles = an OrderedCollection[1]
labels = a Dictionary[18]
offsets = an Array[3]
comment = a ValueHolder on: '--- Blessed: Development
--- By: lukas
--- On: 06/24/2004 2:37:38.000
'
Arguments:
pundle = {'SmallWiki Examples'-'0.9.26'-10312}
Temporaries:
imgPundle = {SmallWiki Examples}
.msg = '<1s> is not linked to the cur...>Do you want to do that now?'
.self = a Store.VersionBrowser
Context PC = 76
----------------------------------------------------------------------
OrderedCollection>>do:
Receiver:
an OrderedCollection
Instance Variables:
firstIndex = 1
lastIndex = 1
Arguments:
aBlock = BlockClosure [] in Store.AbstractTool>>loadPundle
Temporaries:
index = 1
Context PC = 17
----------------------------------------------------------------------
Store.VersionBrowser(Store.AbstractTool)>>loadPundle
Receiver:
a Store.VersionBrowser
Instance Variables:
dependents = nil
builder = an UIBuilder
uiSession = nil
eventHandlers = nil
versions = a MultiSelectionInList
pundles = an OrderedCollection[1]
labels = a Dictionary[18]
offsets = an Array[3]
comment = a ValueHolder on: '--- Blessed: Development
--- By: lukas
--- On: 06/24/2004 2:37:38.000
'
Temporaries:
msg = '<1s> is not linked to the cur...>Do you want to do that now?'
imgPundle = {SmallWiki Examples}
Context PC = 17
----------------------------------------------------------------------
Store.MultiSequenceController(SequenceController)>>dispatchMenuSymbol:
Receiver:
a Store.MultiSequenceController
Instance Variables:
model = a ValueHolder on: List ({SmallWiki Examples} {'SmallWiki
Examples'-'0.9.26'-10312} {'SmallWiki Examples'-'0.9.25'-9469} {'SmallWiki
Examples'-'0.9.24'-8928} {'SmallWiki Examples'-'0.9.23'-8824} {'SmallWiki
Examples'-'0.9.22'-8704} {'SmallWiki Examples'-'0.9.21'-8611} {'SmallWiki
Examples'-'0.9.20'-8602} {'SmallWiki Examples'-'0.9.19'-8371} {'SmallWiki
Examples'-'0.9.18'-8261} {'SmallWiki Examples'-'0.9.17'-8238} {'SmallWiki
Examples'-'0.9.16'-8123} {'SmallWiki Examples'-'0.9.15'-8117} {'SmallWiki
Examples'-'0.9.14'-7873} {'SmallWiki Examples'-'0.9.6'-7760} {'SmallWiki
Examples'-'0.9.5'-7348} {'SmallWiki Examples'-'0.9.2'-6750} {'SmallWiki
Examples'-'0.9.1'-6731})
view = a MultiSelectionSequenceView
sensor = a TranslatingSensor
menuHolder = a Menu
performer = a Store.VersionBrowser
keyboardProcessor = a KeyboardProcessor
outside = false
searchString = nil
keyboardHook = nil
doStringSearching = true
dispatcher = an UIDispatcher
dragDropCallbacks = nil
selectOnDownWithDrag = false
autoSelect = nil
Arguments:
menuSelection = #loadPundle
Context PC = 7
----------------------------------------------------------------------
Store.MultiSequenceController(SequenceController)>>dispatchMenuSelection:
Receiver:
a Store.MultiSequenceController
Instance Variables:
model = a ValueHolder on: List ({SmallWiki Examples} {'SmallWiki
Examples'-'0.9.26'-10312} {'SmallWiki Examples'-'0.9.25'-9469} {'SmallWiki
Examples'-'0.9.24'-8928} {'SmallWiki Examples'-'0.9.23'-8824} {'SmallWiki
Examples'-'0.9.22'-8704} {'SmallWiki Examples'-'0.9.21'-8611} {'SmallWiki
Examples'-'0.9.20'-8602} {'SmallWiki Examples'-'0.9.19'-8371} {'SmallWiki
Examples'-'0.9.18'-8261} {'SmallWiki Examples'-'0.9.17'-8238} {'SmallWiki
Examples'-'0.9.16'-8123} {'SmallWiki Examples'-'0.9.15'-8117} {'SmallWiki
Examples'-'0.9.14'-7873} {'SmallWiki Examples'-'0.9.6'-7760} {'SmallWiki
Examples'-'0.9.5'-7348} {'SmallWiki Examples'-'0.9.2'-6750} {'SmallWiki
Examples'-'0.9.1'-6731})
view = a MultiSelectionSequenceView
sensor = a TranslatingSensor
menuHolder = a Menu
performer = a Store.VersionBrowser
keyboardProcessor = a KeyboardProcessor
outside = false
searchString = nil
keyboardHook = nil
doStringSearching = true
dispatcher = an UIDispatcher
dragDropCallbacks = nil
selectOnDownWithDrag = false
autoSelect = nil
Arguments:
menuSelection = #loadPundle
Context PC = 14
----------------------------------------------------------------------
Store.MultiSequenceController(ControllerWithMenu)>>processMenu:at:centered:
Receiver:
a Store.MultiSequenceController
Instance Variables:
model = a ValueHolder on: List ({SmallWiki Examples} {'SmallWiki
Examples'-'0.9.26'-10312} {'SmallWiki Examples'-'0.9.25'-9469} {'SmallWiki
Examples'-'0.9.24'-8928} {'SmallWiki Examples'-'0.9.23'-8824} {'SmallWiki
Examples'-'0.9.22'-8704} {'SmallWiki Examples'-'0.9.21'-8611} {'SmallWiki
Examples'-'0.9.20'-8602} {'SmallWiki Examples'-'0.9.19'-8371} {'SmallWiki
Examples'-'0.9.18'-8261} {'SmallWiki Examples'-'0.9.17'-8238} {'SmallWiki
Examples'-'0.9.16'-8123} {'SmallWiki Examples'-'0.9.15'-8117} {'SmallWiki
Examples'-'0.9.14'-7873} {'SmallWiki Examples'-'0.9.6'-7760} {'SmallWiki
Examples'-'0.9.5'-7348} {'SmallWiki Examples'-'0.9.2'-6750} {'SmallWiki
Examples'-'0.9.1'-6731})
view = a MultiSelectionSequenceView
sensor = a TranslatingSensor
menuHolder = a Menu
performer = a Store.VersionBrowser
keyboardProcessor = a KeyboardProcessor
outside = false
searchString = nil
keyboardHook = nil
doStringSearching = true
dispatcher = an UIDispatcher
dragDropCallbacks = nil
selectOnDownWithDrag = false
autoSelect = nil
Arguments:
aMenu = a Menu
aPoint = 823@245
centered = true
Temporaries:
valueResult = a MenuItem 'Load'
Context PC = 41
----------------------------------------------------------------------
Store.MultiSequenceController(ControllerWithMenu)>>processMenuAt:centered:
Receiver:
a Store.MultiSequenceController
Instance Variables:
model = a ValueHolder on: List ({SmallWiki Examples} {'SmallWiki
Examples'-'0.9.26'-10312} {'SmallWiki Examples'-'0.9.25'-9469} {'SmallWiki
Examples'-'0.9.24'-8928} {'SmallWiki Examples'-'0.9.23'-8824} {'SmallWiki
Examples'-'0.9.22'-8704} {'SmallWiki Examples'-'0.9.21'-8611} {'SmallWiki
Examples'-'0.9.20'-8602} {'SmallWiki Examples'-'0.9.19'-8371} {'SmallWiki
Examples'-'0.9.18'-8261} {'SmallWiki Examples'-'0.9.17'-8238} {'SmallWiki
Examples'-'0.9.16'-8123} {'SmallWiki Examples'-'0.9.15'-8117} {'SmallWiki
Examples'-'0.9.14'-7873} {'SmallWiki Examples'-'0.9.6'-7760} {'SmallWiki
Examples'-'0.9.5'-7348} {'SmallWiki Examples'-'0.9.2'-6750} {'SmallWiki
Examples'-'0.9.1'-6731})
view = a MultiSelectionSequenceView
sensor = a TranslatingSensor
menuHolder = a Menu
performer = a Store.VersionBrowser
keyboardProcessor = a KeyboardProcessor
outside = false
searchString = nil
keyboardHook = nil
doStringSearching = true
dispatcher = an UIDispatcher
dragDropCallbacks = nil
selectOnDownWithDrag = false
autoSelect = nil
Arguments:
aPoint = 823@245
centered = true
Context PC = 9
----------------------------------------------------------------------
Store.MultiSequenceController(ControllerWithMenu)>>yellowButtonPressedEvent:
Receiver:
a Store.MultiSequenceController
Instance Variables:
model = a ValueHolder on: List ({SmallWiki Examples} {'SmallWiki
Examples'-'0.9.26'-10312} {'SmallWiki Examples'-'0.9.25'-9469} {'SmallWiki
Examples'-'0.9.24'-8928} {'SmallWiki Examples'-'0.9.23'-8824} {'SmallWiki
Examples'-'0.9.22'-8704} {'SmallWiki Examples'-'0.9.21'-8611} {'SmallWiki
Examples'-'0.9.20'-8602} {'SmallWiki Examples'-'0.9.19'-8371} {'SmallWiki
Examples'-'0.9.18'-8261} {'SmallWiki Examples'-'0.9.17'-8238} {'SmallWiki
Examples'-'0.9.16'-8123} {'SmallWiki Examples'-'0.9.15'-8117} {'SmallWiki
Examples'-'0.9.14'-7873} {'SmallWiki Examples'-'0.9.6'-7760} {'SmallWiki
Examples'-'0.9.5'-7348} {'SmallWiki Examples'-'0.9.2'-6750} {'SmallWiki
Examples'-'0.9.1'-6731})
view = a MultiSelectionSequenceView
sensor = a TranslatingSensor
menuHolder = a Menu
performer = a Store.VersionBrowser
keyboardProcessor = a KeyboardProcessor
outside = false
searchString = nil
keyboardHook = nil
doStringSearching = true
dispatcher = an UIDispatcher
dragDropCallbacks = nil
selectOnDownWithDrag = false
autoSelect = nil
Arguments:
event = a YellowButtonPressedEvent
Context PC = 13
----------------------------------------------------------------------
Store.MultiSequenceController(SequenceController)>>yellowButtonPressedEvent:
Receiver:
a Store.MultiSequenceController
Instance Variables:
model = a ValueHolder on: List ({SmallWiki Examples} {'SmallWiki
Examples'-'0.9.26'-10312} {'SmallWiki Examples'-'0.9.25'-9469} {'SmallWiki
Examples'-'0.9.24'-8928} {'SmallWiki Examples'-'0.9.23'-8824} {'SmallWiki
Examples'-'0.9.22'-8704} {'SmallWiki Examples'-'0.9.21'-8611} {'SmallWiki
Examples'-'0.9.20'-8602} {'SmallWiki Examples'-'0.9.19'-8371} {'SmallWiki
Examples'-'0.9.18'-8261} {'SmallWiki Examples'-'0.9.17'-8238} {'SmallWiki
Examples'-'0.9.16'-8123} {'SmallWiki Examples'-'0.9.15'-8117} {'SmallWiki
Examples'-'0.9.14'-7873} {'SmallWiki Examples'-'0.9.6'-7760} {'SmallWiki
Examples'-'0.9.5'-7348} {'SmallWiki Examples'-'0.9.2'-6750} {'SmallWiki
Examples'-'0.9.1'-6731})
view = a MultiSelectionSequenceView
sensor = a TranslatingSensor
menuHolder = a Menu
performer = a Store.VersionBrowser
keyboardProcessor = a KeyboardProcessor
outside = false
searchString = nil
keyboardHook = nil
doStringSearching = true
dispatcher = an UIDispatcher
dragDropCallbacks = nil
selectOnDownWithDrag = false
autoSelect = nil
Arguments:
event = a YellowButtonPressedEvent
Context PC = 19
----------------------------------------------------------------------
YellowButtonPressedEvent>>dispatchTo:
Receiver:
a YellowButtonPressedEvent
Instance Variables:
time = 8827625
initiator = an EventDispatcher
window = an ApplicationWindow 182
state = 2
x = 286
y = 72
gx = 823
gy = 245
buttonNumber = 2
Arguments:
anObject = a Store.MultiSequenceController
Context PC = 4
----------------------------------------------------------------------
Store.MultiSequenceController(ControllerWithMenu)>>handleEvent:
Receiver:
a Store.MultiSequenceController
Instance Variables:
model = a ValueHolder on: List ({SmallWiki Examples} {'SmallWiki
Examples'-'0.9.26'-10312} {'SmallWiki Examples'-'0.9.25'-9469} {'SmallWiki
Examples'-'0.9.24'-8928} {'SmallWiki Examples'-'0.9.23'-8824} {'SmallWiki
Examples'-'0.9.22'-8704} {'SmallWiki Examples'-'0.9.21'-8611} {'SmallWiki
Examples'-'0.9.20'-8602} {'SmallWiki Examples'-'0.9.19'-8371} {'SmallWiki
Examples'-'0.9.18'-8261} {'SmallWiki Examples'-'0.9.17'-8238} {'SmallWiki
Examples'-'0.9.16'-8123} {'SmallWiki Examples'-'0.9.15'-8117} {'SmallWiki
Examples'-'0.9.14'-7873} {'SmallWiki Examples'-'0.9.6'-7760} {'SmallWiki
Examples'-'0.9.5'-7348} {'SmallWiki Examples'-'0.9.2'-6750} {'SmallWiki
Examples'-'0.9.1'-6731})
view = a MultiSelectionSequenceView
sensor = a TranslatingSensor
menuHolder = a Menu
performer = a Store.VersionBrowser
keyboardProcessor = a KeyboardProcessor
outside = false
searchString = nil
keyboardHook = nil
doStringSearching = true
dispatcher = an UIDispatcher
dragDropCallbacks = nil
selectOnDownWithDrag = false
autoSelect = nil
Arguments:
anEvent = a YellowButtonPressedEvent
Context PC = 33
----------------------------------------------------------------------
EventDispatcher>>dispatch:to:
Receiver:
an EventDispatcher
Instance Variables:
windowController = an ApplicationStandardSystemController
currentMouseConsumer = nil
grabbingMouse = false
keyboardProcessor = a KeyboardProcessor
lastControlObject = a Store.MultiSequenceController
trapList = nil
state = #debugging
repairDamageWhenDebugging = true
flushQueueAfterError = true
distributeEventsWhenDebugging = true
dragDropInProgress = false
dragDropTracker = nil
dispatchUnknownEvents = false
Arguments:
event = a YellowButtonPressedEvent
object = a Store.MultiSequenceController
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 Store.MultiSequenceController
trapList = nil
state = #debugging
repairDamageWhenDebugging = true
flushQueueAfterError = true
distributeEventsWhenDebugging = true
dragDropInProgress = false
dragDropTracker = nil
dispatchUnknownEvents = false
Arguments:
event = a YellowButtonPressedEvent
Temporaries:
objectWantingControl = a Store.MultiSequenceController
targetKeyboardProcessor = nil
Context PC = 113
----------------------------------------------------------------------
YellowButtonPressedEvent(Event)>>dispatch
Receiver:
a YellowButtonPressedEvent
Instance Variables:
time = 8827625
initiator = an EventDispatcher
window = an ApplicationWindow 182
state = 2
x = 286
y = 72
gx = 823
gy = 245
buttonNumber = 2
Context PC = 16
----------------------------------------------------------------------
YellowButtonPressedEvent(Event)>>dispatchForWindowManager:
Receiver:
a YellowButtonPressedEvent
Instance Variables:
time = 8827625
initiator = an EventDispatcher
window = an ApplicationWindow 182
state = 2
x = 286
y = 72
gx = 823
gy = 245
buttonNumber = 2
Arguments:
aWinMgr = a WindowManager
Context PC = 4
----------------------------------------------------------------------
optimized [] in WindowManager>>safelyDispatchForWindowManager:
Receiver:
an UndefinedObject
Temporaries:
.event = a YellowButtonPressedEvent
.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 = an ApplicationStandardSystemController
interruptLock = false
outstandingMetaOrDamage = false
modalWindowChain = nil
openInProgress = false
eventQueue = an EventQueue
baseProcess = a Process in Semaphore>>wait
dontFilterEvents = false
Arguments:
event = a YellowButtonPressedEvent
Context PC = 13
----------------------------------------------------------------------
WindowManager>>processNextEvent
Receiver:
a WindowManager
Instance Variables:
windows = an OrderedCollection[2]
activeController = an ApplicationStandardSystemController
interruptLock = false
outstandingMetaOrDamage = false
modalWindowChain = nil
openInProgress = false
eventQueue = an EventQueue
baseProcess = a Process in Semaphore>>wait
dontFilterEvents = false
Temporaries:
event = a YellowButtonPressedEvent
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
--
Using Opera's revolutionary e-mail client: http://www.opera.com/m2/
18 years, 10 months
- 2
- 2