don use strlen when setting a string prop;
it could be a collection of 0-terminated strings.
--- a/XWorkstat.st Sun Apr 06 13:42:57 1997 +0200
+++ b/XWorkstat.st Sun Apr 06 14:31:28 1997 +0200
@@ -2524,6 +2524,7 @@
idx := idx + 1
].
+val size printCR.
self
setProperty:(self atomIDOf:'DndSelection')
type:(stringAtom)
@@ -2544,6 +2545,7 @@
^ false
"Created: 6.4.1997 / 13:39:37 / cg"
+ "Modified: 6.4.1997 / 14:25:38 / cg"
!
dndDropTypes
@@ -7769,7 +7771,7 @@
XChangeProperty(dpy, window, prop, type, 8,
PropModeReplace,
__stringVal(anObject),
- strlen(__stringVal(anObject)));
+ __stringSize(anObject));
}
}
}
@@ -9135,6 +9137,6 @@
!XWorkstation class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/Attic/XWorkstat.st,v 1.230 1997-04-06 11:42:57 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/Attic/XWorkstat.st,v 1.231 1997-04-06 12:31:28 cg Exp $'
! !
XWorkstation initialize!
--- a/XWorkstation.st Sun Apr 06 13:42:57 1997 +0200
+++ b/XWorkstation.st Sun Apr 06 14:31:28 1997 +0200
@@ -2524,6 +2524,7 @@
idx := idx + 1
].
+val size printCR.
self
setProperty:(self atomIDOf:'DndSelection')
type:(stringAtom)
@@ -2544,6 +2545,7 @@
^ false
"Created: 6.4.1997 / 13:39:37 / cg"
+ "Modified: 6.4.1997 / 14:25:38 / cg"
!
dndDropTypes
@@ -7769,7 +7771,7 @@
XChangeProperty(dpy, window, prop, type, 8,
PropModeReplace,
__stringVal(anObject),
- strlen(__stringVal(anObject)));
+ __stringSize(anObject));
}
}
}
@@ -9135,6 +9137,6 @@
!XWorkstation class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.230 1997-04-06 11:42:57 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.231 1997-04-06 12:31:28 cg Exp $'
! !
XWorkstation initialize!