Changeset 15468 in project


Ignore:
Timestamp:
08/14/09 14:45:42 (10 years ago)
Author:
sjamaan
Message:

Fix ordering of inline/non-inline things

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/4/wiki-parse/wiki-parse.scm

    r15467 r15468  
    300300
    301301             (else
    302               `(,@(drop-while string? par)
    303                 ,@(let ((inline
     302              `(,@(let ((inline
    304303                         (wiki-parse-inline
    305304                          (string-intersperse
     
    309308                        '()
    310309                        `((p ,@inline))))
     310                ,@(drop-while string? par)
    311311                ,@res))))
    312312          (let ((line (read-line in)))
Note: See TracChangeset for help on using the changeset viewer.