--- a/Tools__NewSystemBrowser.st Thu Dec 13 00:00:48 2012 +0100
+++ b/Tools__NewSystemBrowser.st Thu Dec 13 00:07:37 2012 +0100
@@ -40957,7 +40957,7 @@
initialAnswer:suggestion.
newProtocol isNil ifTrue:[^ self].
- newProtocol bitsPerCharacter > 8 ifTrue:[
+ newProtocol isWideString ifTrue:[
Dialog warn:'Sorry - for now, non-ascii categories are not allowed (no 2-byte symbols).'.
^ self.
].
@@ -41132,7 +41132,7 @@
newCategory = currentMethodCategory ifTrue:[^ self].
- newCategory bitsPerCharacter > 8 ifTrue:[
+ newCategory isWideString ifTrue:[
Dialog warn:'Sorry - for now, non-ascii categories are not allowed (no 2-byte symbols).'.
^ self.
].
@@ -58049,11 +58049,11 @@
!NewSystemBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1825 2012-12-12 12:19:40 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1826 2012-12-12 23:07:37 stefan Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1825 2012-12-12 12:19:40 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1826 2012-12-12 23:07:37 stefan Exp $'
!
version_SVN