summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisplib.c5
1 files changed, 5 insertions, 0 deletions
diff --git a/lisplib.c b/lisplib.c
index 5772845d..0ef52934 100644
--- a/lisplib.c
+++ b/lisplib.c
@@ -590,12 +590,17 @@ static val keyparams_set_entries(val dlt, val fun)
lit("extract-keys"),
nil
};
+ val name_noload[] = {
+ lit("--"),
+ nil
+ };
val key_k = intern(lit("key"), keyword_package);
set_dlt_entries_sys(dlt, sys_name, fun);
if (fun)
sethash(dlt, key_k, fun);
else
remhash(dlt, key_k);
+ intern_only(name_noload);
return nil;
}