# HG changeset patch
# User Martin Rudalics <rudalics@gmx.at>
# Date 1225219896 0
# Node ID c0bf1f6520249be3b148599d3ec6642c824a8a96
# Parent  e295f1ce302e98369d6e4ce42adf5aa833aa9bf5
(vc-stay-local): Fix typo in choice.

diff -r e295f1ce302e -r c0bf1f652024 lisp/vc-hooks.el
--- a/lisp/vc-hooks.el	Tue Oct 28 17:57:09 2008 +0000
+++ b/lisp/vc-hooks.el	Tue Oct 28 18:51:36 2008 +0000
@@ -159,7 +159,7 @@
 by these regular expressions."
   :type '(choice
 	  (const :tag "Always stay local" t)
-	  (const :tag "Only for file operations" 'only-file)
+	  (const :tag "Only for file operations" only-file)
 	  (const :tag "Don't stay local" nil)
 	  (list :format "\nExamine hostname and %v" :tag "Examine hostname ..."
 		(set :format "%v" :inline t (const :format "%t" :tag "don't" except))
@@ -334,7 +334,7 @@
   (let ((locate-dominating-stop-dir-regexp
          (or vc-ignore-dir-regexp locate-dominating-stop-dir-regexp)))
     (locate-dominating-file file witness)))
-    
+
 (define-obsolete-function-alias 'vc-find-root 'locate-dominating-file "23.1")
 
 ;; Access functions to file properties