Nicolas Goaziou <m...@nicolasgoaziou.fr> writes:

> Could you also add a test in `test-org-export/handle-options'?

How would I make this test proper?  I can't use org-test-default-backend
since it only loads the transcoder functions, not the template which is
where I disable the title.  I can think of the following or writing a mini
template that just check :with-title, but that feels like cheating...

  ;; Test title.
  (should
   (equal ""
          (org-test-with-temp-text "#+TITLE: foo"
            (org-export-as
             (org-export-create-backend
              :transcoders
              '((title    .  org-org-identity)
                (template . org-org-template)))
             nil nil nil
             '(:with-title nil :with-creator nil
                           :with-author nil :with-date nil
                           :time-stamp-file nil)))))
  (should
   (equal "#+TITLE: foo"
          (org-trim
           (org-test-with-temp-text
               "#+TITLE: foo"
             (org-export-as
              (org-export-create-backend
               :transcoders
               '((title    .  org-org-identity)
                 (template . org-org-template)))
              nil nil nil
              '(:with-title t :with-creator nil
                            :with-author nil :with-date nil
                            :time-stamp-file nil))))))

-- 
With monopolies the cake is a lie!

Reply via email to