Changeset 13675 in project


Ignore:
Timestamp:
03/10/09 22:29:39 (11 years ago)
Author:
sjamaan
Message:

Fix the Egg index (chicken-egg tag) so it links to the eggref/ subdir

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/3/svnwiki-chicken/trunk/svnwiki-chicken.scm

    r12735 r13675  
    2121        (parse
    2222          (html-stream 
    23             (tr (td (if (file-exists? (svnwiki-make-pathname path-in name))
    24                       (format #f "[[~A]]" name)
    25                       (if major
    26                           (format #f "[[~A~A/~A.html|~A]]" *url-eggs* (stream->string (cdr major)) name name)
    27                           (format #f "[[~A~A.html|~A]]" *url-eggs* name name))))
     23            (tr (td (if major
     24                        (if (file-exists? (svnwiki-make-pathname path-in "eggref" major name))
     25                            (format #f "[[/eggref/~A/~A]]" major name)
     26                            (format #f "[[~A~A/~A.html|~A]]" *url-eggs* (stream->string (cdr major)) name name))
     27                        ;; Shouldn't happen. Could be anything
     28                        (format #f "[[~A~A.html|~A]]" *url-eggs* name name)))
    2829                (td (cdr description))
    2930                (td (cdr license))
Note: See TracChangeset for help on using the changeset viewer.