--- a/XWorkstation.st Wed Nov 08 15:33:15 1995 +0100
+++ b/XWorkstation.st Thu Nov 09 01:08:10 1995 +0100
@@ -36,7 +36,7 @@
COPYRIGHT (c) 1989 by Claus Gittinger
All Rights Reserved
-$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.67 1995-11-03 12:33:08 cg Exp $
+$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.68 1995-11-09 00:08:10 stefan Exp $
'!
!XWorkstation class methodsFor:'documentation'!
@@ -57,7 +57,7 @@
version
"
-$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.67 1995-11-03 12:33:08 cg Exp $
+$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.68 1995-11-09 00:08:10 stefan Exp $
"
!
@@ -192,12 +192,12 @@
#define _FontVal(o) (XFontStruct *)(__MKCP(o))
#define _DPSContextVal(o) (DPSContext)(__MKCP(o))
-#define __MKATOMOBJ(a) __MKSMALLINT(a)
+#define __MKATOMOBJ(a) __MKSMALLINT(a)
#define _AtomVal(o) __intVal(o)
-#define __isAtomID(o) __isSmallInteger(o)
-
-#define myDpy _DisplayVal(_INST(displayId))
-#define ISCONNECTED (_INST(displayId) != nil)
+#define __isAtomID(o) __isSmallInteger(o)
+
+#define myDpy _DisplayVal(_INST(displayId))
+#define ISCONNECTED (_INST(displayId) != nil)
#ifndef THISCONTEXT_IN_REGISTER
# define BEGIN_INTERRUPTSBLOCKED /* */
@@ -3076,6 +3076,8 @@
family:'courier'
weight:'medium'
slant:'r'
+ spacing:nil
+ pixelSize:nil
size:13
registry:'iso8859'
encoding:'*'