(match-string-no-properties): Use substring-no-properties.

[gnu-emacs] / lisp / tempo.el

diff --git a/lisp/tempo.el b/lisp/tempo.el
index 4c58a4bca9a2ea4b5bd42ad295230c00ffa3f88c..3ceb3e271f4dcfed61dc19b9e19e39b4c75f70af 100644 (file)
--- a/lisp/tempo.el
+++ b/lisp/tempo.el
@@ -279,7 +279,7 @@ The elements in ELEMENTS can be of several types:
         (command-name template-name))
     (set template-name elements)
     (fset command-name (list 'lambda (list '&optional 'arg)
-                            (or documentation 
+                            (or documentation
                                 (concat "Insert a " name "."))
                             (list 'interactive "*P")
                             (list 'tempo-insert-template (list 'quote
@@ -540,7 +540,7 @@ and insert the results."
               (setq lp (cdr lp)))
             (if (not (= mark (car lp)))
                 (setcdr lp (cons mark (cdr lp))))))))
-         
+
 ;;;
 ;;; tempo-forward-mark
 
@@ -577,7 +577,7 @@ and insert the results."
                       last))))
     (if prev-mark
        (goto-char prev-mark))))
-       
+
 ;;;
 ;;; tempo-add-tag
 
@@ -755,4 +755,5 @@ space bar, and looks something like this:
 
 (provide 'tempo)
 
+;;; arch-tag: b3c0ee36-db3b-47bc-875f-091b4e27a063
 ;;; tempo.el ends here