Skip to content

Instantly share code, notes, and snippets.

View dalehenrich's full-sized avatar

Dale Henrichs dalehenrich

View GitHub Profile
gs version; edit # stone version information
--------------------
5@ -> 'gsBuildSerialNum'->'64bit-37456-PRIVATE'
6@ -> 'gsBuildType'->'FAST'
7@ -> 'gsRelease'->'3.3.0'
./bug --load=GemStoneClassMigration-MarianoMartinezPeck.1
./bug --populate
./bug --history
--------------------
@dalehenrich
dalehenrich / bug.st
Last active September 12, 2015 17:35
[ :topez :objIn :tokens :command :commandNode |
| opts args |
"for help: ./bug -h"
command
getOptsMixedLongShort:
{#('help' $h #'none').
#('browse' nil #'required').
#('clean' nil #'none').
#('confirm' nil #'none').
#('gc' nil #'none').
mc copy Orbeon_Persistence_API-BrunoBB-0.039 http://ss3.gemtalksystems.com/ss/OrbeonPersistenceAPI filetree://$GS_HOME/shared/repos/OrbeonPersistenceLayer/repository
mc copy Orbeon_Persistence-BrunoBB-0.019 http://ss3.gemtalksystems.com/ss/OrbeonPersistenceAPI filetree://$GS_HOME/shared/repos/OrbeonPersistenceLayer/repository
cls create BaselineOfOrbeonPersistenceLayer BaselineOf BaselineOfOrbeonPersistenceLayer
cls protocol --add=BaselineOfOrbeonPersistenceLayer baseline
browse class BaselineOfOrbeonPersistenceLayer
#####
baseline: spec
<baseline>
spec
for: #'common'
@dalehenrich
dalehenrich / gist:678813800cb7d5065945
Created January 12, 2015 01:54
example help text
NAME
example - example sript utility template
SYNOPSIS
example [-h|--help]
example --register=<server-name> --model=[parallel|serial] [--trace] [--interactive]
example --unregister=<server-name>
example --reset
example --remoteStart=<server-name>
example --remoteRestart=<server-name>
@dalehenrich
dalehenrich / gist:e1575a41bc59ae1ef4f6
Created January 12, 2015 01:53
example script definition
[ :topez :objIn :tokens :command :commandNode |
| opts args |
"for help: ./example -h"
command
getOptsMixedLongShort:
{#('help' $h #'none').
#('clear' nil #'none').
#('client' nil #'required').
#('interactive' nil #'none').
#('model' nil #'required').
@dalehenrich
dalehenrich / .gitconfig
Created January 2, 2013 18:20
git aliases
[alias]
co = checkout
ci = commit -a
logf = log --name-status
w = whatchanged
st = status
pom = push origin master
graph = log --graph --oneline --decorate
# After I accidentally commit too much and want to roll back the
@dalehenrich
dalehenrich / topez.st
Created October 12, 2012 16:33
topez workspace
Metacello new
baseline: 'Topez';
repository: 'filetree:///opt/git/topez/packages';
get.
Metacello new
baseline: 'Topez';
repository: 'filetree:///opt/git/topez/packages';
load: 'Dev'.
@dalehenrich
dalehenrich / createSeasideCacheRepository.st
Created September 21, 2012 18:03
GemStone/S 3.1.0.1 is shipping
| version cacheRepository mcVersion |
cacheRepository := MCDirectoryRepository new
directory: (FileDirectory on: '<path to seaside cache repository>').
"Copy configuration to cacheRepository"
mcVersion := (Gofer new
gemsource: 'MetacelloRepository';
package: 'ConfigurationOfSeaside30') resolved first version.
cacheRepository storeVersion: mcVersion.
"fetch packages needed to load Seaside30"
version := ConfigurationOfSeaside30 project version: '3.0.7.1'.
@dalehenrich
dalehenrich / reading list.md
Created September 19, 2012 00:00
package load order for Metacello
@dalehenrich
dalehenrich / a.st
Created September 17, 2012 19:01
Metacello 1.0-beta.31.1.5 brewed
Metacello image
configuration: 'MetacelloPreview';
get.
Metacello image
configuration: 'MetacelloPreview';
load.