ソースを参照

Merge branch 'maint'

Achim Gratz 10 年 前
コミット
7070545599
1 ファイル変更3 行追加3 行削除
  1. 3 3
      testing/lisp/test-ob-exp.el

+ 3 - 3
testing/lisp/test-ob-exp.el

@@ -342,7 +342,6 @@ be evaluated."
 			    result)))))
 
 (ert-deftest ob-exp/export-from-a-temp-buffer ()
-  :expected-result :failed
   (org-test-with-temp-text
       "
 #+Title: exporting from a temporary buffer
@@ -362,8 +361,9 @@ be evaluated."
 #+END_SRC
 "
     (let* ((ascii (org-export-as 'ascii)))
-      (should (string-match (regexp-quote (format nil "%S" '(:foo :bar)))
-			    ascii)))))
+      (should (string-match
+	       (regexp-quote " :foo  :bar \n")
+			     ascii)))))
 
 (ert-deftest ob-export/export-with-results-before-block ()
   "Test export when results are inserted before source block."