aboutsummaryrefslogtreecommitdiff
path: root/src/interp/msgdb.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/msgdb.boot')
-rw-r--r--src/interp/msgdb.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/msgdb.boot b/src/interp/msgdb.boot
index a0adc6f7..07651a6b 100644
--- a/src/interp/msgdb.boot
+++ b/src/interp/msgdb.boot
@@ -659,7 +659,7 @@ brightPrintHighlight(x, out == $OutputStream) ==
key = '"%t" => $MARG := $MARG + tabber rst
sayString('"(",out)
brightPrint1(key,out)
- if EQ(key,'TAGGEDreturn) then
+ if key = 'TAGGEDreturn then
rst:=[first rst,second rst,third rst, '"environment (omitted)"]
for y in rst repeat
sayString('" ",out)
@@ -686,7 +686,7 @@ brightPrintHighlightAsTeX(x, out == $OutputStream) ==
-- unhandled junk (print verbatim(ish)
sayString('"(",out)
brightPrint1(key,out)
- if EQ(key,'TAGGEDreturn) then
+ if key = 'TAGGEDreturn then
rst:=[first rst,second rst,third rst, '"environment (omitted)"]
for y in rst repeat
sayString('" ",out)