Skip to content

@timfel /app.st
Created

Embed URL

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
RPApplication subclass: #TestApp
instanceVariableNames: ''
classVariableNames: ''
poolDictionaries: ''
category: 'TestApp'.
echoSomething
<get: '/'>
self error: 'Shows error info about me'.
initialize
"self initialize"
Smalltalk addToStartUpList: self.
Smalltalk addToShutDownList: self.
startUp
"Start this app if running on cloud foundry"
(SmalltalkImage current getSystemAttribute: 3) ifNil: [^ self].
self
runIn: #deployment
on: (SmalltalkImage current getSystemAttribute: 3) asNumber
named: 'TestApp'.
shutDown
self services do: [:each | each stop; waitForStop].
CloudFoundry generateDroplet.
CloudFoundry new
base: 'squeak';
generateDropletWithVNC.
Installer mc directory: '.'; package: 'ConfigurationOfRatPack'; install.
((Smalltalk at: #'ConfigurationOfRatPack') project version: '1.0') load: #('default').
Installer mc directory: '.'; package: 'TestApp'; install.
(Installer ss project: 'RFB') install: 'RFB'.RFBServer start: 5.
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Something went wrong with that request. Please try again.