(gnus-article-mode-syntax-table): Specify matching

parenthesis for "<" and ">".  Suggested by Andreas Schwab
<schwab@suse.de>.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 135052f..bdec535 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2002-05-08  Kai Gro\e,A_\e(Bjohann  <Kai.Grossjohann@CS.Uni-Dortmund.DE>
+
+       * gnus-art.el (gnus-article-mode-syntax-table): Specify matching
+       parenthesis for "<" and ">".  Suggested by Andreas Schwab
+       <schwab@suse.de>.
+
 2002-05-07  Kai Gro\e,A_\e(Bjohann  <Kai.Grossjohann@CS.Uni-Dortmund.DE>
 
        * nnmail.el (nnmail-cache-insert): Prefer group-art over group

diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index 8baf876..c06f65c 100644 (file)
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -1282,8 +1282,8 @@ It is a string, such as \"PGP\". If nil, ask user."
   (let ((table (copy-syntax-table text-mode-syntax-table)))
     ;; This causes the citation match run O(2^n).
     ;; (modify-syntax-entry ?- "w" table)
-    (modify-syntax-entry ?> ")" table)
-    (modify-syntax-entry ?< "(" table)
+    (modify-syntax-entry ?> ")<" table)
+    (modify-syntax-entry ?< "(>" table)
     table)
   "Syntax table used in article mode buffers.
 Initialized from `text-mode-syntax-table.")