XWorkstation.st
changeset 2011 47e72d42226b
parent 2007 454dc9a4010d
child 2021 67626c0fb1eb
--- a/XWorkstation.st	Thu Jan 22 16:29:17 1998 +0100
+++ b/XWorkstation.st	Sun Jan 25 15:09:42 1998 +0100
@@ -3318,7 +3318,7 @@
 	    l = i2 - i1 + 1;
 
 	    if ((cls == @global(String)) || (cls == @global(Symbol))) {
-		n = _stringSize(aString);
+		n = __stringSize(aString);
 		if (i2 < n) {
 		    cp += i1;
 		    if (l > 1000) l = 1000;
@@ -3438,7 +3438,7 @@
 	cp = (char *) __stringVal(aString);
 
 	if ((cls == @global(String)) || (cls == @global(Symbol))) {
-	    n = _stringSize(aString);
+	    n = __stringSize(aString);
 	    if (n > 1000) n = 1000;
 	    ENTER_XLIB();
 	    if (opaque == true)
@@ -6432,7 +6432,7 @@
 		l = i2 - i1 + 1;
 
 		if ((cls == @global(String)) || (cls == @global(Symbol))) {
-		    n = _stringSize(aString);
+		    n = __stringSize(aString);
 		    if (i2 < n) {
 			cp += i1;
 			BEGIN_INTERRUPTSBLOCKED
@@ -6542,7 +6542,7 @@
 	    cp = (char *) __stringVal(aString);
 
 	    if ((cls == @global(String)) || (cls == @global(Symbol))) {
-		n = _stringSize(aString);
+		n = __stringSize(aString);
 		BEGIN_INTERRUPTSBLOCKED
 	    	ENTER_XLIB();
 		len = XTextWidth(f, cp, n);
@@ -9864,6 +9864,6 @@
 !XWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.275 1998-01-22 13:19:51 tz Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.276 1998-01-25 14:09:42 cg Exp $'
 ! !
 XWorkstation initialize!