--- a/GLXWorkstation.st	Tue Mar 19 19:00:46 1996 +0100
+++ b/GLXWorkstation.st	Tue Mar 19 19:53:20 1996 +0100
@@ -2966,15 +2966,15 @@
      arguments must be arrays of 16 floats containing the patch"
 
 %{  /* NOCONTEXT */
-    Matrix matrixX, matrixY, matrixZ, matrixM;
-    Matrix *mX, *mY, *mZ, *mM;
+    Matrix matrixX, matrixY, matrixZ, matrixW;
+    Matrix *mX, *mY, *mZ, *mW;
 
     if (! (mX = getFloatsFromMatrixInto(arrayOf16XFloats, &matrixX))) RETURN (false);
     if (! (mY = getFloatsFromMatrixInto(arrayOf16YFloats, &matrixY))) RETURN (false);
     if (! (mZ = getFloatsFromMatrixInto(arrayOf16ZFloats, &matrixZ))) RETURN (false);
-    if (! (mM = getFloatsFromMatrixInto(arrayOf16MFloats, &matrixM))) RETURN (false);
-    SETWIN(aGLXWindowId)
-    rpatch(*mX, *mY, *mZ, *mM);
+    if (! (mW = getFloatsFromMatrixInto(arrayOf16WFloats, &matrixW))) RETURN (false);
+    SETWIN(aGLXWindowId)
+    rpatch(*mX, *mY, *mZ, *mW);
     RETURN (true);
 %}
 
@@ -8022,5 +8022,5 @@
 !GLXWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/GLXWorkstation.st,v 1.47 1996-03-19 18:00:46 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/GLXWorkstation.st,v 1.48 1996-03-19 18:53:20 cg Exp $'
 ! !