Changeset 15463 in project


Ignore:
Timestamp:
08/14/09 14:13:19 (10 years ago)
Author:
sjamaan
Message:

Fix wiki links so they have text contents

File:
1 edited

Legend:

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

    r15456 r15463  
    206206         (,wiki-link-rx
    207207          ,(lambda (m)
    208              (let ((m2 (irregex-match-substring m 2))
    209                    (m3 (irregex-match-substring m 3))
    210                    (m7 (or (irregex-match-substring m 7) "")))
     208             (let* ((m2 (irregex-match-substring m 2))
     209                    (m3 (irregex-match-substring m 3))
     210                    (m7 (or (irregex-match-substring m 7) m3)))
    211211               (cond ((uri-reference m3) =>
    212212                      ;; Case 1: wiki-link is a possible URI reference
Note: See TracChangeset for help on using the changeset viewer.