changeset 24016:43344f47a865

(Frequire): Don't fail to unbind bindings.
author Richard M. Stallman <rms@gnu.org>
date Wed, 06 Jan 1999 23:55:31 +0000
parents 2b8d4cd758b7
children d6ab8dbc44f2
files src/fns.c
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/fns.c	Wed Jan 06 23:54:44 1999 +0000
+++ b/src/fns.c	Wed Jan 06 23:55:31 1999 +0000
@@ -2654,7 +2654,7 @@
 		     noerror, Qt, Qnil, (NILP (file_name) ? Qt : Qnil));
       /* If load failed entirely, return nil.  */
       if (NILP (tem))
-	return Qnil;
+	return unbind_to (count, Qnil);
 
       tem = Fmemq (feature, Vfeatures);
       if (NILP (tem))