]> code.delx.au - gnu-emacs-elpa/commitdiff
Fix publishing with org 7.9
authorNoam Postavsky <npostavs@users.sourceforge.net>
Sun, 11 May 2014 20:58:01 +0000 (16:58 -0400)
committerNoam Postavsky <npostavs@users.sourceforge.net>
Sun, 11 May 2014 23:37:12 +0000 (19:37 -0400)
* doc/yas-doc-helper.el: Only use org-html-publish-to-html when it's
  fbound.

doc/yas-doc-helper.el

index f6e101c79138b6327f01d94b3b4957a1a7af44b3..76a00b102500df64968aff1160129b51c64e078a 100755 (executable)
                     (buffer-string))
                   (princ yas--version (current-buffer)))))
        (proj-plist
-        (list
-         :publishing-function 'org-html-publish-to-html
-         :base-directory dir :publishing-directory dir
-         :html-preamble
-         (with-temp-buffer
-           (insert-file-contents (expand-file-name "nav-menu.html.inc" dir))
-           (buffer-string))
-         :html-postamble
-         (concat "<hr><p class='creator'>Generated by %c on %d from "
-                 rev "</p>\n"
-                 "<p class='xhtml-validation'>%v</p>\n")))
+        `(,@(when (fboundp 'org-html-publish-to-html)
+              '(:publishing-function 'org-html-publish-to-html))
+          :base-directory ,dir :publishing-directory ,dir
+          :html-preamble
+          ,(with-temp-buffer
+             (insert-file-contents (expand-file-name "nav-menu.html.inc" dir))
+             (buffer-string))
+          :html-postamble
+          ,(concat "<hr><p class='creator'>Generated by %c on %d from "
+                   rev "</p>\n"
+                   "<p class='xhtml-validation'>%v</p>\n")))
        (project (assoc "yasnippet" org-publish-project-alist)))
   (if project
       (setcdr project proj-plist)