emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/agitate de2094a2f5 53/67: Placate the compiler


From: ELPA Syncer
Subject: [elpa] externals/agitate de2094a2f5 53/67: Placate the compiler
Date: Wed, 28 Sep 2022 16:57:29 -0400 (EDT)

branch: externals/agitate
commit de2094a2f563c9fe80ff625018576fedbda2a3d5
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Placate the compiler
---
 agitate.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/agitate.el b/agitate.el
index cdc903371e..12c48c3cb5 100644
--- a/agitate.el
+++ b/agitate.el
@@ -38,6 +38,7 @@
 (require 'diff)
 (require 'log-edit)
 (require 'log-view)
+(require 'vc)
 (require 'vc-git)
 
 (defgroup agitate ()
@@ -232,13 +233,14 @@ to the text at point."
 ;;;; Commands for vc-git (Git backend for the Version Control framework)
 
 (defun agitate--vc-git-get-hash-from-string (string)
-  "Return commit hash from beginning of STRING"
+  "Return commit hash from beginning of STRING."
   (when (string-match "\\b\\([0-9a-z]+\\) " string)
     (match-string 1 string)))
 
 (defun agitate--vc-git-commit-prompt (&optional file long)
   "Prompt for Git commit and return it as a string.
-With optional FILE, limit the commits to those pertinent to it."
+With optional FILE, limit the commits to those pertinent to it.
+With optional LONG do not abbreviate commit hashes."
   (let ((default-directory (vc-root-dir))
         (format (if long "--pretty=oneline" "--oneline")))
     (if file



reply via email to

[Prev in Thread] Current Thread [Next in Thread]