瀏覽代碼

Merge branch 'maint'

Bastien 6 年之前
父節點
當前提交
18998fd4c2
共有 1 個文件被更改,包括 1 次插入2 次删除
  1. 1 2
      lisp/ox-odt.el

+ 1 - 2
lisp/ox-odt.el

@@ -1359,11 +1359,10 @@ original parsed data.  INFO is a plist holding export options."
   ;; Write styles file.
   (let* ((styles-file (plist-get info :odt-styles-file))
 	 (styles-file (and (org-string-nw-p styles-file)
-			   (read (org-trim styles-file))))
+			   (org-trim styles-file)))
 	 ;; Non-availability of styles.xml is not a critical
 	 ;; error. For now, throw an error.
 	 (styles-file (or styles-file
-			  (plist-get info :odt-styles-file)
 			  (expand-file-name "OrgOdtStyles.xml"
 					    org-odt-styles-dir)
 			  (error "org-odt: Missing styles file?"))))