Mercurial Mercurial > hg > stx-libview / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Thu, 13 Feb 1997 14:25:34 +0100
changeset 1345 ffbabb7f640f
parent 1344 f19217b30901
child 1346 619cd027ce68
*** empty log message ***
XWorkstat.st file | annotate | diff | comparison | revisions
XWorkstation.st file | annotate | diff | comparison | revisions 
--- a/XWorkstat.st	Thu Feb 13 14:03:44 1997 +0100
+++ b/XWorkstat.st	Thu Feb 13 14:25:34 1997 +0100
@@ -3427,6 +3427,7 @@
         self
             sendSelection:s 
             property:propertyID 
+            target:targetID
             from:aView id 
             to:windowID.
         ^ self
@@ -3999,7 +4000,7 @@
 	    selectionID = __MKATOMOBJ(ev->xselectionrequest.selection);
 	    requestorID = __MKOBJ(ev->xselectionrequest.requestor);
 	    (*selReq.ilc_func)(self, 
-			       @symbol(selectionRequest:target:selection:from:) 
+			       @symbol(selectionRequest:target:selection:from:view:) 
 			       , nil, &selReq,
 			       propertyID, targetID, selectionID, requestorID,
 			       theView);
@@ -8631,6 +8632,6 @@
 !XWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Attic/XWorkstat.st,v 1.204 1997-02-13 13:03:44 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Attic/XWorkstat.st,v 1.205 1997-02-13 13:25:34 cg Exp $'
 ! !
 XWorkstation initialize!
--- a/XWorkstation.st	Thu Feb 13 14:03:44 1997 +0100
+++ b/XWorkstation.st	Thu Feb 13 14:25:34 1997 +0100
@@ -3427,6 +3427,7 @@
         self
             sendSelection:s 
             property:propertyID 
+            target:targetID
             from:aView id 
             to:windowID.
         ^ self
@@ -3999,7 +4000,7 @@
 	    selectionID = __MKATOMOBJ(ev->xselectionrequest.selection);
 	    requestorID = __MKOBJ(ev->xselectionrequest.requestor);
 	    (*selReq.ilc_func)(self, 
-			       @symbol(selectionRequest:target:selection:from:) 
+			       @symbol(selectionRequest:target:selection:from:view:) 
 			       , nil, &selReq,
 			       propertyID, targetID, selectionID, requestorID,
 			       theView);
@@ -8631,6 +8632,6 @@
 !XWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.204 1997-02-13 13:03:44 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.205 1997-02-13 13:25:34 cg Exp $'
 ! !
 XWorkstation initialize!
hg/stx-libview