--- a/GLXWorkstation.st	Sun Jul 02 14:54:33 2000 +0200
+++ b/GLXWorkstation.st	Sun Jul 02 14:55:42 2000 +0200
@@ -10,6 +10,8 @@
  hereby transferred.
 "
 
+"{ Package: 'stx:libview' }"
+
 XWorkstation subclass:#GLXWorkstation
 	instanceVariableNames:'activeWindow hasStereoExtension glOK'
 	classVariableNames:'ForceGL'
@@ -4472,6 +4474,18 @@
     "
 !
 
+isOpenGL
+    "return true, if this is an openGL (as opposed to a GL)"
+
+%{  /* NOCONTEXT */
+#ifdef OPENGL
+    RETURN ( true );
+#else
+    RETURN ( false );
+#endif
+%}
+!
+
 isTrueGL
     "return true, if this is a true GL (as opposed to a simulated VOGL).
      Returns false for all openGL systems."
@@ -4482,23 +4496,10 @@
 #else
 # ifdef GLX
     RETURN ( true );
-# else
-    RETURN (false);
 # endif
 #endif
-%}
-!
-
-isOpenGL
-    "return true, if this is an openGL (as opposed to a GL)"
-
-%{  /* NOCONTEXT */
-#ifdef OPENGL
-    RETURN ( true );
-#else
-    RETURN ( false );
-#endif
-%}
+%}.
+    ^ false
 !
 
 maxZValue
@@ -8799,5 +8800,5 @@
 !GLXWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/GLXWorkstation.st,v 1.76 1999-07-30 18:12:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/GLXWorkstation.st,v 1.77 2000-07-02 12:55:42 cg Exp $'
 ! !