Status: Accepted
Owner:
[hidden email]
Labels: Milestone-1.5
New issue 5456 by
[hidden email]: ClassBuilder depends on Text
http://code.google.com/p/pharo/issues/detail?id=5456 From The Mailing list:
ClassBuilder>>validateClassName: aString
"Validate the new class name"
| allowed |
aString isSymbol
ifFalse: [ ^ false ].
allowed := ($0 to: $9), {$_}, ($A to: $Z), ($a to: $z).
(aString detect: [:c | (allowed includes: c) not] ifNone: [ ])
ifNotNil: [ :c | self error: 'Invalid character: ''', c
printString, ''''.
^ false].
aString first canBeGlobalVarInitial ifFalse:[
self error: 'Class names must be capitalized'.
^false].
environ at: aString ifPresent:[:old|
(old isKindOf: Behavior) ifFalse:[
self notify: aString asText allBold,
' already exists!\Proceed will store over it.'
withCRs]].
^ true
Is it right to do that asText allBold there? :S
Shouldn't an exception be raised instead?
_______________________________________________
Pharo-bugtracker mailing list
[hidden email]
http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-bugtracker