mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-26 07:33:47 +00:00
Code Issues Releases Activity

(archive-extract): Use posn-set-point' instead of mouse-set-point'

Browse Source 
because the latter is not fbound when configured without X.
This commit is contained in:
John Paul Wallington 2005-11-26 19:05:52 +00:00
parent 1be0210d3a
commit 440e20fca8
2 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/ChangeLog
View File

@ -1,3 +1,9 @@
2005-11-26 John Paul Wallington <jpw@pobox.com>
* arc-mode.el (archive-extract): Use `posn-set-point' instead of
`mouse-set-point' because the latter is not fbound when configured
without X.
2005-11-26 Thien-Thi Nguyen <ttn@gnu.org>
* files.el (file-relative-name): Doc fix.

2
lisp/arc-mode.el
View File

@ -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))