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.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/msgdb.boot b/src/interp/msgdb.boot
index b048b07a..7559ffce 100644
--- a/src/interp/msgdb.boot
+++ b/src/interp/msgdb.boot
@@ -1005,7 +1005,7 @@ splitListSayBrightly u ==
y := rest x
null y => nil
first y = '%l =>
- RPLACD(x,nil)
+ x.rest := nil
ans:= [u,:rest y]
ans