--- a/NeXTWorkstation.st	Wed Jan 03 20:34:38 1996 +0100
+++ b/NeXTWorkstation.st	Thu Jan 04 18:04:17 1996 +0100
@@ -30,7 +30,7 @@
 
 All non-monochrome stuff is untested (I only have a monochroome station)
 
-$Header: /cvs/stx/stx/libview/NeXTWorkstation.st,v 1.13 1995-11-24 15:20:02 cg Exp $
+$Header: /cvs/stx/stx/libview/NeXTWorkstation.st,v 1.14 1996-01-04 17:04:10 cg Exp $
 written spring 92 by claus
 '!
 
@@ -400,14 +400,13 @@
 	char **cp;
 	int count, i;
 	static struct inlineCache dummy1 = _DUMMYILC1;
-	extern OBJ _new_;
 	OBJ arr;
 
 	names = (char **) _objc_availableFonts(_FontManager_new());
 	/* count them */
 	for (cp = names; *cp; cp++) ;;
 	count = cp - names;
-	arr = _SEND1(Array, _new_, CON_COMMA nil, &dummy1, _MKSMALLINT(count));
+	arr = _SEND1(@global(Array), @symbol(new:), CON_COMMA nil, &dummy1, _MKSMALLINT(count));
 	for (i=0; i<count;i++)
 	    _ArrayInstPtr(arr)->a_element[i] = _MKSTRING(names[i] COMMA_CON);
 	free(names);