[Emacs-diffs] [emacs] 01/01: Use git rev-parse to get repository version

[Andreas Schwab]

schwab pushed a commit to branch emacs-24
in repository emacs.

commit 10331478318c3030b269a1da3361a8a9e3e7e5f1
Author: Andreas Schwab <address@hidden>
Date:   Sat Nov 15 23:48:47 2014 +0100

    Use git rev-parse to get repository version
    
    * version.el (emacs-repository-get-version): Use git rev-parse
    instead of git log.
---
 lisp/ChangeLog  |    5 +++++
 lisp/version.el |    4 ++--
 2 files changed, 7 insertions(+), 2 deletions(-)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d13a62a..a4bebf2 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2014-11-15  Andreas Schwab  <address@hidden>
+
+       * version.el (emacs-repository-get-version): Use git rev-parse
+       instead of git log.
+
 2014-11-15  Fabián Ezequiel Gallina  <address@hidden>
 
        * progmodes/python.el (python-indent-calculate-levels): Fix
diff --git a/lisp/version.el b/lisp/version.el
index 1ea38da..cab2d28 100644
--- a/lisp/version.el
+++ b/lisp/version.el
@@ -187,8 +187,8 @@ only ask the VCS if we cannot find any information 
ourselves."
           (let ((default-directory (file-name-as-directory dir)))
             (and (eq 0
                      (condition-case nil
-                         (call-process "git" nil '(t nil) nil "log"
-                                       "-1" "--pretty=format:%H")
+                         (call-process "git" nil '(t nil) nil "rev-parse"
+                                       "HEAD")
                        (error nil)))
                  (not (zerop (buffer-size)))
                  (replace-regexp-in-string "\n" "" (buffer-string))))))))