Bank of Headlines

contributing to Pier

PRFullTextSearch>>visitStructure:
PRTable>>accept:
PRViewRenderer>>visitPierTable:
PRVisitor>>visitPierTable:
descriptionDue
	<magritteDescription>
	^ self due asTime = (Time hour: 23 minute: 59 second: 0)
		ifTrue: [
			^ MADateDescription new
				accessor: #due;
				priority: 300;
				label: 'Due Date';
				beEditable;
				beRequired;
				yourself ]
		ifFalse: [
			MATimeStampDescription new
				accessor: #due;
				priority: 300;
				comment: 'When this task must be done by.';
				label: 'Due Date';
				beEditable;
				beRequired;
				yourself ]
DateAndTime tomorrow 2015-04-03T00:00:00-05:00The method TimeStamp class>>now has been deprecated.
use DateAndTime
The method DateAndTime>>asTimeStamp has been deprecated.
use #asDateAndTime
MessageNotUnderstood: PRInternalLink>>parameterAt:ifPresent:
Your request could not be completed. An exception occurred.
WAComponent>>initializeAttribute: description with: aValue overridWith: anInternalLink
parameterAt: aName ifPresent: aBlock
	Transcript
		show: 'This should not be called - ';
		show: thisContext sender printString;
		cr.
	self parameters at: aName ifAbsent: [ ^ nil ].
	^ aBlock value
MessageNotUnderstood: PRInternalLink>>isEmbedded
Your request could not be completed. An exception occurred.
PRLink>>isEmbedded
	^ self embedded
Deprecation: The method TimeStamp class>>now has been deprecated. use DateAndTime
Your request could not be completed. An exception occurred.
RBParseTreeRewriter new
	replace: '``@object deprecated: ``@arg1 '
	with: '``@object deprecated: ``@arg1 on:(''', dateString,  ''') in:(''Pharo', versionNumber asString, ''')'.
PRToDoTask allInstances do: [ :task | task due: (DateAndTime date: task due asDate time: task due asTime)].
PBPost allInstances do: [:e | e publication class = TimeStamp ifTrue: [e publication: (DateAndTime date: e publication asDate time: e publication asTime)]].
PRKernel instances size = 1 ifTrue: [ PRKernel instances anyOne name: 'pier_old'].
PRKernelCreatorForPier new createKernel.
| localTimeZoneToRestore time |
localTimeZoneToRestore := DateAndTime localTimeZone.
DateAndTime localTimeZone: (TimeZone abbreviated: 'UTC').
time := DateAndTime midnight.
DateAndTime localTimeZone: TimeZone default.
time.
DateAndTime now asTime.
Time now.
"Starting with http://zn.stfx.eu/zn/build-and-deploy-1st-webapp/
Start up the server:"
ZnServer startDefaultOn: 8080.
ZnClient new get: 'http://localhost:8080/random'.
ZnClient new get: 'http://localhost:8080/help'.
ZnServer default logToTranscript.
ZnServer default debugMode: true; inspect.
ZnServer stopDefault.
ZnServer startDefaultOn: 8080.
ZnServer default delegate map: #image to: MyFirstWebApp new.

MyFirstWebApp allInstances.

MyFirstWebApp new form asMorph openInWindow.

ConfigurationOfMyFirstWebApp load.
PRKernel instances size = 1 ifTrue: [ PRKernel instances anyOne name: 'pier_old'].
PRKernelCreatorForPier new createKernel.
ScheduledTask allInstances size = 0.
TaskScheduler allInstances size = 0.
# http://pharobooks.gforge.inria.fr/PharoByExampleTwo-Eng/latest/ZeroConf.pdf
alias cdp='cd $HOME/Smalltalk/Pharo'
alias getp='cdp; mkdir -p old; mv pharo-vm old/pharo-vm.$RANDOM; curl get.pharo.org/40+vm | bash && curl https://ci.inria.fr/pharo-contribution/job/Pier3Addons/PHARO=40,VERSION=release3.1,VM=vm/lastSuccessfulBuild/artifact/Pier3Addons.zip > Pier3Addons.zip && unzip Pier3Addons.zip && ./pharo-ui Pier3Addons.image'
alias timer25='date; echo "========================="; for i in {1..25}; do sleep 60; echo -n "+"; done; echo; echo DONE'
World
    bindKeyCombination: 29 command
    toAction: [ SystemWindow sendTopWindowToBack ].
