Thanks for the pointers. I've got it working in Pharo 4 but had to change this method as I was getting a database session connection error. It appears to be losing the Glorp session, so I changed this class method thus:

RedditDatabaseResource��
login>>
"^ DefaultLogin ifNil: [ DefaultLogin := self createLogin ]"
^ DefaultLogin := self createLogin.