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.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/msg.boot b/src/interp/msg.boot
index a3029fcd..23826171 100644
--- a/src/interp/msg.boot
+++ b/src/interp/msg.boot
@@ -546,7 +546,7 @@ getMsgFTTag? msg == IFCAR member (IFCAR getMsgPosTagOb msg,_
getMsgKey msg == msg.2
-getMsgKey? msg == IDENTP (val := getMsgKey msg) => val
+getMsgKey? msg == ident? (val := getMsgKey msg) => val
getMsgArgL msg == msg.3