浏览代码

Merge branch 'maint'

Nicolas Goaziou 8 年之前
父节点
当前提交
bff65547ff
共有 1 个文件被更改,包括 4 次插入3 次删除
  1. 4 3
      lisp/ox-publish.el

+ 4 - 3
lisp/ox-publish.el

@@ -1270,15 +1270,16 @@ if necessary, unless NO-CREATE is non-nil."
 
 (defun org-publish-cache-get (key)
   "Return the value stored in `org-publish-cache' for key KEY.
-Returns nil, if no value or nil is found, or the cache does not
-exist."
+Return nil, if no value or nil is found.  Raise an error if the
+cache does not exist."
   (unless org-publish-cache
     (error "`org-publish-cache-get' called, but no cache present"))
   (gethash key org-publish-cache))
 
 (defun org-publish-cache-set (key value)
   "Store KEY VALUE pair in `org-publish-cache'.
-Returns value on success, else nil."
+Returns value on success, else nil.  Raise an error if the cache
+does not exist."
   (unless org-publish-cache
     (error "`org-publish-cache-set' called, but no cache present"))
   (puthash key value org-publish-cache))