On 13/12/03 01:05, "Jim Rosenberg" <jr at amanue.com> wrote:

> I have a Squeak image which I'm trying to harden in preparation for
> presenting as a "kiosk" in a forthcoming exhibition. I *think* I've
> correctly followed the instructions in
> 
> http://minnow.cc.gatech.edu/squeak/778
> 
> (using Preferences disableProgrammerFacilities.)
Jim:
I copy and paste code we use to do a Run Time System .image.
I subclass SingleButtonMorph for this.
Clicking in this button when ready to deliver your "Squeak.app"
Look for integrate VM and this image in minnow swiki (don't remember number"
You should remove ActiveWorld removeAllMorphs line too.
By the way, SqueakLight now have Comanche power if you need have several
images in USB cards (and carry all Squeak server/morphic power in a pocket)

'From Squeak3.4gamma of ''7 January 2003'' [latest update: #5169] on 12
April 2003 at 3:22:16 am'!

!CriaderoMorph class methodsFor: 'as yet unclassified'!
makeRTS: t1 
    | t2 t3 |
    t1 delete.
    self registerForStartUp.
    Preferences disable: #cmdDotEnabled;
         disable: #cmdGesturesEnabled;
         disable: #cmdKeysInText;
         enable: #noviceMode;
         disable: #warnIfNoSourcesFile;
         disable: #warnIfNoChangesFile;
         enable: #eToyFriendly;
         disable: #honorDesktopCmdKeys;
         enable: #appendToErrorLog;
         enable: #noDebugButton.
    t2 _ FileDirectory localNameFor: Smalltalk imageName.
    t3 _ (t2
                copyFrom: 1
                to: (t2 findString: '.image'))
                , 'RTS.image'.
    ActiveWorld removeAllMorphs.
    Smalltalk
        changeImageNameTo: (FileDirectory default fullNameFor: t3);
         closeSourceFiles;
         openSourceFiles;
         snapshot: true andQuit: true! !

Cheers
Edgar