aboutsummaryrefslogtreecommitdiff
path: root/src/interp/setvart.boot.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/setvart.boot.pamphlet')
-rw-r--r--src/interp/setvart.boot.pamphlet6
1 files changed, 6 insertions, 0 deletions
diff --git a/src/interp/setvart.boot.pamphlet b/src/interp/setvart.boot.pamphlet
index 98dda551..2c02ecfe 100644
--- a/src/interp/setvart.boot.pamphlet
+++ b/src/interp/setvart.boot.pamphlet
@@ -2373,6 +2373,12 @@ SETANDFILEQ($setOptions,'(
<<userlevel>>
))
+--%
+printLoadMessages u ==
+ MEMQ(u, '(%display% %describe%)) =>
+ ($printLoadMsgs => '"on"; '"off")
+ $printLoadMsgs := u is ["on"]
+
-- The following creates a list of option names in the above table.
SETANDFILEQ($setOptionNames, [x.0 for x in $setOptions])