From: Glenn Morris <rgm@gnu.org>
Date: Wed, 22 Jan 2014 18:29:40 +0000 (-0500)
Subject: * lisp/version.el (emacs-bzr-version-bzr): Fix typo.
X-Git-Tag: emacs-24.3.90~173^2^2~42^2~45^2~295
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=edace89f2670ed235d98c6d33f32d49228f423e3;p=emacs.git

* lisp/version.el (emacs-bzr-version-bzr): Fix typo.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 622da8cf3e8..8731930cbba 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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
diff --git a/lisp/version.el b/lisp/version.el
index 1a3265b55b2..4f5bb67585a 100644
--- a/lisp/version.el
+++ b/lisp/version.el
@@ -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