aboutsummaryrefslogtreecommitdiff
path: root/src/interp/msg.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-01-11 18:27:07 +0000
committerdos-reis <gdr@axiomatics.org>2008-01-11 18:27:07 +0000
commit975bf88d6c8ce494bf2eeef421e5d570bd6b7428 (patch)
treea1d5b51c02d72b57fb024aa0b57893b1cf468012 /src/interp/msg.boot
parent71b20432be59422796b41f2021ef10f98d05c15e (diff)
downloadopen-axiom-975bf88d6c8ce494bf2eeef421e5d570bd6b7428.tar.gz
* interp/msg.boot (getStFromMsg): Fix typo.
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 1bbae560..dbfb81b0 100644
--- a/src/interp/msg.boot
+++ b/src/interp/msg.boot
@@ -352,7 +352,7 @@ getStFromMsg msg ==
setOptKeyBlanks()
preStL := getPreStL getMsgPrefix? msg
getMsgTag msg = 'line =>
- [$optKeyBlanks, '"%x1" , :preStL,_
+ [$optKeyBlanks, '"%1" , :preStL,_
getMsgText msg]
posStL := getPosStL msg
optKey :=