Transcript open.
TestRunner open.

Gofer new
	smalltalkhubUser: 'JohnCBorden' project: 'ClassicPier';
	package: 'Pier-SW2-Sw1Features';
	load.
Gofer new
	smalltalkhubUser: 'JohnCBorden' project: 'PierToDo';
	package: 'Pier-ToDo';
	package: 'Pier-Tests-Todo';
	load.
Gofer new
	smalltalkhubUser: 'JohnCBorden' project: 'PierWorkout';
	package: 'Pier-Workout';
	package: 'Pier-Test-Workout';
	load.
Gofer new
	url: 'http://smalltalkhub.com/mc/JohnCBorden/miscellaneous/main' username: 'JohnCBorden' password: (UIManager default request: 'Password for jborden:');
	package: 'Pier-Exported-Code';
	load.

PRKernel instances size = 1 ifTrue: [ PRKernel instances anyOne name: 'pier_old'].
PRKernelCreatorForPier new createKernel.

WAAdmin applicationDefaults.
WAConfiguration allInstances size = 0.
WAAdmin defaultDispatcher defaultName: 'pier'.
"Find out how to set the libraries - This order allows the ToDo display to be an accordion:
  PRBlueprintlibrary PRJavaScriptSupport PRWysiwygFileLibrary JQUiDeploymentLibrary JQUiDevelopmentLibrary PRYUIEditorDeploymentLibrary PRYUIEditorDevelopmentLibrary JQOvercastTheme JQWidgetBoxDeploymentLibrary  
The Kernel is Pier (replace pier_old)
This is set to default
For adding libraries, it seems like I need to get the app from WAAdmin, and send #addLibrary: JQuery..."

"Seems the Seaside Control Panel can be opened from World -> Tools. Remove unnecessary tools:"

WAAdmin defaultDispatcher unregister: (WAAdmin defaultDispatcher handlerAt: 'tools').
WAAdmin defaultDispatcher unregister: (WAAdmin defaultDispatcher handlerAt: 'examples').
WAAdmin defaultDispatcher unregister: (WAAdmin defaultDispatcher handlerAt: 'status').
WAAdmin defaultDispatcher unregister: (WAAdmin defaultDispatcher handlerAt: 'tests').
WAAdmin defaultDispatcher unregister: (WAAdmin defaultDispatcher handlerAt: 'javascript').
WAAdmin defaultDispatcher unregister: (WAAdmin defaultDispatcher handlerAt: 'bootstrap').
WAAdmin defaultDispatcher unregister: (WAAdmin defaultDispatcher handlerAt: 'welcome').
WAAdmin defaultDispatcher unregister: (WAAdmin defaultDispatcher handlerAt: 'piersetup').
WAAdmin defaultDispatcher unregister: (WAAdmin defaultDispatcher handlerAt: 'browse').
"Following step - Automate taking a weekly backup of the wiki - p137 (Working with Remote Servers) of DIP may help with Gofer writing."
#('Find Broken Links' 'Add a History Report' 'Update Overdue Repeating Tasks' 'Automate Backup of Pier to Code') do:
	[ :title |
		(PRPathLookup start: (PRKernel instanceNamed: 'Pier') root path: ('/John Borden/Todo/', title)) automate ].
