Mercurial > emacs
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 |