[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[AUCTeX-diffs] Changes to auctex/tex.el,v
From: |
Ralf Angeli |
Subject: |
[AUCTeX-diffs] Changes to auctex/tex.el,v |
Date: |
Sun, 01 Jul 2007 07:23:53 +0000 |
CVSROOT: /cvsroot/auctex
Module name: auctex
Changes by: Ralf Angeli <angeli> 07/07/01 07:23:53
Index: tex.el
===================================================================
RCS file: /cvsroot/auctex/auctex/tex.el,v
retrieving revision 5.608
retrieving revision 5.609
diff -u -b -r5.608 -r5.609
--- tex.el 9 Apr 2007 15:46:27 -0000 5.608
+++ tex.el 1 Jul 2007 07:23:53 -0000 5.609
@@ -4598,13 +4598,14 @@
(defun TeX-insert-dollar (&optional arg)
"Insert dollar sign.
-If current math mode was not entered with a dollar, refuse to insert one.
-Show matching dollar sign if this dollar sign ends the TeX math mode.
-Ensure double dollar signs match up correctly by inserting extra
-dollar signs when needed.
+If current math mode was not entered with a dollar, refuse to
+insert one. Show matching dollar sign if this dollar sign ends
+the TeX math mode and `blink-matching-paren' is non-nil. Ensure
+double dollar signs match up correctly by inserting extra dollar
+signs when needed.
-With raw \\[universal-argument] prefix, insert exactly one dollar sign.
-With optional ARG, insert that many dollar signs."
+With raw \\[universal-argument] prefix, insert exactly one dollar
+sign. With optional ARG, insert that many dollar signs."
(interactive "P")
(cond
((and arg (listp arg))
@@ -4625,8 +4626,10 @@
(if TeX-math-close-double-dollar
(insert (car texmathp-why))
(insert "$"))
- (when (or (string= (car texmathp-why) "$")
- (zerop (mod (save-excursion (skip-chars-backward "$")) 2)))
+ (when (and blink-matching-paren
+ (or (string= (car texmathp-why) "$")
+ (zerop (mod (save-excursion
+ (skip-chars-backward "$")) 2))))
(save-excursion
(goto-char (cdr texmathp-why))
(if (pos-visible-in-window-p)
- [AUCTeX-diffs] Changes to auctex/tex.el,v,
Ralf Angeli <=