Update CEDET from upstream.

[gnu-emacs] / lisp / cedet / ede / pmake.el

diff --git a/lisp/cedet/ede/pmake.el b/lisp/cedet/ede/pmake.el
index bd5400bb615e3b45577e5d67f8dc271e62c17201..c638a5f0307fccba33ab2495b9443e5fe3f59a8f 100644 (file)
--- a/lisp/cedet/ede/pmake.el
+++ b/lisp/cedet/ede/pmake.el
@@ -265,12 +265,13 @@ Execute BODY in a location where a value can be placed."
   "Add VARNAME into the current Makefile if it doesn't exist.
 Execute BODY in a location where a value can be placed."
   `(let ((addcr t) (v ,varname))
-     (unless (re-search-backward (concat "^" v "\\s-*=") nil t)
-       (insert v "=")
-       ,@body
-       (if addcr (insert "\n"))
-       (goto-char (point-max)))
-     ))
+       (unless
+          (save-excursion
+            (re-search-backward (concat "^" v "\\s-*=") nil t))
+        (insert v "=")
+        ,@body
+        (when addcr (insert "\n"))
+        (goto-char (point-max)))))
 (put 'ede-pmake-insert-variable-once 'lisp-indent-function 1)
 
 ;;; SOURCE VARIABLE NAME CONSTRUCTION