* lisp/version.el (emacs-bzr-version-bzr): Fix typo.
This commit is contained in:
parent
983664c0b4
commit
edace89f26
2 changed files with 4 additions and 2 deletions
|
@ -1,5 +1,7 @@
|
|||
2014-01-22 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* version.el (emacs-bzr-version-bzr): Fix typo.
|
||||
|
||||
* version.el (emacs-repository-get-version):
|
||||
Check either .bzr or .git, but not both.
|
||||
Make the git case actually use the DIR argument, and return nil
|
||||
|
|
|
@ -106,7 +106,7 @@ Returns nil if unable to find this information."
|
|||
(looking-at "[0-9]+\0\\([^\0\n]+\\)\0")
|
||||
(match-string 1))))))
|
||||
|
||||
(defun emacs-bzr-version-bzr (_dir)
|
||||
(defun emacs-bzr-version-bzr (dir)
|
||||
"Ask bzr itself for the version information for directory DIR."
|
||||
;; Comments on `bzr version-info':
|
||||
;; i) Unknown files also cause clean != 1.
|
||||
|
@ -125,7 +125,7 @@ Returns nil if unable to find this information."
|
|||
(call-process "bzr" nil '(t nil) nil "version-info"
|
||||
"--custom"
|
||||
"--template={revno} {revision_id} (clean = {clean})"
|
||||
"dir"))
|
||||
dir))
|
||||
(buffer-string))))
|
||||
|
||||
(define-obsolete-function-alias 'emacs-bzr-get-version
|
||||
|
|
Loading…
Add table
Reference in a new issue