changeset 800:70a7838a4c81

*** empty log message ***
author Roland McGrath <roland@gnu.org>
date Thu, 16 Jul 1992 20:07:39 +0000
parents f9874f408ddf
children e9e34745ae3b
files lisp/progmodes/etags.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/etags.el	Thu Jul 16 19:57:57 1992 +0000
+++ b/lisp/progmodes/etags.el	Thu Jul 16 20:07:39 1992 +0000
@@ -84,7 +84,7 @@
 
 (defvar tags-table-format-hooks '(etags-recognize-tags-table
 				  recognize-empty-tags-table
-				  ctags-recognize-tags-table) ;standard? XXX
+				  ctags-recognize-tags-table)
   "List of functions to be called in a tags table buffer to identify
 the type of tags table.  The functions are called in order, with no arguments,
 until one returns non-nil.  The function should make buffer-local bindings
@@ -757,7 +757,7 @@
   (and (zerop (buffer-size))
        (mapcar (function (lambda (sym)
 			   (make-local-variable sym)
-			   (set sym (function (lambda (&rest ignore) nil)))))
+			   (set sym 'ignore)))
 	       '(tags-table-files-function
 		 tags-completion-table-function
 		 find-tag-regexp-search-function