X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/c600604975f5c3dd4a2a136d9129e046e8ac153e..f47a9ec42bfe64c316473c64c847922bbbce2063:/src/fns.c

diff --git a/src/fns.c b/src/fns.c
index c03f7e3d7e..8b31ef92a4 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -131,7 +131,7 @@ To get the number of bytes, use `string-bytes'")
   (sequence)
      register Lisp_Object sequence;
 {
-  register Lisp_Object tail, val;
+  register Lisp_Object val;
   register int i;
 
  retry:
@@ -1609,7 +1609,7 @@ to be sure of changing the value of `foo'.")
 {
   if (VECTORP (seq))
     {
-      EMACS_INT i, n, size;
+      EMACS_INT i, n;
 
       for (i = n = 0; i < ASIZE (seq); ++i)
 	if (NILP (Fequal (AREF (seq, i), elt)))
@@ -3053,7 +3053,8 @@ If FILENAME is omitted, the printname of FEATURE is used as the file name,\n\
 but in this case `load' insists on adding the suffix `.el' or `.elc'.\n\
 If the optional third argument NOERROR is non-nil,\n\
 then return nil if the file is not found.\n\
-Normally the return value is FEATURE.")
+Normally the return value is FEATURE.\n\
+This normal messages at start and end of loading FILENAME are suppressed.")
   (feature, file_name, noerror)
      Lisp_Object feature, file_name, noerror;
 {