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 18444188..8df46589 100644
--- a/src/interp/msgdb.boot
+++ b/src/interp/msgdb.boot
@@ -797,7 +797,7 @@ brightPrintCenterAsTeX(x, out == $OutputStream) ==
while lst and not first(lst) = "%l" repeat
words := [first lst,: words]
lst := rest lst
- if lst then lst := cdr lst
+ if lst then lst := rest lst
sayString('"\centerline{",out)
words := nreverse words
for zz in words repeat