comparison src/lread.c @ 17125:4a6c43010388

(Fload): Call Vload_source_file_function with 4 args.
author Erik Naggum <erik@naggum.no>
date Thu, 27 Feb 1997 19:08:35 +0000
parents f7a1e78fe210
children c19c552c486f
comparison
equal deleted inserted replaced
17124:fdad8ea24563 17125:4a6c43010388
481 { 481 {
482 /* We are loading a source file (*.el). */ 482 /* We are loading a source file (*.el). */
483 if (!NILP (Vload_source_file_function)) 483 if (!NILP (Vload_source_file_function))
484 { 484 {
485 close (fd); 485 close (fd);
486 return call3 (Vload_source_file_function, found, file, 486 return call4 (Vload_source_file_function, found, file,
487 NILP (noerror) ? Qnil : Qt, 487 NILP (noerror) ? Qnil : Qt,
488 NILP (nomessage) ? Qnil : Qt); 488 NILP (nomessage) ? Qnil : Qt);
489 } 489 }
490 } 490 }
491 491