[Emacs-diffs] Changes to emacs/lisp/arc-mode.el

[John Paul Wallington]

Index: emacs/lisp/arc-mode.el
diff -c emacs/lisp/arc-mode.el:1.68 emacs/lisp/arc-mode.el:1.69
*** emacs/lisp/arc-mode.el:1.68 Sun Oct 16 17:05:23 2005
--- emacs/lisp/arc-mode.el      Sat Nov 26 19:04:31 2005
***************
*** 895,901 ****
  (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))
    (let* ((view-p (eq other-window-p 'view))
         (descr (archive-get-descr))
           (ename (aref descr 0))
--- 895,901 ----
  (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 (posn-set-point (event-end event)))
    (let* ((view-p (eq other-window-p 'view))
         (descr (archive-get-descr))
           (ename (aref descr 0))