(vc-git-stash-map): Move definition before use.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f9d0afea3773ecad30f8929d8b86db728f84edb7..a36bbbbc5087b2efc6560323302e604b1c91b5c5 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -7,6 +7,8 @@
 
        * calendar/diary-lib.el (top-level): Make load behave more like require.
 
+       * vc-git.el (vc-git-stash-map): Move definition before use.
+
 2009-11-04  Dan Nicolaescu  <dann@ics.uci.edu>
 
        * custom.el (custom-declare-group): Purecopy standard-value.

diff --git a/lisp/vc-git.el b/lisp/vc-git.el
index cee3abe0bb3df9390d55f885a253f4b7fa37e27c..9f01a84cc81fcc83907ec9cf5faa5f9b670332a2 100644 (file)
--- a/lisp/vc-git.el
+++ b/lisp/vc-git.el
@@ -399,6 +399,13 @@ If nil, use the value of `vc-diff-switches'.  If t, use no switches."
   "Return a list of (FILE STATE EXTRA) entries for FILES in DIR."
   (vc-git-dir-status-goto-stage 'update-index files update-function))
 
+(defvar vc-git-stash-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map "\C-k" 'vc-git-stash-delete-at-point)
+    (define-key map "=" 'vc-git-stash-show-at-point)
+    (define-key map "\C-m" 'vc-git-stash-show-at-point)
+    map))
+
 (defun vc-git-dir-extra-headers (dir)
   (let ((str (with-output-to-string
                (with-current-buffer standard-output
@@ -831,13 +838,6 @@ This command shares argument histories with \\[rgrep] and \\[grep]."
   (interactive)
   (vc-git-stash-show (format "stash@%s" (vc-git-stash-get-at-point (point)))))
 
-(defvar vc-git-stash-map
-  (let ((map (make-sparse-keymap)))
-    (define-key map "\C-k" 'vc-git-stash-delete-at-point)
-    (define-key map "=" 'vc-git-stash-show-at-point)
-    (define-key map "\C-m" 'vc-git-stash-show-at-point)
-    map))
-
 \f
 ;;; Internal commands