From 4b4585264a28152f2eda0f7e5ceed132f9d23e16 Mon Sep 17 00:00:00 2001 From: Mark Meyer Date: Sat, 21 Oct 2017 01:16:53 +0200 Subject: [PATCH] Fix handling of EPUBSTYLE In org mode 9.0: (org-split-string "") -> '() In org mode 9.1+: (org-split-string "") -> '("") So we switch to split-string, which does what we want. Fixes #15 --- ox-epub.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ox-epub.el b/ox-epub.el index 4484c9a..2aab22f 100644 --- a/ox-epub.el +++ b/ox-epub.el @@ -237,7 +237,7 @@ holding export options." (org-element-property :level headline) (org-export-get-reference headline info))) (org-export-collect-headlines info 2))) - (let ((styles (org-split-string (or (plist-get org-epub-metadata :epub-style) " ")))) + (let ((styles (split-string (or (plist-get org-epub-metadata :epub-style) " ")))) (mapc #'(lambda (style) (let* ((stylenum (cl-incf org-epub-style-counter)) (stylename (concat "style-" (format "%d" stylenum)))