diff options
author | Thien-Thi Nguyen <ttn@gnuvola.org> | 2005-03-12 17:02:32 +0000 |
---|---|---|
committer | Thien-Thi Nguyen <ttn@gnuvola.org> | 2005-03-12 17:02:32 +0000 |
commit | 09d252f261e9f4ade167a8e1a30bebd036b0752a (patch) | |
tree | 02ea9aa4db1d9c3c8e290e62efd9ba5704fc029b /lisp/progmodes/dcl-mode.el | |
parent | 866920e3deb3cc941eeaf518c367c2f5b668231d (diff) | |
download | emacs-09d252f261e9f4ade167a8e1a30bebd036b0752a.tar.gz emacs-09d252f261e9f4ade167a8e1a30bebd036b0752a.tar.bz2 emacs-09d252f261e9f4ade167a8e1a30bebd036b0752a.zip |
(dcl-mode-syntax-table): Add entry for backslash.
Diffstat (limited to 'lisp/progmodes/dcl-mode.el')
-rw-r--r-- | lisp/progmodes/dcl-mode.el | 4 |
1 files changed, 2 insertions, 2 deletions
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 ) |