aboutsummaryrefslogtreecommitdiff
path: root/src/interp/msg.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/msg.boot')
-rw-r--r--src/interp/msg.boot6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/interp/msg.boot b/src/interp/msg.boot
index cb84d186..a3029fcd 100644
--- a/src/interp/msg.boot
+++ b/src/interp/msg.boot
@@ -389,7 +389,7 @@ getPosStL msg ==
'""
showMsgPos? msg ==
- $erMsgToss or (not msgImPr? msg and not msgLeader? msg)
+ not msgImPr? msg and not msgLeader? msg
remFile positionList ==
@@ -448,8 +448,8 @@ isKeyQualityP (key,qual) ==
--% these functions handle the attributes
initImPr msg ==
- $erMsgToss or symbolMember? (getMsgTag msg,$imPrTagGuys) =>
- setMsgUnforcedAttr (msg,'$imPrGuys,'imPr)
+ symbolMember?(getMsgTag msg,$imPrTagGuys) =>
+ setMsgUnforcedAttr (msg,'$imPrGuys,'imPr)
initToWhere msg ==
member ('trace,getMsgCatAttr (msg,'catless)) =>