2 files changed, 10 insertions, 3 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d20ad6927b9..6c4c68b73c8 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,11 @@
 2002-11-12   Markus Rost  <rost@math.ohio-state.edu>
 
+        * vc-rcs.el (vc-rcs-registered): Handle the autoload cookie so
+        that the definition is found by `find-function-search-for-symbol'
+        and etags.
+
+        * vc-sccs.el (vc-sccs-registered): Ditto.
+
         * emulation/edt.el (defgroup edt): Arrange that definition starts
         at beginning of line.
 
diff --git a/lisp/vc-sccs.el b/lisp/vc-sccs.el
index eddc990a4f4..c5f2d660a79 100644
--- a/lisp/vc-sccs.el
+++ b/lisp/vc-sccs.el
@@ -5,7 +5,7 @@
 ;; Author:     FSF (see vc.el for full credits)
 ;; Maintainer: Andre Spiegel <spiegel@gnu.org>
 
-;; $Id: vc-sccs.el,v 1.16 2002/10/08 15:35:03 monnier Exp $
+;; $Id: vc-sccs.el,v 1.17 2002/10/08 20:24:21 monnier Exp $
 
 ;; This file is part of GNU Emacs.
 
@@ -88,8 +88,9 @@ For a description of possible values, see `vc-check-master-templates'."
 ;;; State-querying functions
 ;;;
 
-;;;###autoload
-(progn (defun vc-sccs-registered (f) (vc-default-registered 'SCCS f)))
+;;; The definition should be at beginning of line (for Help and etags).
+;;;###autoload(defun vc-sccs-registered (f) (vc-default-registered 'SCCS f))
+(defun vc-sccs-registered (f) (vc-default-registered 'SCCS f))
 
 (defun vc-sccs-state (file)
   "SCCS-specific function to compute the version control state."