scratch/package-vc-fixes 18d1704126 1/3: * lisp/emacs-lisp/package-vc.el (package-vc-update-all): Add command

[Philip Kaludercic]

branch: scratch/package-vc-fixes
commit 18d1704126ce87b1d49f8b582bf712ba2254e490
Author: Philip Kaludercic <philipk@posteo.net>
Commit: Philip Kaludercic <philipk@posteo.net>

    * lisp/emacs-lisp/package-vc.el (package-vc-update-all): Add command
---
 lisp/emacs-lisp/package-vc.el | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/lisp/emacs-lisp/package-vc.el b/lisp/emacs-lisp/package-vc.el
index e4925f17b6..b876fe7a1a 100644
--- a/lisp/emacs-lisp/package-vc.el
+++ b/lisp/emacs-lisp/package-vc.el
@@ -535,6 +535,13 @@ installed package."
                (if installed package-alist package-archive-contents)
                #'string=)))
 
+(defun package-vc-update-all ()
+  "Attempt to update all installed source packages."
+  (interactive)
+  (dolist (package package-alist)
+    (dolist (pkg-desc (cdr package))
+      (package-vc-update pkg-desc))))
+
 (defun package-vc-update (pkg-desc)
   "Attempt to update the package PKG-DESC."
   (interactive (list (package-vc--read-package-desc "Update source package:")))