aboutsummaryrefslogtreecommitdiff
path: root/src/interp/br-saturn.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/br-saturn.boot')
-rw-r--r--src/interp/br-saturn.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/br-saturn.boot b/src/interp/br-saturn.boot
index 83933fd5..e5bcb8b6 100644
--- a/src/interp/br-saturn.boot
+++ b/src/interp/br-saturn.boot
@@ -556,7 +556,7 @@ htpAddToPageDescription(htPage, pageDescrip) ==
htProcessBcStrings strings ==
for [numChars, default, stringName, spadType, :filter] in strings repeat
mess2 := '""
- if NULL LASSOC(stringName, htpInputAreaAlist page()) then
+ if null LASSOC(stringName, htpInputAreaAlist page()) then
setUpDefault(stringName, ['string, default, spadType, filter])
if htpLabelErrorMsg(page(), stringName) then
iht ['"\centerline{{\em ", htpLabelErrorMsg(page(), stringName), '"}}"]