PRToDoTask allInstancesDo: [ :e | e due: (e due midnight + 299 minutes) ].
TaskScheduler allInstances size = 1 ifTrue: [ TaskScheduler allInstances anyOne inspect ].
(PRPathLookup start: (PRKernel instanceNamed: 'Pier') root path: '/Template/Style.css') remove.
(PRPathLookup start: (PRKernel instanceNamed: 'Pier') root path: '/Template/pier.png') remove.
PRKernelCreatorForPier>>systemtemplatesmetaenvironment:
PRKernelCreatorForPier>>systemcomponentsheader:
PRKernelCreatorForPier>>systemcomponentsfooter:
PRKernelCreatorForPier>>systemcomponentsloggedinuser:
PRKernelCreatorForPier>>systemcomponentsmenu:
PRKernelCreatorForPier>>systemtemplatesblogenvironment:
PRKernelCreatorForPier>>systemcomponentscommands:
% tab=$(print "\t"); file=2018-Feb-24.txt
% sed 's/\(^[^0-9]\)/| \1/; s/^/| /; s/'$tab'/ | /g' $file | pbcopy
(PRWorkoutLog allInstances size = 1 and: [ PRWorkoutLog allInstances anyOne workouts isArray ]) ifTrue: [ PRWorkoutLog allInstances anyOne workouts: OrderedCollection new; inspect ].
(PRWorkoutLog allInstances size = 1) ifTrue: [ PRWorkoutLog allInstances anyOne workouts: (PRWorkoutLog allInstances anyOne workouts sorted: [ :a :b | a date < b date ]) ].
2019-Aug-22 - The following no longer works from the command line:
 cat 2018-Feb-8.txt| sed 's/\(^[^0-9]\)/| \1/; s/^/| /; s/'$tab'/ | /g' | pbcopyCopy the file:
 cp 2019-Aug-22.txt pipe.txt
 vim pipe.txt
  :%s/\(^[^0-9]\)/| \1/
  :%s/^/| /
  :%s/ / | /g
 cat pipe.txt | pbcopy
| line lastLine count |
count := 0.
FileSystem disk workingDirectory / 'new.st'
	readStreamDo: [ :stream |
		[ stream atEnd ]
			whileFalse: [ line := stream nextLine.
				(line size = 1 and: [ line first = $= ]) ifTrue: [ count := count + 1.
					lastLine size = 1 ifFalse: [ Transcript show: lastLine; cr ]].
				lastLine := line ]].
count.
(PRPathLookup start: (PRKernel instanceNamed: 'Pier') root path: '/System/Components/DefaultCss') file: nil.
FileList openOn: FileSystem workingDirectory titled: 'Check Filein for Pier in: '.
MessageNotUnderstood: GRSmallDictionary>>inject:into:
PRInternalLink allInstances anyOne parameters class = GRSmallDictionary
PRValueLinkTest debug: #testParseAliased
PRCocoonConfiguration class>>configurationName nil MNU #writerName
self configuration newline
PRPillarWriter>>visitHeader:
PRDocumentDescriptionTest(MAElementDescriptionTest)>>#testFromString
MessageNotUnderstood: receiver of "writerName" is nil
Gofer new
        url: 'http://smalltalkhub.com/mc/Pier/Pillar/main';
        version: 'Pillar-Model-CyrilFerlicot.202';
        version: 'Pillar-Tests-Model-CyrilFerlicot.157';
        version: 'Pillar-ExporterCore-MartinDias.197';
        load.
MessageNotUnderstood: GRSmallDictionary>>collect:
PRInternalLink(PRReference)>>postCopy
  	super postCopy.
	self parameters: (self parameters
		collect: [ :each | each copy ])
MessageNotUnderstood: GRSmallDictionary>>asDictionary
PRInternalLink(PRReference)>>parameters:
  	parameters := aCollection asDictionary
ConfigurationOfPier3AddOns project bleedingEdge load.
Gofer new
    url:'http://smalltalkhub.com/mc/Pier/Pier3Addons/main';
    package: 'ConfigurationOfPier3AddOns';
    load.
