[Seaside] dvs primitive make implementation

[Derek Brans]

--Boundary_(ID_v1u7rmJHPrLedFCT58GCxg)
Content-type: text/plain; charset=US-ASCII; format=flowed
Content-transfer-encoding: 7BIT

This changeset adds the following functionality to DVS:

SaveConfiguration - Saves the current list of modules to a '.dvs' file, 
preserving the order they were brought into the image.
LoadConfiguration - Loads a list of modules from a '.dvs' file in the 
same order they were saved.

I tested it with a couple modules.  Seems to work fine.  Saving over the 
same file overwrites it.

On Sunday, October 6, 2002, at 12:24 AM, Avi Bryant wrote:

>
> On Sun, 6 Oct 2002, Derek Brans wrote:
>
>> Avi, there seem to be some dependencies among the modules in the 
>> seaside
>> directory (I get errors white filing-in the first time... a second time
>> works, though).  Is there an order they should be filed in.
>
> Yeah.  I would file in Kernel, then Views, then Components.  I wouldn't
> necessarily bother with the rest yet, although you might find Layout
> interesting.
>
> You may also need to file in the CollectionExtensions.st from
> aubergines/source.
>
>> Is there currently a quicker way to rebuild an image with several
>> modules without having to add them one-by-one to the DVSPanel every 
>> time?
>
> No...

--Boundary_(ID_v1u7rmJHPrLedFCT58GCxg)
Content-type: application/octet-stream; x-unix-mode=0644; name=DVS-make.cs
Content-transfer-encoding: quoted-printable
Content-disposition: attachment; filename=DVS-make.cs

'=46rom=20Squeak3.2=20of=2011=20July=202002=20[latest=20update:=20#4956]=20=
on=206=20October=202002=20at=2010:00:24=20am'!=0D=0D!DVSPanel=20=
methodsFor:=20'as=20yet=20unclassified'=20stamp:=20'djb=2010/6/2002=20=
09:57'!=0DbuildWindow=0D=0A=09|window=20y=20buttonSize|=0D=0A=09=0D=0A=09=
window=20_=20SystemWindow=20labelled:=20'DVS'.=0D=0A=09window=20=
paneColor:=20=20(Color=20r:=200.658=20g:=200.69=20b:=200.976)=20.=0D=09=
window=20bounds:=20(Rectangle=20origin:=200@0=20corner:1.4@2).=0D=0A=09=
buttonSize=20_=200.1.=0D=0A=09y=20_=200.=0D=0A=09#(add=20delete=20fileIn=20=
fileOut=20loadConfiguration=20saveConfiguration)=20pairsDo:=0D=0A=09=09=
[:left=20:right=20|=0D=0A=09=09window=20addMorph:=20(self=20=
buttonForSelector:=20left)=20frame:=20((0@y)=20corner:=20=
(0.5@(y+buttonSize))).=0D=0A=09=09window=20addMorph:=20(self=20=
buttonForSelector:=20right)=20frame:=20((0.5@y)=20corner:=20=
(1@(y+buttonSize))).=0D=0A=09=09y=20_=20y=20+=20buttonSize].=0D=0A=09=
window=20addMorph:=20self=20listMorph=20frame:=20(0@y=20corner:=201@1).=0D=
=0A=09^=20window=0D=0A=09!=20!=0D=0D!DVSPanel=20methodsFor:=20'as=20yet=20=
unclassified'=20stamp:=20'djb=2010/6/2002=2009:43'!=0DloadConfiguration=0D=
=0D=09^=20(FileList2=20modalFileSelectorForSuffixes:=20#(#dvs=20))=0D=09=09=
ifNotNilDo:=20[:file=20|=20=09|=20line=20module=20|[file=20atEnd]=0D=09=09=
=09=09whileFalse:=20[line=20_=20file=20nextLine.=0D=09=09=09=09=09module=20=
_=20(self=20newModuleFromFile:=20(FileStream=20fileNamed:=20line)).=0D=09=
=09=09=09=09module=20ifNotNil:=0D=09=09[Modules=20add:=20module.=0D=09=09=
module=20addDependent:=20self.=0D=09=09self=20changed:=20#list]=0D=09=09=09=
=09=09]]!=20!=0D=0D!DVSPanel=20methodsFor:=20'as=20yet=20unclassified'=20=
stamp:=20'djb=2010/6/2002=2008:28'!=0DnewModuleFromFile=0D=0A=09^=20self=20=
newModuleFromFile:(FileList2=20modalFileSelectorForSuffixes:=20#(st))=0D=0A=
=09=09!=20!=0D=0D!DVSPanel=20methodsFor:=20'as=20yet=20unclassified'=20=
stamp:=20'djb=2010/6/2002=2008:25'!=0DnewModuleFromFile:=20aFile=0D=0A=09=
^=20aFile=20ifNotNilDo:=0D=0A=09=09[:file=20|=20|name|=0D=0A=09=09file=20=
fileIntoNewChangeSet.=0D=0A=09=09Undeclared=20at:=20#ModuleName=0D=0A=09=09=
=09ifPresent:=20[:n=20|=20name=20_=20n.=20Undeclared=20removeKey:=20=
#ModuleName].=0D=0A=09=09name=20ifNil:=20[name=20_=20self=20=
requestModuleName].=0D=0A=09=09^=20DVSFileModule=0D=0A=09=09=09named:=20=
name=0D=0A=09=09=09file:=20file=20fullName.]=0D=0A=09=09!=20!=0D=0D=
!DVSPanel=20methodsFor:=20'as=20yet=20unclassified'=20stamp:=20'djb=20=
10/6/2002=2009:09'!=0DsaveConfiguration=0D=0D=09^=20(FileStream=20=
fileNamed:(FillInTheBlankMorph=20request:'Full=20Path=20of=20file=20=
(".dvs"=20will=20be=20added)'=20),'.dvs')=0D=09=09ifNotNilDo:=20[:file=20=
|=20Modules=20do:[:m|=20file=20nextPutAll:=20(m=20fileName).=20file=20=
cr.]=20=20]!=20!=0D=0D!DVSPanel=20methodsFor:=20'as=20yet=20=
unclassified'=20stamp:=20'djb=2010/6/2002=2009:58'!=0Dshow=0D=0A=09morph=20=
ifNil:=20[morph=20_=20self=20buildWindow].=0D=0A=09morph=20=
openInWorldExtent:=20(300@300)!=20!=0D=0D=

--Boundary_(ID_v1u7rmJHPrLedFCT58GCxg)
Content-type: text/plain; charset=US-ASCII; format=flowed
Content-transfer-encoding: 7BIT

>
>
> _______________________________________________
> Seaside mailing list
> Seaside@lists.squeakfoundation.org
> http://lists.squeakfoundation.org/listinfo/seaside
>
>
Nerd on a Wire: Web and Information Solutions
Website Design - Database Systems - Site Hosting
604.874.6463
mailto:info@nerdonawire.com
For more information, visit http://nerdonawire.com

--Boundary_(ID_v1u7rmJHPrLedFCT58GCxg)--