diff options
| author | Juri Linkov <juri@jurta.org> | 2011-09-18 22:56:12 +0300 |
|---|---|---|
| committer | Juri Linkov <juri@jurta.org> | 2011-09-18 22:56:12 +0300 |
| commit | 72753f87ca435108ba039078dfa0c833aefb453c (patch) | |
| tree | 56af0f5b87036b427ae8ba8702a04b38e6a63880 /lisp/info.el | |
| parent | c9384295aa5f189930013c80955748604d10dd52 (diff) | |
* lisp/info.el (Info-mode-syntax-table): New variable.
(Info-mode): Set `:syntax-table' to `Info-mode-syntax-table'.
Fixes: debbugs:3312
Diffstat (limited to 'lisp/info.el')
| -rw-r--r-- | lisp/info.el | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/lisp/info.el b/lisp/info.el index 42278621bb..eb45bb0bd2 100644 --- a/lisp/info.el +++ b/lisp/info.el @@ -3887,6 +3887,14 @@ With a zero prefix arg, put the name inside a function call to `info'." (defvar tool-bar-map) (defvar bookmark-make-record-function) +(defvar Info-mode-syntax-table + (let ((st (copy-syntax-table text-mode-syntax-table))) + ;; Use punctuation syntax for apostrophe because of + ;; extensive use of quotes like `this' in Info manuals. + (modify-syntax-entry ?' "." st) + st) + "Syntax table used in `Info-mode'.") + ;; Autoload cookie needed by desktop.el ;;;###autoload (define-derived-mode Info-mode nil "Info" @@ -3951,7 +3959,7 @@ Advanced commands: \\[clone-buffer] Select a new cloned Info buffer in another window. \\[universal-argument] \\[info] Move to new Info file with completion. \\[universal-argument] N \\[info] Select Info buffer with prefix number in the name *info*<N>." - :syntax-table text-mode-syntax-table + :syntax-table Info-mode-syntax-table :abbrev-table text-mode-abbrev-table (setq tab-width 8) (add-hook 'activate-menubar-hook 'Info-menu-update nil t) |