mirror of
https://github.com/doomemacs/doomemacs
synced 2025-08-19 13:43:36 -05:00
caddr => cl-caddr
This commit is contained in:
@@ -230,7 +230,7 @@ appropriate."
|
||||
(format "+ %s %s -> %s"
|
||||
(s-pad-right (+ -max-len 2) " " (symbol-name (car pkg)))
|
||||
(s-pad-right 14 " " (doom--version-list-str (cadr pkg)))
|
||||
(doom--version-list-str (caddr pkg))))
|
||||
(doom--version-list-str (cl-caddr pkg))))
|
||||
(--sort (string-lessp (symbol-name (car it))
|
||||
(symbol-name (car other)))
|
||||
packages)
|
||||
@@ -319,7 +319,7 @@ calls."
|
||||
(if (y-or-n-p (format "%s will be updated from %s to %s. Update?"
|
||||
(car desc)
|
||||
(doom--version-list-str (cadr desc))
|
||||
(doom--version-list-str (caddr desc))))
|
||||
(doom--version-list-str (cl-caddr desc))))
|
||||
(message "%s %s"
|
||||
(if (doom-update-package package)
|
||||
"Updated"
|
||||
|
@@ -3,6 +3,7 @@
|
||||
(require 'dash)
|
||||
(require 's)
|
||||
(require 'f)
|
||||
(eval-when-compile (require 'cl-lib))
|
||||
|
||||
(defvar __DIR__ nil "The directory of the currently loaded file (set by `@load')")
|
||||
(defvar __FILE__ nil "The full path of the currently loaded file (set by `@load')")
|
||||
|
Reference in New Issue
Block a user