diff options
| author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2017-12-23 14:03:52 +0100 |
|---|---|---|
| committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2017-12-23 14:03:52 +0100 |
| commit | 1e40dd6486665450962045324d9ca23755150de6 (patch) | |
| tree | 333a32c9ebc8d9c87edaf4a0f7046b21bee0055e | |
| parent | 774e553f115ecd67ee9fa5d31036aa3b664b369d (diff) | |
| download | org-mode-1e40dd6486665450962045324d9ca23755150de6.tar.gz | |
ob-core: Tiny refactoring
* lisp/ob-core.el (org-babel-expand-noweb-references): Tiny
refactoring.
| -rw-r--r-- | lisp/ob-core.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/ob-core.el b/lisp/ob-core.el index d1ff500..dd42f13 100644 --- a/lisp/ob-core.el +++ b/lisp/ob-core.el @@ -2761,9 +2761,8 @@ block but are passed literally to the \"example-block\"." (let ((raw (org-babel-ref-resolve source-name))) (if (stringp raw) raw (format "%S" raw))) (or - ;; Retrieve from the library of babel. - (nth 2 (assoc (intern source-name) - org-babel-library-of-babel)) + ;; Retrieve from the Library of Babel. + (nth 2 (assoc-string source-name org-babel-library-of-babel)) ;; Return the contents of headlines literally. (save-excursion (when (org-babel-ref-goto-headline-id source-name) |