10 lines
341 B
EmacsLisp
10 lines
341 B
EmacsLisp
(when (fboundp 'paradox-upgrade-packages)
|
|
(progn
|
|
(unless (boundp 'paradox-github-token)
|
|
(setq paradox-github-token t))
|
|
(paradox-upgrade-packages)
|
|
(princ
|
|
(if (get-buffer "*Paradox Report*")
|
|
(with-current-buffer "*Paradox Report*" (buffer-string))
|
|
"\nNothing to upgrade\n"))))
|