aboutsummaryrefslogtreecommitdiff
path: root/src/interp/msg.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-04-19 18:14:50 +0000
committerdos-reis <gdr@axiomatics.org>2011-04-19 18:14:50 +0000
commitfaaf19e1912ba48e9fbd195d2b90c4e205c87538 (patch)
tree18a81dba1f12285383ba73beaeb8febb6606ea37 /src/interp/msg.boot
parent9430f000bbcedcd6f0edbe1c4852cb2b51c50ccc (diff)
downloadopen-axiom-faaf19e1912ba48e9fbd195d2b90c4e205c87538.tar.gz
cleanup
Diffstat (limited to 'src/interp/msg.boot')
-rw-r--r--src/interp/msg.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/msg.boot b/src/interp/msg.boot
index 95407c1b..1cf335fd 100644
--- a/src/interp/msg.boot
+++ b/src/interp/msg.boot
@@ -450,7 +450,7 @@ isKeyQualityP (key,qual) ==
--% these functions handle the attributes
initImPr msg ==
- $erMsgToss or MEMQ (getMsgTag msg,$imPrTagGuys) =>
+ $erMsgToss or symbolMember? (getMsgTag msg,$imPrTagGuys) =>
setMsgUnforcedAttr (msg,'$imPrGuys,'imPr)
initToWhere msg ==