diff --git a/lisp/version.el b/lisp/version.el index dc22887..1b18e23 100644 --- a/lisp/version.el +++ b/lisp/version.el @@ -118,6 +118,8 @@ emacs-repository-version-git (defun emacs-repository--version-git-1 (file dir) "Internal subroutine of `emacs-repository-get-version'." + (message "emacs-repository--version-git-1 %s %s" file dir) + (let ((result (when (file-readable-p file) (with-temp-buffer (insert-file-contents file) @@ -127,6 +129,9 @@ emacs-repository--version-git-1 (emacs-repository--version-git-1 (expand-file-name (match-string 1) dir) dir)))))) + ) + (message "emacs-repository--version-git-1 returns %s" result) + result)) (defun emacs-repository-get-version (&optional dir external) "Try to return as a string the repository revision of the Emacs sources.