[Seaside] Seaside 2.8a1-lr.518 - VW7.6 27 - weird thing happening

[Stefan Schmiedl]

On Tue, 02 Sep 2008 17:26:50 +0200
Claus Kick <claus_kick at web.de> wrote:

> Philippe Marschall wrote:
> > Can't you commit your code, then build a new image and load your code again?
> 
> I will probably have to do something like that, yes. *Shudders*

hmmm.... my advice for you:

If this makes you shudder, automate it so you don't have to care about
it anymore.

As you're using VisualWorks, let me offer some inspiration with the
following script. Call it via "visual.im -fileIn builder.st" to get a
new image store.im containing some stuff. The rest is mostly copy and
paste...


Snapshot new saveAs: 'store' thenQuit: false.
!
Parcel
  loadParcelByName: 'StoreForPostgreSQL';
  loadParcelByName: 'ProgrammingExtensions';
  loadParcelByName: 'RBSUnitExtensions';
  loadParcelByName: 'Method-History';
  loadParcelByName: 'RBRegexExtensions';
  loadParcelByName: 'ODBCEXDI';
  loadParcelByName: 'ODBCThapiEXDI';
  loadParcelByName: 'AutoComplete';
  loadParcelByName: 'NewPrerequisiteEngine';
  loadParcelByName: 'Out';
  loadParcelByName: 'RBSpawnPackageBrowser'.
!
"load saved repository accounts from repository.xml"
Store.RepositoryManager importRepositoriesFromStream: 
  ('repositories.xml' asFilename withEncoding: #UTF_8) readStream.
Store.DbRegistry connectTo: 
  (Store.RepositoryManager repositories detect: 
    [:each | each name = 'stefan at g64']).
!
(Store.Bundle newestVersionWithName: 'Assessments') loadSrc.
(Store.Package newestVersionWithName: 'ComplexConditions') loadSrc.
(Store.Package newestVersionWithName: 'ComplexCondition Tests') loadSrc.
(Store.Package withName: 'LessProgress' version: '7.6 18') first loadSrc.
(Store.Package withName: 'ExtraEmphases' version: '45') first loadSrc.
(Store.Package withName: 'ODBCUnixSupport' version: '2-swsch.1') first loadSrc.
(Store.Package withName: 'RBCodeHighlighting' version: '63.2') first loadSrc.
(Store.Package withName: 'RBEnclosureHighlighting' version: '1.0') first loadSrc.
(Store.Package withName: 'Searchlight' version: '221') first loadSrc.
(Store.Package withName: 'SearchlightTools' version: '218') first loadSrc.
(Store.Package withName: 'StoreForGlorpVWUI' version: '2.4 70') first loadSrc.
(Store.Package withName: 'wordSelection' version: '1.2') first loadSrc.
(Store.Package withName: 'SUnitToo' version: '50') first loadSrc.
(Store.Package withName: 'SUnitToo(ls)' version: 'RB4xx - 29') first loadSrc.
(Store.Package withName: 'SUnitToo-Cancelations' version: 'RB4xx - 5') first loadSrc.
!
Refactory.Browser.BrowserApplicationModel promptOnRefactoring: true.
Refactory.Browser.ListNavigatorPart showHorizontalScrollbar: true.
Refactory.Browser.BrowserCodeTool
  saveAutoFormat: false;
  browseAutoFormat: false.
Refactory.Browser.RBConfigurableFormatter.NewLineBeforeFirstCascade := true.
Refactory.Browser.RBConfigurableFormatter.NewLineBeforeFirstKeyword := true.
Refactory.Browser.RBConfigurableFormatter.NumberOfArgumentsForMultiLine := 3.
Refactory.Browser.RBConfigurableFormatter.FormatCommentWithStatements := true.
Refactory.Browser.RBConfigurableFormatter.StringFollowingReturn := ' '.
!
[ Transcript clear.
Delay forSeconds: 10.
ObjectMemory globalGarbageCollect;
  globalCompactingGC.
Snapshot new saveAs: 'store' thenQuit: true.
] fork


HTH,
s.
"Besser ein Ende mit Schrecken als ein Schrecken ohne Ende"