diff options
| -rw-r--r-- | lisp/term/w32-win.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/term/w32-win.el b/lisp/term/w32-win.el index 7c4e1c2089a..5f1f6d4ab09 100644 --- a/lisp/term/w32-win.el +++ b/lisp/term/w32-win.el | |||
| @@ -155,7 +155,9 @@ | |||
| 155 | "Edit the files listed in the drag-n-drop event. | 155 | "Edit the files listed in the drag-n-drop event. |
| 156 | Switch to a buffer editing the last file dropped." | 156 | Switch to a buffer editing the last file dropped." |
| 157 | (interactive "e") | 157 | (interactive "e") |
| 158 | (mapcar 'find-file (car (cdr (cdr event)))) | 158 | (save-excursion |
| 159 | (set-frame-selected-window nil (posn-window (event-start event))) | ||
| 160 | (mapcar 'find-file (car (cdr (cdr event))))) | ||
| 159 | (raise-frame)) | 161 | (raise-frame)) |
| 160 | 162 | ||
| 161 | (defun w32-drag-n-drop-other-frame (event) | 163 | (defun w32-drag-n-drop-other-frame (event) |