summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMarco Wahl <marcowahlsoft@gmail.com>2018-03-28 11:04:08 +0200
committerNoam Postavsky <npostavs@gmail.com>2018-04-07 10:11:29 -0400
commita4291bf287af6ee5a2cf031f8b442674342714df (patch)
tree370e75916f41e709e8d04868fa4a888e1dd8f1f7
parent8d3bb7beb4bfab60ba31505728f8f945116d7a40 (diff)
downloademacs-a4291bf287af6ee5a2cf031f8b442674342714df.tar.gz
Fix goto page from page directory (Bug#28909)
* lisp/textmodes/page-ext.el (pages-directory-goto): Use the interactive spec as in `occur-mode-goto-occurrence'.
-rw-r--r--lisp/textmodes/page-ext.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/textmodes/page-ext.el b/lisp/textmodes/page-ext.el
index 8a41bc37422..fbdae5892a1 100644
--- a/lisp/textmodes/page-ext.el
+++ b/lisp/textmodes/page-ext.el
@@ -699,7 +699,7 @@ to the same line in the pages buffer."
(defun pages-directory-goto (&optional event)
"Go to the corresponding line in the pages buffer."
;; This function is mostly a copy of `occur-mode-goto-occurrence'
- (interactive "@e")
+ (interactive (list last-nonmenu-event))
(if event (mouse-set-point event))
(if (or (not pages-buffer)
(not (buffer-name pages-buffer)))