aboutsummaryrefslogtreecommitdiffstats
path: root/test/automated/python-tests.el
diff options
context:
space:
mode:
authorTom Tromey2013-07-06 23:18:58 -0600
committerTom Tromey2013-07-06 23:18:58 -0600
commit6dacdad5fcb278e5a16b38bb81786aac9ca27be4 (patch)
treef5f331ea361ba0f99e0f9b638d183ad492a7da31 /test/automated/python-tests.el
parent0a6f2ff0c8ceb29703e76cddd46ea3f176dd873a (diff)
parent219afb88d9d484393418820d1c08dc93299110ec (diff)
downloademacs-6dacdad5fcb278e5a16b38bb81786aac9ca27be4.tar.gz
emacs-6dacdad5fcb278e5a16b38bb81786aac9ca27be4.zip
merge from trunk
this merges frmo trunk and fixes various build issues. this needed a few ugly tweaks. this hangs in "make check" now
Diffstat (limited to 'test/automated/python-tests.el')
-rw-r--r--test/automated/python-tests.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/test/automated/python-tests.el b/test/automated/python-tests.el
index 8462a863b84..40505cc7953 100644
--- a/test/automated/python-tests.el
+++ b/test/automated/python-tests.el
@@ -39,7 +39,8 @@ always located at the beginning of buffer."
39BODY is code to be executed within the temp buffer. Point is 39BODY is code to be executed within the temp buffer. Point is
40always located at the beginning of buffer." 40always located at the beginning of buffer."
41 (declare (indent 1) (debug t)) 41 (declare (indent 1) (debug t))
42 `(let* ((temp-file (concat (make-temp-file "python-tests") ".py")) 42 ;; temp-file never actually used for anything?
43 `(let* ((temp-file (make-temp-file "python-tests" nil ".py"))
43 (buffer (find-file-noselect temp-file))) 44 (buffer (find-file-noselect temp-file)))
44 (unwind-protect 45 (unwind-protect
45 (with-current-buffer buffer 46 (with-current-buffer buffer
@@ -47,7 +48,8 @@ always located at the beginning of buffer."
47 (insert ,contents) 48 (insert ,contents)
48 (goto-char (point-min)) 49 (goto-char (point-min))
49 ,@body) 50 ,@body)
50 (and buffer (kill-buffer buffer))))) 51 (and buffer (kill-buffer buffer))
52 (delete-file temp-file))))
51 53
52(defun python-tests-look-at (string &optional num restore-point) 54(defun python-tests-look-at (string &optional num restore-point)
53 "Move point at beginning of STRING in the current buffer. 55 "Move point at beginning of STRING in the current buffer.