diff options
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/progmodes/dcl-mode.el | 4 |
2 files changed, 7 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ec709fe6a55..e0c9762078b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2005-03-12 Thien-Thi Nguyen <ttn@gnu.org> + + * progmodes/dcl-mode.el (dcl-mode-syntax-table): + Add entry for backslash. + 2005-03-12 Juri Linkov <juri@jurta.org> * info.el (Info-search): Four fixes for backward search. diff --git a/lisp/progmodes/dcl-mode.el b/lisp/progmodes/dcl-mode.el index 861c3bbb8c6..81ed7780a64 100644 --- a/lisp/progmodes/dcl-mode.el +++ b/lisp/progmodes/dcl-mode.el @@ -284,13 +284,13 @@ See `imenu-generic-expression' for details." (defvar dcl-mode-syntax-table nil "Syntax table used in DCL-buffers.") -(if dcl-mode-syntax-table - () +(unless dcl-mode-syntax-table (setq dcl-mode-syntax-table (make-syntax-table)) (modify-syntax-entry ?! "<" dcl-mode-syntax-table) ; comment start (modify-syntax-entry ?\n ">" dcl-mode-syntax-table) ; comment end (modify-syntax-entry ?< "(>" dcl-mode-syntax-table) ; < and ... (modify-syntax-entry ?> ")<" dcl-mode-syntax-table) ; > is a matching pair + (modify-syntax-entry ?\\ "_" dcl-mode-syntax-table) ; not an escape ) |