aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuanma Barranquero2005-07-04 03:44:33 +0000
committerJuanma Barranquero2005-07-04 03:44:33 +0000
commitd1218e3e1ff9d892c0c41a91529d7b33c84ffb77 (patch)
tree752bbba9e76f458a1aa7c34add8111141f28faef
parentec85195e69ebdcb5b078fde306b9442f86d0c94b (diff)
downloademacs-d1218e3e1ff9d892c0c41a91529d7b33c84ffb77.tar.gz
emacs-d1218e3e1ff9d892c0c41a91529d7b33c84ffb77.zip
(tex-file, tex-run, tex-view): Finish `defgroup' description with period.
(tex-insert-quote, latex-find-indent): "?\ " -> "?\s".
-rw-r--r--lisp/textmodes/tex-mode.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el
index 7d04464346a..e0f1d78bb31 100644
--- a/lisp/textmodes/tex-mode.el
+++ b/lisp/textmodes/tex-mode.el
@@ -40,17 +40,17 @@
40(require 'compile) 40(require 'compile)
41 41
42(defgroup tex-file nil 42(defgroup tex-file nil
43 "TeX files and directories" 43 "TeX files and directories."
44 :prefix "tex-" 44 :prefix "tex-"
45 :group 'tex) 45 :group 'tex)
46 46
47(defgroup tex-run nil 47(defgroup tex-run nil
48 "Running external commands from TeX mode" 48 "Running external commands from TeX mode."
49 :prefix "tex-" 49 :prefix "tex-"
50 :group 'tex) 50 :group 'tex)
51 51
52(defgroup tex-view nil 52(defgroup tex-view nil
53 "Viewing and printing TeX files" 53 "Viewing and printing TeX files."
54 :prefix "tex-" 54 :prefix "tex-"
55 :group 'tex) 55 :group 'tex)
56 56
@@ -1114,7 +1114,7 @@ inserts \" characters."
1114 (delete-char (length tex-open-quote)) 1114 (delete-char (length tex-open-quote))
1115 t))) 1115 t)))
1116 (self-insert-command (prefix-numeric-value arg)) 1116 (self-insert-command (prefix-numeric-value arg))
1117 (insert (if (memq (char-syntax (preceding-char)) '(?\( ?> ?\ )) 1117 (insert (if (memq (char-syntax (preceding-char)) '(?\( ?> ?\s))
1118 tex-open-quote tex-close-quote)))) 1118 tex-open-quote tex-close-quote))))
1119 1119
1120(defun tex-validate-buffer () 1120(defun tex-validate-buffer ()
@@ -2421,7 +2421,7 @@ There might be text before point."
2421 (+ indent (current-column) tex-indent-item)) 2421 (+ indent (current-column) tex-indent-item))
2422 (t 2422 (t
2423 (let ((col (current-column))) 2423 (let ((col (current-column)))
2424 (if (or (not (eq (char-syntax (or (char-after pos) ?\ )) ?\()) 2424 (if (or (not (eq (char-syntax (or (char-after pos) ?\s)) ?\())
2425 ;; Can't be an arg if there's an empty line inbetween. 2425 ;; Can't be an arg if there's an empty line inbetween.
2426 (save-excursion (re-search-forward "^[ \t]*$" pos t))) 2426 (save-excursion (re-search-forward "^[ \t]*$" pos t)))
2427 ;; If the first char was not an open-paren, there's 2427 ;; If the first char was not an open-paren, there's