summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDan Davison <davison@stats.ox.ac.uk>2010-10-11 17:37:05 +0100
committerDan Davison <davison@stats.ox.ac.uk>2010-10-12 11:57:26 +0100
commitc354cb8effa3a93273b40423cae2f5c57eea78c0 (patch)
tree755b6401b5f3601e061c2014bc8734e4c4294b6e
parent68037b0e1e669b903b13348be5054bc25c23a5a3 (diff)
downloadorg-mode-c354cb8effa3a93273b40423cae2f5c57eea78c0.tar.gz
babel: `org-babel-lob-ingest': Avoid error when source name is missing
* ob-lob.el (org-babel-lob-ingest): Check for nil source block name
-rw-r--r--lisp/ob-lob.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/ob-lob.el b/lisp/ob-lob.el
index 33a6989..857e43f 100644
--- a/lisp/ob-lob.el
+++ b/lisp/ob-lob.el
@@ -49,9 +49,10 @@ To add files to this list use the `org-babel-lob-ingest' command."
(interactive "f")
(org-babel-map-src-blocks file
(let* ((info (org-babel-get-src-block-info))
- (source-name (intern (nth 4 info))))
+ (source-name (nth 4 info)))
(when source-name
- (setq org-babel-library-of-babel
+ (setq source-name (intern source-name)
+ org-babel-library-of-babel
(cons (cons source-name info)
(assq-delete-all source-name org-babel-library-of-babel)))))))