changeset 67138:aa8ad01ef0c1

(archive-extract): Use `posn-set-point' instead of `mouse-set-point' because the latter is not fbound when configured without X.
author John Paul Wallington <jpw@pobox.com>
date Sat, 26 Nov 2005 19:04:31 +0000
parents e7255c96eae5
children 652cde3d901f
files lisp/arc-mode.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/arc-mode.el	Sat Nov 26 15:52:10 2005 +0000
+++ b/lisp/arc-mode.el	Sat Nov 26 19:04:31 2005 +0000
@@ -895,7 +895,7 @@
 (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))