Chris Muller uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-cmm.438.mcz

==================== Summary ====================

Name: Morphic-cmm.438
Author: cmm
Time: 25 May 2010, 1:04:01.956 pm
UUID: 5cd1f813-d403-4520-9752-0a1d4f18794d
Ancestors: Morphic-spd.437

Don't refuse a prettyPrint request unnecessarily.

=============== Diff against Morphic-spd.437 ===============

Item was changed:
  ----- Method: TextEditor>>prettyPrint: (in category 'menu messages') -----
  prettyPrint: decorated 
  	"Reformat the contents of the receiver's view (a Browser)."
  	| selectedClass newText |
- 	model selectedMessageName ifNil: [ ^ morph flash ].
  	selectedClass := model selectedClassOrMetaClass.
+ 	selectedClass ifNil: [ ^ morph flash ].
  	newText := selectedClass compilerClass new
  		format: self text
  		in: selectedClass
  		notifying: self
  		decorated: decorated.
  	newText ifNotNil:
  		[ self
  			deselect ;
  			selectInvisiblyFrom: 1
  			to: paragraph text size.
  		self replaceSelectionWith: (newText asText makeSelectorBoldIn: selectedClass).
  		self selectAt: self text size + 1 ]!