The Trunk: ST80-mt.183.mcz

Marcel Taeumel uploaded a new version of ST80 to project The Trunk:
http://source.squeak.org/trunk/ST80-mt.183.mcz

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

Name: ST80-mt.183
Author: mt
Time: 1 May 2015, 8:49:18.781 pm
UUID: 2a9e776d-332f-1745-b070-49786b01e8b7
Ancestors: ST80-dtl.182

Some assumptions on model interface removed.

=============== Diff against ST80-dtl.182 ===============

Item was changed:
  ----- Method: StringHolderController>>userHasNotEdited (in category 'edit flag') -----
  userHasNotEdited
  "Note that my text is free of user edits."
 
+ model changed: #clearUserEdits.!
- model clearUserEditFlag
- !

Item was changed:
  ----- Method: StringHolderView>>promptForCancel (in category 'updating') -----
  promptForCancel
  "Ask if it is OK to cancel changes to text"
  | okToCancel stripes |
  self topView isCollapsed ifTrue:
  [(self confirm: 'Changes have not been saved.
+ Is it OK to cancel those changes?' translated) ifTrue: [model changed: #clearUserEdits].
- Is it OK to cancel those changes?' translated) ifTrue: [model clearUserEditFlag].
  ^ self].
  stripes := (Form extent: 16@16 fromStipple: 16r36C9) bits.
  Display border: self insetDisplayBox width: 4
  rule: Form reverse fillColor: stripes.
  okToCancel := self confirm: 'Changes have not been saved.
  Is it OK to cancel those changes?' translated.
  Display border: self insetDisplayBox width: 4
  rule: Form reverse fillColor: stripes.
  okToCancel ifTrue:
  [self updateDisplayContents.
+ model changed: #clearUserEdits].
- model clearUserEditFlag].
  !