emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] 73/299: * tex.el (TeX-add-local-master): Remove trailing spaces f


From: Stefan Monnier
Subject: [elpa] 73/299: * tex.el (TeX-add-local-master): Remove trailing spaces from inserted lines.
Date: Sun, 02 Nov 2014 03:10:24 +0000

monnier pushed a commit to branch externals/auctex
in repository elpa.

commit d37820d9ca899285545ecdbae98daeb408a319e1
Author: Tassilo Horn <address@hidden>
Date:   Wed Mar 27 08:11:03 2013 +0000

    * tex.el (TeX-add-local-master): Remove trailing spaces from
    inserted lines.
---
 ChangeLog |    5 +++++
 tex.el    |    6 +++---
 2 files changed, 8 insertions(+), 3 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index d1186eb..897e913 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2013-03-27  Mos� Giordano  <address@hidden>
+
+       * tex.el (TeX-add-local-master): Remove trailing spaces from
+       inserted lines.
+
 2013-03-07  Tassilo Horn  <address@hidden>
 
        * latex.el (TeX-read-key-val): New function.
diff --git a/tex.el b/tex.el
index 432dbfd..e914572 100644
--- a/tex.el
+++ b/tex.el
@@ -2109,7 +2109,7 @@ the beginning of the file, but that feature will be 
phased out."
                           (file-name-nondirectory (buffer-file-name)))
             (not buffer-read-only))
     (goto-char (point-max))
-    (if (re-search-backward (concat "^\\([^\n]+\\)Local " "Variables:")
+    (if (re-search-backward "^\\([^\n]+\\)Local Variables:"
                            (- (point-max) 3000) t)
        (let ((prefix (TeX-match-buffer 1)))
          (re-search-forward (regexp-quote (concat prefix
@@ -2126,10 +2126,10 @@ the beginning of the file, but that feature will be 
phased out."
        (when (eq major-mode 'doctex-mode)
          (insert comment-prefix TeX-esc "endinput\n"))
        (insert
-        comment-prefix "Local " "Variables: \n"
+        comment-prefix "Local Variables:\n"
         comment-prefix "mode: " mode "\n"
         comment-prefix "TeX-master: " (prin1-to-string TeX-master) "\n"
-        comment-prefix "End: \n")))))
+        comment-prefix "End:\n")))))
 
 (defun TeX-local-master-p ()
   "Return non-nil if there is a `TeX-master' entry in local variables spec.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]