aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorJan Djärv2005-10-03 19:41:49 +0000
committerJan Djärv2005-10-03 19:41:49 +0000
commit03714c7f0986a62aeaa1390d3125c064fbcef45e (patch)
tree7604d13fd94f0136814c14c94012b49ec1522780 /lisp
parent9a49a36bdbdbef7dad75721cc65564150a03fa14 (diff)
downloademacs-03714c7f0986a62aeaa1390d3125c064fbcef45e.tar.gz
emacs-03714c7f0986a62aeaa1390d3125c064fbcef45e.zip
* x-dnd.el (x-dnd-drop-data): Don't set dnd-open-file-other-window
to nil if dropping on a window. Handle dropping on a minibuffer window like dropping on a non-window part of Emacs.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog6
-rw-r--r--lisp/x-dnd.el5
2 files changed, 9 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8e5d78668cf..c9f8ac610ff 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
12005-10-03 Jan Dj,Ad(Brv <jan.h.d@swipnet.se>
2
3 * x-dnd.el (x-dnd-drop-data): Don't set dnd-open-file-other-window
4 to nil if dropping on a window. Handle dropping on a minibuffer window
5 like dropping on a non-window part of Emacs.
6
12005-10-03 Stefan Monnier <monnier@iro.umontreal.ca> 72005-10-03 Stefan Monnier <monnier@iro.umontreal.ca>
2 8
3 * textmodes/ispell.el (ispell-find-aspell-dictionaries): 9 * textmodes/ispell.el (ispell-find-aspell-dictionaries):
diff --git a/lisp/x-dnd.el b/lisp/x-dnd.el
index 612e033c4cb..4b23665bca2 100644
--- a/lisp/x-dnd.el
+++ b/lisp/x-dnd.el
@@ -307,10 +307,11 @@ nil if not."
307 (action (aref state 5)) 307 (action (aref state 5))
308 (w (posn-window (event-start event)))) 308 (w (posn-window (event-start event))))
309 (when handler 309 (when handler
310 (if (and (windowp w) (window-live-p w)) 310 (if (and (windowp w) (window-live-p w)
311 (not (minibufferp (window-buffer w))))
311 ;; If dropping in a window, open files in that window rather 312 ;; If dropping in a window, open files in that window rather
312 ;; than in a new widow. 313 ;; than in a new widow.
313 (let ((dnd-open-file-other-window nil)) 314 (progn
314 (goto-char (posn-point (event-start event))) 315 (goto-char (posn-point (event-start event)))
315 (funcall handler window action data)) 316 (funcall handler window action data))
316 (let ((dnd-open-file-other-window t)) ;; Dropping on non-window. 317 (let ((dnd-open-file-other-window t)) ;; Dropping on non-window.