From 72753f87ca435108ba039078dfa0c833aefb453c Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Sun, 18 Sep 2011 22:56:12 +0300 Subject: [PATCH] * lisp/info.el (Info-mode-syntax-table): New variable. (Info-mode): Set `:syntax-table' to `Info-mode-syntax-table'. Fixes: debbugs:3312 --- lisp/ChangeLog | 5 +++++ lisp/info.el | 10 +++++++++- 2 files changed, 14 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 62cdd4d61c9..cdcd33877f9 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2011-09-18 Juri Linkov + + * info.el (Info-mode-syntax-table): New variable. + (Info-mode): Set `:syntax-table' to `Info-mode-syntax-table'. (Bug#3312) + 2011-09-18 Juri Linkov * info.el (Info-file-supports-index-cookies): Increment diff --git a/lisp/info.el b/lisp/info.el index 42278621bbc..eb45bb0bd2f 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*." - :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) -- 2.39.2