The Trunk: Monticello-cmm.639.mcz

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

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

Name: Monticello-cmm.639
Author: cmm
Time: 29 July 2016, 3:14:55.573436 pm
UUID: c40c17b7-6df1-42e2-8542-7769a54f7e08
Ancestors: Monticello-cmm.638

Avoid confirmation prompt when clicking Accept.

=============== Diff against Monticello-cmm.638 ===============

Item was changed:
  ----- Method: MCSaveVersionDialog>>accept (in category 'actions') -----
  accept
+ | logMessage logMessageWidget |
- | logMessage |
  self updateItems.
+ logMessage := (logMessageWidget := self findTextMorph: #logMessage) text asString.
+ (logMessage isEmpty or: [logMessage beginsWith: 'empty log message'])
+ ifTrue:
+ [(UIManager confirm: 'the log message is empty; are you sure you want to commit') ifFalse: [^ self]]
+ ifFalse: [logMessageWidget accept].
- logMessage := (self findTextMorph: #logMessage) text asString.
- (logMessage isEmpty or: [logMessage beginsWith: 'empty log message']) ifTrue:
- [(UIManager confirm: 'the log message is empty; are you sure you want to commit') ifFalse:
- [^self]].
  self answer:
  (Array
  with: (self findTextMorph: #versionName) text asString
  with: logMessage
+ with: ignore)!
- with: ignore)
- !