emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/org bd384d3267 1/3: test-org-export/activate-smart-quot


From: ELPA Syncer
Subject: [elpa] externals/org bd384d3267 1/3: test-org-export/activate-smart-quotes: Uncomment working test
Date: Wed, 23 Nov 2022 08:01:43 -0500 (EST)

branch: externals/org
commit bd384d3267c5d7ef68d141919b3e6d592a98326c
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>

    test-org-export/activate-smart-quotes: Uncomment working test
    
    * testing/lisp/test-ox.el (test-org-export/activate-smart-quotes):
    Uncomment a test that was claimed broken.  It is not anymore.
---
 testing/lisp/test-ox.el | 17 +++++++----------
 1 file changed, 7 insertions(+), 10 deletions(-)

diff --git a/testing/lisp/test-ox.el b/testing/lisp/test-ox.el
index a78cc727c1..134345521c 100644
--- a/testing/lisp/test-ox.el
+++ b/testing/lisp/test-ox.el
@@ -4172,16 +4172,13 @@ This test does not cover listings and custom 
environments."
              (org-element-map tree 'plain-text
                (lambda (s) (org-export-activate-smart-quotes s :html info))
                info nil nil t)))))
-  ;; FIXME: Test failing non-interactively.
-  ;;
-  ;; (should
-  ;;  (equal '("&ldquo;foo&rdquo;")
-  ;;     (let ((org-export-default-language "en"))
-  ;;       (org-test-with-parsed-data "*\"foo\"*"
-  ;;         (org-element-map tree 'plain-text
-  ;;           (lambda (s) (org-export-activate-smart-quotes s :html info))
-  ;;           info nil nil t)))))
-)
+  (should
+   (equal '("&ldquo;foo&rdquo;")
+         (let ((org-export-default-language "en"))
+           (org-test-with-parsed-data "*\"foo\"*"
+             (org-element-map tree 'plain-text
+               (lambda (s) (org-export-activate-smart-quotes s :html info))
+               info nil nil t))))))
 
 
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]