diff options
| author | Bastien Guerry <bzg@altern.org> | 2012-12-15 08:00:30 +0100 |
|---|---|---|
| committer | Bastien Guerry <bzg@altern.org> | 2012-12-15 08:00:30 +0100 |
| commit | 8f3b8ee44c9aad29bf0ccac59616567f9fba9eb8 (patch) | |
| tree | 979505848ab6b64612d5deffe597cf56681dd0ee | |
| parent | 0b44eb6961323de8254976f7f7ee973078cd2103 (diff) | |
| download | org-mode-8f3b8ee44c9aad29bf0ccac59616567f9fba9eb8.tar.gz | |
testing/org-test.el: Fix `org-test-with-temp-text'.
* org-test.el (org-test-with-temp-text): No need to kill a
temporary buffer. Don't use (prog1 ,@body ...), only expand
,@body.
Thanks to Nick Dokos for pointing this.
| -rw-r--r-- | testing/org-test.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/testing/org-test.el b/testing/org-test.el index f255584..8a4fc1a 100644 --- a/testing/org-test.el +++ b/testing/org-test.el @@ -201,7 +201,7 @@ otherwise place the point at the beginning of the inserted text." (goto-char ,(match-beginning 0))) `(progn (insert ,inside-text) (goto-char (point-min))))) - (prog1 ,@body (kill-buffer))))) + ,@body))) (def-edebug-spec org-test-with-temp-text (form body)) (defmacro org-test-with-temp-text-in-file (text &rest body) |