Dale Henrichs dalehenrich

Retired Smalltalk developer with 40+ years working in and around Smalltalk

dalehenrich / man--all.txt

Last active November 2, 2015 23:25

	abort - Abort transaction
	bedit - batch edit tool
	begin - Begin transaction
	break - Method breakpoint management
	browse - Find and view classes and methods
	bu - Manage GemStone backups
	cat - Display contents of node
	cd - Change node
	cls - class management
	commit - Commit transaction

dalehenrich / TDMetacelloTool>>projectinstall.st

Created November 2, 2015 23:14

	projectinstall
	"
	project install ( <project-name> \| [--local\|--stone] --url=<project-entry-url> )
	"

	\| projectName registration \|
	self
	getSubcommandOptsMixedLongShort:
	{#('local' nil #'none').
	#('stone' nil #'none').

dalehenrich / TDMetacelloTool>>projectentry.st

Last active November 2, 2015 22:58

	projectentry
	"
	project entry --baseline=<project-name> --repo=<project-repo> [--loads=<load-expression>] \
	<project-path>
	entry --config=<project-name> [--version=<project-version>] \
	--repo=<project-repo> [--loads=<load-expression>] <project-path>
	entry --git=<project-name> [--repo=<git-repo-path>] <project-path>
	entry --url=<url-for-project-entry.ston> <project-path>
	"

dalehenrich / porjectLoadSeasideFromUrlTodeAPI.md

Last active November 2, 2015 20:40

project load --url=...

tODE script:

project entry --url=http://gsdevkit.github.io/GsDevKit_home/Seaside31.ston
project clone --https --local Seaside3
project load Seaside3

dalehenrich / projectLoadSeasideFromUrl.md

Last active November 2, 2015 20:26

tODE script:

project entry --url=http://gsdevkit.github.io/GsDevKit_home/Seaside31.ston
project clone --https --local Seaside3
project load Seaside3

dalehenrich / seaside31ProjectEntry.st

Created November 2, 2015 20:05

	^ TDProjectSpecEntryDefinition new
	comment: '';
	projectUrl: 'https://github.com/GsDevKit/Seaside31';
	baseline: 'Seaside3'
	repository: 'github://GsDevKit/Seaside31:3.1.?/repository'
	loads: #('Development' 'Zinc' 'FastCGI' 'Examples');
	installScript: 'project clone --https --local Seaside3';
	gitCheckout: 'gs_master';
	status: #(#'inactive');
	locked: false;

dalehenrich / howtoloadseaside.md

Last active November 2, 2015 20:09

???

Gofer new

dalehenrich / extractSpecsFromBaseline.st

Created October 13, 2015 16:58

extract specs from baseline

	\| ar \|
	ar := (BaselineOfSton project version: 'baseline') spec packages map
	values asArray.
	ar do: [ :spec \| spec instVarNamed: 'project' put: nil ].
	STON toStringPretty: ar

dalehenrich / resetSHOUTGlobals.st

Last active September 22, 2015 17:27

reset SHOUT globals

	[ :topez :objIn :tokens :command :commandNode \|
	\| opts args \|
	"for help: ./resetSHOUTGlobals -h"
	command
	getOptsMixedLongShort: {#('help' $h #'none')}
	optionsAndArguments: [ :options :operands \|
	opts := options.
	args := operands ].
	opts
	at: 'help'

dalehenrich / resetSHOUTGlobals.ston

Last active September 22, 2015 17:28

reset SHOUT Global tode script

	TDScriptLeafNode{#name:'resetSHOUTGlobals',#contents:'[ :topez :objIn :tokens :command :commandNode \|
	\| opts args \|
	\"for help: ./resetSHOUTGlobals -h\"
	command
	getOptsMixedLongShort: {#(\'help\' $h #\'none\')}
	optionsAndArguments: [ :options :operands \|
	opts := options.
	args := operands ].
	opts
	at: \'help\'