diff --git a/lib/chibi/show/pretty.scm b/lib/chibi/show/pretty.scm
index d248d86c..98a45556 100644
--- a/lib/chibi/show/pretty.scm
+++ b/lib/chibi/show/pretty.scm
@@ -196,7 +196,7 @@
                 (each first-line
                       (cond
                        ((not (or (null? tail) (pair? tail)))
-                        (each ". " (pp tail pp shares)))
+                        (each ". " (pp tail)))
                        ((> (or (length+ (cdr ls)) +inf.0) (or indent-rule 1))
                         (each sep (joined/shares pp tail shares sep)))
                        (else