The Trunk: Monticello-cmm.588.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: Monticello-cmm.588.mcz

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

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

Name: Monticello-cmm.588
Author: cmm
Time: 16 March 2014, 8:45:32.093 pm
UUID: b4b776b2-3cd0-43c5-a29f-a252ead0af80
Ancestors: Monticello-cmm.587

Don't argue with the user if they don't want to supply a password.

=============== Diff against Monticello-cmm.587 ===============

Item was changed:
  ----- Method: MCHttpRepository>>password (in category 'accessing') -----
  password
  self userAndPasswordFromSettingsDo: [:usr :pwd | ^pwd].
 
  self user isEmpty ifTrue: [^password ifNil: ['']].
 
+ password isEmptyOrNil ifTrue: [
- [password isEmptyOrNil] whileTrue: [
  | answer |
  "Give the user a chance to change the login"
  answer := UIManager default request: 'User name for ', String cr, location
  initialAnswer: self user.
  answer isEmpty
  ifTrue: [^password]
  ifFalse: [self user: answer].
 
  password := UIManager default requestPassword: 'Password for "', self user, '" at ', String cr, location.
  ].
 
  ^ password!