diff --git a/lisp/ob-java.el b/lisp/ob-java.el
index 1f2b980f6..78e73ea2a 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 76077b7b2..d30fc6f41 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)