summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBastien Guerry <bzg@altern.org>2013-02-27 10:24:04 +0100
committerBastien Guerry <bzg@altern.org>2013-02-27 10:24:04 +0100
commit0284bc9d4d9feaf9506dd6e3752c8c699f54afe6 (patch)
tree99baab4773363cd5c3190ede486acdd39d01956f
parent7c8e854d9c3c2f10e3ce8305316ec7fbc58a7458 (diff)
downloadorg-mode-0284bc9d4d9feaf9506dd6e3752c8c699f54afe6.tar.gz
ob-lob.el (org-babel-lob-execute): Rename cache? to cache-p
* ob-lob.el (org-babel-lob-execute): Rename cache? to cache-p. Thanks to Achim for pointing this.
-rw-r--r--lisp/ob-lob.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/ob-lob.el b/lisp/ob-lob.el
index 2fcebcf..df967c8 100644
--- a/lisp/ob-lob.el
+++ b/lisp/ob-lob.el
@@ -127,11 +127,11 @@ if so then run the appropriate source block from the Library."
(concat ":var results="
(mapconcat #'identity (butlast info) " "))))))
(pre-info (funcall mkinfo pre-params))
- (cache? (and (cdr (assoc :cache pre-params))
- (string= "yes" (cdr (assoc :cache pre-params)))))
- (new-hash (when cache? (org-babel-sha1-hash pre-info)))
- (old-hash (when cache? (org-babel-current-result-hash))))
- (if (and cache? (equal new-hash old-hash))
+ (cache-p (and (cdr (assoc :cache pre-params))
+ (string= "yes" (cdr (assoc :cache pre-params)))))
+ (new-hash (when cache-p (org-babel-sha1-hash pre-info)))
+ (old-hash (when cache-p (org-babel-current-result-hash))))
+ (if (and cache-p (equal new-hash old-hash))
(save-excursion (goto-char (org-babel-where-is-src-block-result))
(forward-line 1)
(message "%S" (org-babel-read-result)))