summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKyle Meyer <kyle@kyleam.com>2021-02-07 20:05:51 -0500
committerKyle Meyer <kyle@kyleam.com>2021-02-07 20:05:51 -0500
commit49364f904b793513112fb8f71dd6b7f6274171cf (patch)
tree117a9b0735dbbd3e47ea5ad147a5d5974f2b5095
parent5b0eb9aadaf675be53dcd5fdd0431b40b6479244 (diff)
downloadorg-mode-49364f904b793513112fb8f71dd6b7f6274171cf.tar.gz
Avoid alist-get for compatibility with Emacs 24
* lisp/ob-java.el (org-babel-execute:java): * lisp/org-id.el (org-id-store-link): Don't use alist-get, which isn't available until Emacs 25.
-rw-r--r--lisp/ob-java.el2
-rw-r--r--lisp/org-id.el2
2 files changed, 2 insertions, 2 deletions
diff --git a/lisp/ob-java.el b/lisp/ob-java.el
index 1f2b980..78e73ea 100644
--- a/lisp/ob-java.el
+++ b/lisp/ob-java.el
@@ -172,7 +172,7 @@ replaced in this string.")
(or (cdr (assq :java params))
org-babel-java-command))
;; if true, run from babel temp directory
- (run-from-temp (not (alist-get :dir params)))
+ (run-from-temp (not (assq :dir params)))
;; class and package
(fullclassname (or (cdr (assq :classname params))
(org-babel-java-find-classname body)))
diff --git a/lisp/org-id.el b/lisp/org-id.el
index 76077b7..d30fc6f 100644
--- a/lisp/org-id.el
+++ b/lisp/org-id.el
@@ -706,7 +706,7 @@ or filename if no title."
(cond ((org-before-first-heading-p)
(let ((keywords (org-collect-keywords '("TITLE"))))
(if keywords
- (car (alist-get "TITLE" keywords nil nil 'equal))
+ (cadr (assoc "TITLE" keywords))
(file-name-nondirectory
(buffer-file-name (buffer-base-buffer))))))
((looking-at org-complex-heading-regexp)