diff options
author | John Paul Wallington <jpw@pobox.com> | 2005-11-26 19:05:52 +0000 |
---|---|---|
committer | John Paul Wallington <jpw@pobox.com> | 2005-11-26 19:05:52 +0000 |
commit | 440e20fca8ca31db13d56cf46ccbca0925e1e501 (patch) | |
tree | e88fb7a7209d19950067148984dc10523e398c36 /lisp/arc-mode.el | |
parent | 1be0210d3aaa6d058b5da022f9ecaba5b02f4d84 (diff) | |
download | emacs-440e20fca8ca31db13d56cf46ccbca0925e1e501.tar.gz |
(archive-extract): Use `posn-set-point' instead of `mouse-set-point'
because the latter is not fbound when configured without X.
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)) |