David T. Lewis uploaded a new version of MorphicExtras to project The Trunk: http://source.squeak.org/trunk/MorphicExtras-hjh.210.mcz
==================== Summary ====================
Name: MorphicExtras-hjh.210 Author: hjh Time: 30 September 2017, 11:55:17.310454 am UUID: 3a05acb5-0d83-424c-8471-b7b5af288d35 Ancestors: MorphicExtras-tpr.209
A smoke test for Postscript support.
=============== Diff against MorphicExtras-tpr.209 ===============
Item was added: + TestCase subclass: #EPSCanvasTest + instanceVariableNames: '' + classVariableNames: '' + poolDictionaries: '' + category: 'MorphicExtras-Postscript Canvases'!
Item was added: + ----- Method: EPSCanvasTest>>testSmokeTest (in category 'as yet unclassified') ----- + testSmokeTest + | epsCode | + epsCode := (RectangleMorph new asEPS). + + self assert: epsCode lines first = '%!!PS-Adobe-2.0 EPSF-2.0'. + + self assert: (epsCode lines detect: [:line | line beginsWith: '%start morph: a RectangleMorph'] ifNone: [nil]) notNil. + + self assert: epsCode lines last = '%%EOF' + !