Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Tree: a14bee66ba
Fetching contributors…

Cannot retrieve contributors at this time

40 lines (39 sloc) 1.932 kB
ToolSet browse: WACounter selector: #renderContentOn:.
SystemWindow topWindow
right: World width - 10;
bottom: World height - 40.
!
(Workspace new
contents: (String streamContents: [ :stream |
stream
nextPutAll: '"Welcome to Seaside ';
nextPutAll: GRPlatform current seasideVersion greaseString;
nextPut: $.;
cr; cr;
nextPutAll: 'Seaside is already running on port 8080. To get started, simply use your browser to open http://localhost:8080/ and take a look at the examples and documentation listed there.';
cr; cr;
nextPutAll: 'You can start and stop the server (and change the port) using the Seaside Control Panel.';
cr; cr;
nextPutAll: 'This image is based on: '''; print: SystemVersion current; nextPutAll: '''.'; cr;
nextPutAll: 'Seaside was loaded using:';
cr; crtab;
nextPutAll: 'Gofer it'; crtab; tab;
nextPutAll: 'squeaksource: ''MetacelloRepository'';'; crtab; tab;
nextPutAll: 'package: ''ConfigurationOfSeaside30'';'; crtab; tab;
nextPutAll: 'load.'; cr; crtab;
nextPutAll: '(ConfigurationOfSeaside30 project version: '''; nextPutAll: GRPlatform current seasideVersion greaseString; nextPutAll: ''') load: ''OneClick''.';
cr; crtab;
nextPutAll: 'Gofer it'; crtab; tab;
nextPutAll: 'squeaksource: ''MetacelloRepository'';'; crtab; tab;
nextPutAll: 'package: ''ConfigurationOfSeasideRest'';'; crtab; tab;
nextPutAll: 'load.'; cr; crtab;
nextPutAll: 'ConfigurationOfSeasideRest project stableVersion load: ''Tests''.'; cr;cr;
nextPutAll: 'The scripts to configure the image are available here:'; crtab;
nextPutAll: 'http://github.com/renggli/builder/blob/master/scripts/seaside-design.st';crtab;
nextPutAll: 'https://github.com/NickAger/builder/blob/master/scripts/seaside3-oneclick.st"' ]);
openLabel: 'Seaside ', GRPlatform current seasideVersion greaseString;
topView)
width: 450;
height: 210;
top: 10;
right: World width - 10.
Jump to Line
Something went wrong with that request. Please try again.