bug#11647: 24.1; Document return value of load-source-file-function

[Christopher Schmidt]

=== modified file 'src/ChangeLog'
--- src/ChangeLog       2012-06-24 04:11:19 +0000
+++ src/ChangeLog       2012-06-24 15:24:00 +0000
@@ -1,3 +1,7 @@
+2012-06-24  Christopher Schmidt  <christopher@ch.ristopher.com>
+
+       * lread.c (syms_of_lread): Doc fix (Bug#11647).
+
 2012-06-24  Paul Eggert  <eggert@cs.ucla.edu>
 
        Fix bug when time_t is unsigned and as wide as intmax_t (Bug#9000).

=== modified file 'src/lread.c'
--- src/lread.c 2012-06-22 21:17:42 +0000
+++ src/lread.c 2012-06-24 15:22:30 +0000
@@ -4501,11 +4501,11 @@
 
   DEFVAR_LISP ("load-source-file-function", Vload_source_file_function,
               doc: /* Function called in `load' for loading an Emacs Lisp 
source file.
-This function is for doing code conversion before reading the source file.
-If nil, loading is done without any code conversion.
-Arguments are FULLNAME, FILE, NOERROR, NOMESSAGE, where
- FULLNAME is the full name of FILE.
-See `load' for the meaning of the remaining arguments.  */);
+This function is for doing code conversion before reading the source
+file.  It should return t if the file exists and loads successfully.
+If nil, loading is done without any code conversion.  Arguments are
+FULLNAME, FILE, NOERROR, NOMESSAGE, where FULLNAME is the full name of
+FILE.  See `load' for the meaning of the remaining arguments.  */);
   Vload_source_file_function = Qnil;
 
   DEFVAR_BOOL ("load-force-doc-strings", load_force_doc_strings,

OK to commit?

        Christopher