diff options
Diffstat (limited to 'lisp/arc-mode.el')
| -rw-r--r-- | lisp/arc-mode.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/arc-mode.el b/lisp/arc-mode.el index ae5ff9a4dbc..c376070ea3b 100644 --- a/lisp/arc-mode.el +++ b/lisp/arc-mode.el @@ -895,7 +895,7 @@ using `make-temp-file', and the generated name is returned." (defun archive-extract (&optional other-window-p event) "In archive mode, extract this entry of the archive into its own buffer." (interactive (list nil last-input-event)) - (if event (mouse-set-point event)) + (if event (posn-set-point (event-end event))) (let* ((view-p (eq other-window-p 'view)) (descr (archive-get-descr)) (ename (aref descr 0)) |