From: Noam Postavsky <npostavs@gmail.com>
Date: Thu, 26 Sep 2013 02:29:59 +0000 (-0400)
Subject: use plist-get-value for all non-sexp args
X-Git-Tag: emacs-29.0.90~1306^2~15^2~439^2
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8c1c572857bb314d44211c7b078ad7640da007ce;p=emacs.git

use plist-get-value for all non-sexp args
---

diff --git a/lisp/use-package/use-package.el b/lisp/use-package/use-package.el
index e1ba6e28c09..f20987a51f2 100644
--- a/lisp/use-package/use-package.el
+++ b/lisp/use-package/use-package.el
@@ -471,20 +471,20 @@ For full documentation. please see commentary.
          (pre-init-body (plist-get args :pre-init))
          (init-body (plist-get args :init))
          (config-body (plist-get args :config))
-         (diminish-var (plist-get args :diminish))
-         (defines (plist-get args :defines))
+         (diminish-var (plist-get-value args :diminish))
+         (defines (plist-get-value args :defines))
          (idle-body (plist-get args :idle))
          (keybindings-alist (plist-get-value args :bind))
          (mode-alist (plist-get-value args :mode))
          (interpreter-alist (plist-get-value args :interpreter))
          (predicate (plist-get args :if))
-         (pkg-load-path (plist-get args :load-path))
+         (pkg-load-path (plist-get-value args :load-path))
          (defines-eval (if (null defines)
                            nil
                          (if (listp defines)
                              (mapcar (lambda (var) `(defvar ,var)) defines)
                            `((defvar ,defines)))))
-         (requires (plist-get args :requires))
+         (requires (plist-get-value args :requires))
          (requires-test (if (null requires)
                             t
                           (if (listp requires)