diff options
| author | Glenn Morris | 2013-09-04 19:55:08 -0400 |
|---|---|---|
| committer | Glenn Morris | 2013-09-04 19:55:08 -0400 |
| commit | 1c3ac2e53e3bb7e9278b360378731e3539b8256c (patch) | |
| tree | 54beeb0dd18abf536256a7d4e4894c277ac5b412 | |
| parent | 0c90b9eed9ce554816c9ca55d3aa30d6203d1679 (diff) | |
| download | emacs-1c3ac2e53e3bb7e9278b360378731e3539b8256c.tar.gz emacs-1c3ac2e53e3bb7e9278b360378731e3539b8256c.zip | |
rul-generic-mode-syntax-table fix for recent cc-mode changes
* lisp/generic-x.el [rul-generic-mode]: Require cc-mode.
(c++-mode-syntax-table): Declare.
(rul-generic-mode-syntax-table): Init in the defvar.
| -rw-r--r-- | lisp/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/generic-x.el | 24 |
2 files changed, 20 insertions, 10 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 1e8165a0a1e..dab13ce7e4d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,9 @@ | |||
| 1 | 2013-09-04 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * generic-x.el [rul-generic-mode]: Require cc-mode. | ||
| 4 | (c++-mode-syntax-table): Declare. | ||
| 5 | (rul-generic-mode-syntax-table): Init in the defvar. | ||
| 6 | |||
| 1 | 2013-09-04 Stefan Monnier <monnier@iro.umontreal.ca> | 7 | 2013-09-04 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 8 | ||
| 3 | * autorevert.el (auto-revert-notify-handler): Explicitly ignore | 9 | * autorevert.el (auto-revert-notify-handler): Explicitly ignore |
diff --git a/lisp/generic-x.el b/lisp/generic-x.el index c964b53952e..e722333d49b 100644 --- a/lisp/generic-x.el +++ b/lisp/generic-x.el | |||
| @@ -1283,18 +1283,22 @@ like an INI file. You can add this hook to `find-file-hook'." | |||
| 1283 | "WIN32SMINOR") | 1283 | "WIN32SMINOR") |
| 1284 | "Function argument constants used in InstallShield 3 and 5.")) | 1284 | "Function argument constants used in InstallShield 3 and 5.")) |
| 1285 | 1285 | ||
| 1286 | (defvar rul-generic-mode-syntax-table nil | 1286 | ;; c++-mode-syntax-table used to be autoloaded, with an initial nil value. |
| 1287 | ;; This file did not load cc-mode, and therefore rul-generic-mode-syntax-table | ||
| 1288 | ;; would have different values according to whether or not cc-mode | ||
| 1289 | ;; happened to be loaded before this file was. | ||
| 1290 | (require 'cc-mode) | ||
| 1291 | (defvar c++-mode-syntax-table) | ||
| 1292 | |||
| 1293 | (defvar rul-generic-mode-syntax-table | ||
| 1294 | (let ((table (make-syntax-table c++-mode-syntax-table))) | ||
| 1295 | (modify-syntax-entry ?\r "> b" table) | ||
| 1296 | (modify-syntax-entry ?\n "> b" table) | ||
| 1297 | (modify-syntax-entry ?/ ". 124b" table) | ||
| 1298 | (modify-syntax-entry ?* ". 23" table) | ||
| 1299 | table) | ||
| 1287 | "Syntax table to use in `rul-generic-mode' buffers.") | 1300 | "Syntax table to use in `rul-generic-mode' buffers.") |
| 1288 | 1301 | ||
| 1289 | (setq rul-generic-mode-syntax-table | ||
| 1290 | (make-syntax-table c++-mode-syntax-table)) | ||
| 1291 | |||
| 1292 | (modify-syntax-entry ?\r "> b" rul-generic-mode-syntax-table) | ||
| 1293 | (modify-syntax-entry ?\n "> b" rul-generic-mode-syntax-table) | ||
| 1294 | |||
| 1295 | (modify-syntax-entry ?/ ". 124b" rul-generic-mode-syntax-table) | ||
| 1296 | (modify-syntax-entry ?* ". 23" rul-generic-mode-syntax-table) | ||
| 1297 | |||
| 1298 | ;; here manually instead | 1302 | ;; here manually instead |
| 1299 | (defun generic-rul-mode-setup-function () | 1303 | (defun generic-rul-mode-setup-function () |
| 1300 | (make-local-variable 'parse-sexp-ignore-comments) | 1304 | (make-local-variable 'parse-sexp-ignore-comments) |