X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/edace89f2670ed235d98c6d33f32d49228f423e3..cc5519db12f554a40591ac8a7f4febe17a3bd53b:/lisp/version.el

diff --git a/lisp/version.el b/lisp/version.el
index 4f5bb67585..cab2d28db4 100644
--- a/lisp/version.el
+++ b/lisp/version.el
@@ -3,7 +3,7 @@
 ;; Copyright (C) 1985, 1992, 1994-1995, 1999-2014 Free Software
 ;; Foundation, Inc.
 
-;; Maintainer: FSF
+;; Maintainer: emacs-devel@gnu.org
 ;; Keywords: internal
 ;; Package: emacs
 
@@ -186,9 +186,10 @@ only ask the VCS if we cannot find any information ourselves."
 	 (with-temp-buffer
 	   (let ((default-directory (file-name-as-directory dir)))
 	     (and (eq 0
-		      (ignore-errors
-			(call-process "git" nil '(t nil) nil "log"
-				      "-1" "--pretty=format:%N")))
+		      (condition-case nil
+			  (call-process "git" nil '(t nil) nil "rev-parse"
+					"HEAD")
+			(error nil)))
 		  (not (zerop (buffer-size)))
 		  (replace-regexp-in-string "\n" "" (buffer-string))))))))