Tools__NewSystemBrowser.st
changeset 12083 5a0c97fc2031
parent 12078 f61b6eaa52b7
child 12086 95013d4cc1a9
--- 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