Better Emacs report if you have Paradox installed

2018-08-29 14:35:31 +03:00
parent d9aad9dd85
commit e4a707ba8c
1 changed files with 14 additions and 7 deletions
--- a/src/emacs.el
+++ b/src/emacs.el
@@ -1,7 +1,14 @@
-(progn
-  (let ((package-menu-async nil))
-    (package-list-packages))
-  (package-menu-mark-upgrades)
-  (condition-case nil
-      (package-menu-execute 'noquery)
-    (user-error nil)))
+(if (fboundp 'paradox-upgrade-packages)
+    (progn
+      (paradox-upgrade-packages)
+      (princ
+       (if (get-buffer "*Paradox Report*")
+           (with-current-buffer "*Paradox Report*" (buffer-string))
+         "\nNothing to upgrade\n")))
+  (progn
+    (let ((package-menu-async nil))
+      (package-list-packages))
+    (package-menu-mark-upgrades)
+    (condition-case nil
+        (package-menu-execute 'noquery)
+      (user-error nil))))