Add new command 'package-vc-log-incoming'

* lisp/emacs-lisp/package-vc.el (package-vc-log-incoming):
Implement it.
* etc/NEWS: Mention it.

(cherry picked from commit 19806248167b9c4edaadbf4ed428a62fd8c5e412)

diff --git a/etc/NEWS b/etc/NEWS
index 51f59112efbbed3305375e6610c916a1f85e8bfb..a7dce7f7fa55aae0e8d26f80dfdc342de325e6e4 100644 (file)
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -1508,6 +1508,11 @@ project, that you can quickly select using 'project-switch-project'
 Controls for which packages Emacs runs extra build commands when
 installing directly from the package VCS repository.
 
+---
+*** New command 'package-vc-log-incoming'.
+This commands displays incoming changes for a VC package without
+modifying the current checkout.
+
 ---
 *** New command to start an inferior Emacs loading only specific packages.
 The new command 'package-isolate' will start a new Emacs process, as

diff --git a/lisp/emacs-lisp/package-vc.el b/lisp/emacs-lisp/package-vc.el
index c86577b6b26d5607b6775c694af4f2f39201c72a..45231bd4c73cc771239ad8bf8cdff7b7af3f28b8 100644 (file)
--- a/lisp/emacs-lisp/package-vc.el
+++ b/lisp/emacs-lisp/package-vc.el
@@ -1025,5 +1025,12 @@ See also `vc-prepare-patch'."
     (vc-prepare-patch (package-maintainers pkg-desc t)
                       subject revisions)))
 
+(defun package-vc-log-incoming (pkg-desc)
+  "Call `vc-log-incoming' for the package PKG-DESC."
+  (interactive
+   (list (package-vc--read-package-desc "Incoming log for package: " t)))
+  (let ((default-directory (package-desc-dir pkg-desc)))
+    (call-interactively #'vc-log-incoming)))
+
 (provide 'package-vc)
 ;;; package-vc.el ends here