diff options
| author | dos-reis <gdr@axiomatics.org> | 2010-12-12 04:12:20 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2010-12-12 04:12:20 +0000 |
| commit | 2583edf6b172ea98d700773df5f51761aee01692 (patch) | |
| tree | 8df49363ad97afcdeaca8a2dd0f18eb778849b22 /src/interp/br-op2.boot | |
| parent | dd14d434d1d7d06cd90a5a8a0fd1bef6cfffda8f (diff) | |
| download | open-axiom-2583edf6b172ea98d700773df5f51761aee01692.tar.gz | |
Clean symbol vs. character vs. string confusion
Diffstat (limited to 'src/interp/br-op2.boot')
| -rw-r--r-- | src/interp/br-op2.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/br-op2.boot b/src/interp/br-op2.boot index 6b6c11e4..3eff1ceb 100644 --- a/src/interp/br-op2.boot +++ b/src/interp/br-op2.boot @@ -495,9 +495,9 @@ dbHeading(items,which,heading,:options) == capwhich := capitalize which prefix := count < 2 => - names? => pluralSay(count,strconc(capwhich," Name"),nil) + names? => pluralSay(count,strconc(capwhich,'" Name"),nil) pluralSay(count,capwhich,nil) - names? => pluralSay(count,nil,strconc(capwhich," Names")) + names? => pluralSay(count,nil,strconc(capwhich,'" Names")) pluralSay(count,nil,pluralize capwhich) [:prefix,'" for ",:heading] |