diff options
| author | David Glasser | 2017-10-10 15:46:53 -0700 |
|---|---|---|
| committer | Noam Postavsky | 2017-10-24 19:14:30 -0400 |
| commit | 0c536a20fb4833bafea1c2a14b9ff2bac2a3ebd8 (patch) | |
| tree | d8cefe4ee9b11bf46d22891eb63c6eb0e19324d9 | |
| parent | 1d83257a1db3a9b87675a0dfc68cb4964cecaa09 (diff) | |
| download | emacs-0c536a20fb4833bafea1c2a14b9ff2bac2a3ebd8.tar.gz emacs-0c536a20fb4833bafea1c2a14b9ff2bac2a3ebd8.zip | |
Display commit in package description, if available (Bug#28637)
MELPA includes a :commit field in its
packages (https://github.com/melpa/package-build/pull/6). You can use
this to tell if MELPA has processed a recently-merged change. This
commit adds that metadata to the package description buffer.
* lisp/emacs-lisp/package.el: Display commit in package description.
Copyright-paperwork-exempt: yes
| -rw-r--r-- | lisp/emacs-lisp/package.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index 8b101c1323c..dd05c70dc8e 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el | |||
| @@ -2260,6 +2260,7 @@ Otherwise no newline is inserted." | |||
| 2260 | (archive (if desc (package-desc-archive desc))) | 2260 | (archive (if desc (package-desc-archive desc))) |
| 2261 | (extras (and desc (package-desc-extras desc))) | 2261 | (extras (and desc (package-desc-extras desc))) |
| 2262 | (homepage (cdr (assoc :url extras))) | 2262 | (homepage (cdr (assoc :url extras))) |
| 2263 | (commit (cdr (assoc :commit extras))) | ||
| 2263 | (keywords (if desc (package-desc--keywords desc))) | 2264 | (keywords (if desc (package-desc--keywords desc))) |
| 2264 | (built-in (eq pkg-dir 'builtin)) | 2265 | (built-in (eq pkg-dir 'builtin)) |
| 2265 | (installable (and archive (not built-in))) | 2266 | (installable (and archive (not built-in))) |
| @@ -2332,6 +2333,8 @@ Otherwise no newline is inserted." | |||
| 2332 | (and version | 2333 | (and version |
| 2333 | (package--print-help-section "Version" | 2334 | (package--print-help-section "Version" |
| 2334 | (package-version-join version))) | 2335 | (package-version-join version))) |
| 2336 | (when commit | ||
| 2337 | (package--print-help-section "Commit" commit)) | ||
| 2335 | (when desc | 2338 | (when desc |
| 2336 | (package--print-help-section "Summary" | 2339 | (package--print-help-section "Summary" |
| 2337 | (package-desc-summary desc))) | 2340 | (package-desc-summary desc))) |