diff options
| author | Marco Wahl | 2018-03-28 11:04:08 +0200 |
|---|---|---|
| committer | Noam Postavsky | 2018-04-07 10:11:29 -0400 |
| commit | a4291bf287af6ee5a2cf031f8b442674342714df (patch) | |
| tree | 370e75916f41e709e8d04868fa4a888e1dd8f1f7 | |
| parent | 8d3bb7beb4bfab60ba31505728f8f945116d7a40 (diff) | |
| download | emacs-a4291bf287af6ee5a2cf031f8b442674342714df.tar.gz emacs-a4291bf287af6ee5a2cf031f8b442674342714df.zip | |
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.el | 2 |
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." | |||
| 699 | (defun pages-directory-goto (&optional event) | 699 | (defun pages-directory-goto (&optional event) |
| 700 | "Go to the corresponding line in the pages buffer." | 700 | "Go to the corresponding line in the pages buffer." |
| 701 | ;; This function is mostly a copy of `occur-mode-goto-occurrence' | 701 | ;; This function is mostly a copy of `occur-mode-goto-occurrence' |
| 702 | (interactive "@e") | 702 | (interactive (list last-nonmenu-event)) |
| 703 | (if event (mouse-set-point event)) | 703 | (if event (mouse-set-point event)) |
| 704 | (if (or (not pages-buffer) | 704 | (if (or (not pages-buffer) |
| 705 | (not (buffer-name pages-buffer))) | 705 | (not (buffer-name pages-buffer))) |