Changeset 13977 in project


Ignore:
Timestamp:
03/27/09 20:52:45 (11 years ago)
Author:
sjamaan
Message:

Add nested quotes testcase

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/3/fancypants/tests/run.scm

    r13976 r13977  
    3030         '(p "\"There's " (em "no") " business like show business\"")))
    3131  (test '(p (*flatten* "" (& "#x201c") "" "Hi there" (& "#x201d") "" ", he said"))
    32         (smarten-quotes '(p "``Hi there'', he said"))))
     32        (smarten-quotes '(p "``Hi there'', he said")))
     33  (test '(p (*flatten* "" (& "#x201c") "" "" (& "#x201c") "" "Hi there" (& "#x201d") "" ", he said" (& "#x201d") "" ", I said"))
     34        (smarten-quotes '(p "````Hi there'', he said'', I said"))))
    3335
    3436(test-group "sxml rulesets"
Note: See TracChangeset for help on using the changeset viewer.