aboutsummaryrefslogtreecommitdiff
path: root/src/interp/format.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/format.boot')
-rw-r--r--src/interp/format.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/format.boot b/src/interp/format.boot
index 15ba282d..06652ba3 100644
--- a/src/interp/format.boot
+++ b/src/interp/format.boot
@@ -680,7 +680,7 @@ plural(n,string) ==
formatIf pred ==
not pred => nil
- member(pred,'(T (QUOTE T))) => nil
+ member(pred,'(T %true (QUOTE T))) => nil
concat('%b,'"if",'%d,pred2English pred)
formatPredParts s ==