summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--share/txr/stdlib/pic.tl2
1 files changed, 1 insertions, 1 deletions
diff --git a/share/txr/stdlib/pic.tl b/share/txr/stdlib/pic.tl
index f2805554..8d5ce59e 100644
--- a/share/txr/stdlib/pic.tl
+++ b/share/txr/stdlib/pic.tl
@@ -49,7 +49,7 @@
(with-gensyms (str)
^(let ((,str ,code))
(if (> (len ,str) ,(len fmt))
- (mkstring ,(len fmt) #\#)
+ ,(mkstring (len fmt) #\#)
,str)))
code))))