[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/progmodes/dcl-mode.el
From: |
Thien-Thi Nguyen |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/progmodes/dcl-mode.el |
Date: |
Sat, 12 Mar 2005 11:58:53 -0500 |
Index: emacs/lisp/progmodes/dcl-mode.el
diff -c emacs/lisp/progmodes/dcl-mode.el:1.12
emacs/lisp/progmodes/dcl-mode.el:1.13
*** emacs/lisp/progmodes/dcl-mode.el:1.12 Mon Sep 1 15:45:35 2003
--- emacs/lisp/progmodes/dcl-mode.el Sat Mar 12 16:58:50 2005
***************
*** 284,296 ****
(defvar dcl-mode-syntax-table nil
"Syntax table used in DCL-buffers.")
! (if 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
)
--- 284,296 ----
(defvar dcl-mode-syntax-table nil
"Syntax table used in DCL-buffers.")
! (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
)
- [Emacs-diffs] Changes to emacs/lisp/progmodes/dcl-mode.el,
Thien-Thi Nguyen <=