((Smalltalk at: #ConfigurationOfPier3AddOns) project version: #stable) load.
Gofer new
    url: 'http://smalltalkhub.com/mc/Pier/Pier3/main';
    package: 'ConfigurationOfPier3';
    load.
((Smalltalk at: #ConfigurationOfPier3) project version: #bleedingEdge) load.
This package depends on the following classes:
  MAVisitor
  MAElementDescription
You must resolve these dependencies before you will be able to load these definitions:
  visitPathDescription:
  PRMagritteDictionaryReader
  writeDictionary:for:
  checkRequired:with:
  class:
  interpretAsBoolean:with:
  interpretAsNumber:with:
  raiseWarningIfTooManyParameters
  sortDescriptions
  tryToAddFrom:withInterpretation:
Gofer new
    url: 'http://smalltalkhub.com/mc/Pier/Pier3/main';
    package: 'ConfigurationOfPier3';
    load.
((Smalltalk at: #ConfigurationOfPier3) project version: #stable) load.
World / Tools / Versioner
Gofer new
    url: 'http://smalltalkhub.com/mc/Pier/Pier3/main';
    package: 'ConfigurationOfPier3';
    load.
(Smalltalk at: #ConfigurationOfPier3) project bleedingEdge load.
Gofer new
    url: 'http://smalltalkhub.com/mc/Magritte/Magritte3/main';
    package: 'ConfigurationOfMagritte3';
    load.
(Smalltalk at: #ConfigurationOfMagritte3) project bleedingEdge load.
PRReference allSubclasses collect: [ :c | c allInstances collect: [ :e | e parameters ]].
	Title
	SearchChildrenSidebarContentsFooter
((Smalltalk at: #ConfigurationOfPillar) project version: #stable) load.
MessageNotUnderstood: receiver of "and:" is nil
Gofer new
    url: 'http://smalltalkhub.com/mc/Pier/Pier3/main';
    package: 'ConfigurationOfPier3';
    load.
((Smalltalk at: #ConfigurationOfPier3) project version: #development) load.
MessageNotUnderstood: JQTabs>>onSelect:
ConfigurationOfPier3AddOns>>version304:
  package: 'Pier-Wysiwyg' with: 'Pier-Wysiwyg-JohnCBorden.90';
(TelnetProtocolClient openOnHostNamed: 'hpitan4') loginUser: 'nxcurrv' password: 'unix11'.
% mkdir -p ~/npm/bin
% . ~/.profile
% npm config set prefix=~/npm
% npm install -g amber-cli
Gofer it
    squeaksource3: 'Nagare';
    package: 'ConfigurationOfNagare';
    load.
(Smalltalk at: #ConfigurationOfNagare) perform: #load.
Next Steps:
# Get all of the history
# Change recommended pages (and the interesting line above)
# Export to Code
# Run the above modifications
# File in the output
# Start and test
# Turnoff debug code
# Start automated processes (ftp files) - copy automate commands from old live
# Run as a service
"
"Tasks:
- Make the enhanced editor work
-- Value seems low - maybe using the non-enhanced editor for a while will be OK
-- Seems to need some Seaside 3.2 work
- Make Google Analytics work - 2017-Apr-4 - updated code based on the first book.
-- Adds a record to how much traffic my site gets
-- Can be a lot of non-Smalltalk work
- Track what searches are being done
- Google Gadget may need a replacement - https://en.wikipedia.org/wiki/Google_Gadgets
- Add a document for the google verification file.

Not sure how an HTML canvas would paint something in the head instead of the body.

"
{ PRGoogleAnalyticsWidget allInstances size = 5.
 PRGoogleGadget allInstances size = 0 }.
Metacello new
  baseline: 'Willow';
  repository: 'github://ba-st/Willow:master/source';
  load.
Metacello new
  baseline: 'WillowBootstrap';
  repository: 'github://ba-st/Willow-Bootstrap:master/source';
  load.
Metacello new
  baseline: 'WillowJQueryUI';
  repository: 'github://ba-st/Willow-JQueryUI:master/source';
  load.
Metacello new
  baseline: 'WillowPlayground';
  repository: 'github://ba-st/Willow-Playground:master/source';
  load.
Smalltalks2017Presentation start.
"Afterwards go to localhost:8080/willow101, localhost:8080/live-docs or localhost:8080/test-runner-bootstrap3
to check if they are running.
Metacello new
  baseline: 'Willow';
  repository: 'github://ba-st/Willow:master/source';
  load.
Metacello new
  baseline: 'WillowBootstrap';
  repository: 'github://ba-st/Willow-Bootstrap:master/source';
  load.
Metacello new
  baseline: 'WillowJQueryUI';
  repository: 'github://ba-st/Willow-JQueryUI:master/source';
  load.
Metacello new
  baseline: 'WillowPlayground';
  repository: 'github://ba-st/Willow-Playground:master/source';
  load.
Smalltalks2017Presentation start.
(ZnZincServerAdaptor port: 8080) start.
ToDoApplication registerAsDevelopmentApplication.
[jborden@localhost Pharo]$ ./pier_build_script.sh
  % Total    % Received % Xferd  Average Speed   Time    Time     Time  Current
                                 Dload  Upload   Total   Spent    Left  Speed
100 11324  100 11324    0     0   9810      0  0:00:01  0:00:01 --:--:--  9812
Downloading the latest 61 Image:
    http://files.pharo.org/get-files/61/pharo64.zip
Pharo.image
Downloading the latest pharoVM:
	http://files.pharo.org/get-files/61/pharo64-linux-stable.zip
pharo-vm/pharo
Downloading PharoV61.sources:
	http://files.pharo.org/get-files/61/sources.zip
Creating starter scripts pharo and pharo-ui
pthread_setschedparam failed: Operation not permitted
This VM uses a separate heartbeat thread to update its internal clock
and handle events. For best operation, this thread should run at a
higher priority, however the VM was unable to change the priority. The
effect is that heavily loaded systems may experience some latency
issues. If this occurs, please create the appropriate configuration
file in /etc/security/limits.d/ as shown below:

cat <<END | sudo tee /etc/security/limits.d/pharo.conf
*      hard    rtprio  2
*      soft    rtprio  2
END

and report to the pharo mailing list whether this improves behaviour.

You will need to log out and log back in for the limits to take effect.
For more information please see
https://github.com/OpenSmalltalk/opensmalltalk-vm/releases/tag/r3732#linux
pthread_setschedparam failed: Operation not permitted
This VM uses a separate heartbeat thread to update its internal clock
and handle events. For best operation, this thread should run at a
higher priority, however the VM was unable to change the priority. The
effect is that heavily loaded systems may experience some latency
issues. If this occurs, please create the appropriate configuration
file in /etc/security/limits.d/ as shown below:

cat <<END | sudo tee /etc/security/limits.d/pharo.conf
*      hard    rtprio  2
*      soft    rtprio  2
END

and report to the pharo mailing list whether this improves behaviour.

You will need to log out and log back in for the limits to take effect.
For more information please see
https://github.com/OpenSmalltalk/opensmalltalk-vm/releases/tag/r3732#linux
pthread_setschedparam failed: Operation not permitted
This VM uses a separate heartbeat thread to update its internal clock
and handle events. For best operation, this thread should run at a
higher priority, however the VM was unable to change the priority. The
effect is that heavily loaded systems may experience some latency
issues. If this occurs, please create the appropriate configuration
file in /etc/security/limits.d/ as shown below:

cat <<END | sudo tee /etc/security/limits.d/pharo.conf
*      hard    rtprio  2
*      soft    rtprio  2
END

and report to the pharo mailing list whether this improves behaviour.

You will need to log out and log back in for the limits to take effect.
For more information please see
https://github.com/OpenSmalltalk/opensmalltalk-vm/releases/tag/r3732#linux
'Installing ConfigurationOfPier3AddOns release3.2'

Loading 3.2.0 of ConfigurationOfPier3AddOns...
Fetched -> ConfigurationOfSeaside3-topa.337 --- http://smalltalkhub.com/mc/Seaside/MetacelloConfigurations/main/ --- http://smalltalkhub.com/mc/Seaside/MetacelloConfigurations/main/
Loaded -> ConfigurationOfSeaside3-topa.337 --- http://smalltalkhub.com/mc/Seaside/MetacelloConfigurations/main/ --- http://smalltalkhub.com/mc/Seaside/MetacelloConfigurations/main/
Fetched -> ConfigurationOfPillar-StephaneDucasse.277 --- http://smalltalkhub.com/mc/Pier/Pillar/main/ --- http://smalltalkhub.com/mc/Pier/Pillar/main/
Loaded -> ConfigurationOfPillar-StephaneDucasse.277 --- http://smalltalkhub.com/mc/Pier/Pillar/main/ --- http://smalltalkhub.com/mc/Pier/Pillar/main/
Fetched -> ConfigurationOfPier3-JohnCBorden.84 --- http://smalltalkhub.com/mc/Pier/Pier3/main/ --- http://smalltalkhub.com/mc/Pier/Pier3/main/
ConfigurationOfPier3>>startSeasideAndRegisterPier (ZnZincServerAdaptor is Undeclared) 
...
Loading 3.2.0 of ConfigurationOfPier3AddOns...
Project: Pillar Book bleedingEdge [0.32-baseline]
Project: Cocoon stable [1.33]
Project: Ston 0.18 [0.23]
Project: Magritte3 3.5.0
Project: Grease release1.2 [1.2.7]
Project: Seaside3 release3.1MetacelloProjectSpecLoadError: No version found for #'release3.1' of ConfigurationOfSeaside3 because: The symbolic version #'release3.1' is EXPLICITLY not defined in ConfigurationOfSeaside3 for the current platform (i.e., symbolic version defined as #notDefined).
[ :ex |
^ (MetacelloProjectSpecLoadError projectSpec: self)
	versionDoesNotExistException: ex;
	signal:
		'No version found for ' , self versionString printString , ' of '
			, self className asString , ' because: ' , ex description ] in MetacelloMCNamelessProjectSpec(MetacelloMCProjectSpec)>>loadVersion: in Block: [ :ex | ...
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
MetacelloSymbolicVersionNotDefinedError(Exception)>>signal
MetacelloSymbolicVersionNotDefinedError(MetacelloVersionDoesNotExistError)>>signal
MetacelloMCProject(MetacelloProject)>>version:
MetacelloMCNamelessProjectSpec(MetacelloMCProjectSpec)>>version
[ vrsn := self version ] in MetacelloMCNamelessProjectSpec(MetacelloMCProjectSpec)>>loadVersion: in Block: [ vrsn := self version ]
Gofer new
    url:'http://smalltalkhub.com/mc/Pier/Pier3Addons/main';
    package: 'ConfigurationOfPier3AddOns';
    load.
((Smalltalk at: #ConfigurationOfPier3AddOns) project version: #'release3.2') load: 'Tests'.
Gofer new
    url:'http://smalltalkhub.com/mc/Pier/Pier3Addons/main';
    package: 'ConfigurationOfPier3AddOns';
    load.
((Smalltalk at: #ConfigurationOfPier3AddOns) project version: #'release3.2') load: 'Pier-Blog'.
((Smalltalk at: #ConfigurationOfPier3AddOns) project version: #'release3.2') load: 'Pier-EditorEnh'.
export PHARO_VERSION=${1:-60}
export VERSION=release3.2
# export VERSION=release3.1
# export JOB_NAME=`dirname $PWD`
export JOB_NAME=$PWD/pier
../MacOS/Pharo Pharo6.1-64.image save $JOB_NAME
# ../MacOS/Pharo Pharo.image save $JOB_NAME --delete-old
# ../MacOS/Pharo $JOB_NAME.image --version > version.txt

REPO=http://smalltalkhub.com/mc/Magritte/Magritte3/main
../MacOS/Pharo $JOB_NAME.image config $REPO ConfigurationOfMagritte3 --install=release3.5 --group='Magritte-Model'

REPO=http://smalltalkhub.com/mc/Pier/Pier3/main
../MacOS/Pharo $JOB_NAME.image config $REPO ConfigurationOfPier3 --install=$VERSION --group='default'
# Load the tests
../MacOS/Pharo $JOB_NAME.image config $REPO ConfigurationOfPier3 --install=$VERSION --group='Tests'
Instance of MCSaveVersionDialog did not understand #selectedClassOrMetaClass

Bank of Headlines

Running Pier on Pharo 4

TimeStamp issues again

Re-writing Code

Replace TimeStamp with DateAndTime in the running wiki

TimeZones

Different Hosting

Automate Backup - Setup work

Personalized Configuration

Pier Broken

How to Update Pier's Stable CI

ssh and Telnet

Amber Smalltalk

Logging for Pier

Visual Works

Reading

Mindset

Improve yourself with Curiosity

Run Your Own Webserver

Teapot Docs