# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 981588546 0
# Node ID 850d490d87f3d6e0dae8014869d495a3fa0c4e81
# Parent  a21a0d45ea1926b39aca584a1c31dc6bc6025ced
(find-tag-default-function): Fix :type.

diff -r a21a0d45ea19 -r 850d490d87f3 lisp/progmodes/etags.el
--- a/lisp/progmodes/etags.el	Wed Feb 07 23:28:21 2001 +0000
+++ b/lisp/progmodes/etags.el	Wed Feb 07 23:29:06 2001 +0000
@@ -120,7 +120,7 @@
 has a `find-tag-default-function' property (see `put'), that is used.
 Otherwise, `find-tag-default' is used."
   :group 'etags
-  :type 'function)
+  :type '(choice (const nil) function))
 
 (defcustom find-tag-marker-ring-length 16
   "*Length of marker rings `find-tag-marker-ring' and `tags-location-ring'."