aboutsummaryrefslogtreecommitdiffstats
path: root/src/fns.c
diff options
context:
space:
mode:
authorRichard M. Stallman1997-08-08 20:06:34 +0000
committerRichard M. Stallman1997-08-08 20:06:34 +0000
commitfdb5bec0467c67ca1c60d7c3bfd60552c58d3ff6 (patch)
tree86c79c8f061fdc5fc313b975ffa5015a8dad1553 /src/fns.c
parent8baabd2a147bdff47317e789751ff80f3c2dce31 (diff)
downloademacs-fdb5bec0467c67ca1c60d7c3bfd60552c58d3ff6.tar.gz
emacs-fdb5bec0467c67ca1c60d7c3bfd60552c58d3ff6.zip
(Frequire): Don't insist on a suffix
if the file name argument was explicitly specified.
Diffstat (limited to 'src/fns.c')
-rw-r--r--src/fns.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/fns.c b/src/fns.c
index 8387f870036..20eb5bbf2a9 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -1959,12 +1959,12 @@ If FILENAME is omitted, the printname of FEATURE is used as the file name.")
1959 Vautoload_queue = Qt; 1959 Vautoload_queue = Qt;
1960 1960
1961 Fload (NILP (file_name) ? Fsymbol_name (feature) : file_name, 1961 Fload (NILP (file_name) ? Fsymbol_name (feature) : file_name,
1962 Qnil, Qt, Qnil, Qt); 1962 Qnil, Qt, Qnil, (NILP (file_name) ? Qt : Qnil));
1963 1963
1964 tem = Fmemq (feature, Vfeatures); 1964 tem = Fmemq (feature, Vfeatures);
1965 if (NILP (tem)) 1965 if (NILP (tem))
1966 error ("Required feature %s was not provided", 1966 error ("Required feature %s was not provided",
1967 XSYMBOL (feature)->name->data ); 1967 XSYMBOL (feature)->name->data);
1968 1968
1969 /* Once loading finishes, don't undo it. */ 1969 /* Once loading finishes, don't undo it. */
1970 Vautoload_queue = Qt; 1970 Vautoload_queue = Qt;