Mercurial > hg > xemacs-beta

comparison lisp/mouse.el @ 4790:bc4f2511bbea

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Remove support for the OffiX drag-and-drop protocol. See xemacs-patches message with ID <870180fe0912211421m3e3d7891pdadefef167b50cb4@mail.gmail.com>.
author Jerry James <james@xemacs.org>
date Tue, 22 Dec 2009 15:52:06 -0700
parents e29fcfd8df5f
children f00192e1cd49 308d34e9f07d
comparison
equal deleted inserted replaced
4789:56049bea9231 4790:bc4f2511bbea
229 "Begin a drag-n-drop operation. 229 "Begin a drag-n-drop operation.
230 EVENT should be the button event that initiated the drag. 230 EVENT should be the button event that initiated the drag.
231 Returns whether a drag was begun." 231 Returns whether a drag was begun."
232 ;; #### barely implemented. 232 ;; #### barely implemented.
233 (when (click-inside-selection-p event) 233 (when (click-inside-selection-p event)
234 (cond ((featurep 'offix) 234 (cond ((featurep 'cde)
235 (declare-fboundp
236 (offix-start-drag-region
237 event
238 (extent-start-position zmacs-region-extent)
239 (extent-end-position zmacs-region-extent)))
240 t)
241 ((featurep 'cde)
242 ;; should also work with CDE
243 (declare-fboundp 235 (declare-fboundp
244 (cde-start-drag-region event 236 (cde-start-drag-region event
245 (extent-start-position zmacs-region-extent) 237 (extent-start-position zmacs-region-extent)
246 (extent-end-position zmacs-region-extent))) 238 (extent-end-position zmacs-region-extent)))
247 t)))) 239 t))))