Changeset 13641 in project


Ignore:
Timestamp:
03/10/09 05:21:02 (11 years ago)
Author:
Ivan Raikov
Message:

Finally fixed egg-post-commit.

Location:
release/3/egg-post-commit/trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • release/3/egg-post-commit/trunk/egg-post-commit.scm

    r13637 r13641  
    1919(define-constant +call/cc-eggs-url+ "http://www.call-with-current-continuation.org/eggs")
    2020(define +wiki-url+ "http://chicken.wiki.br")
    21 (define +eggref-path+ "eggref")
    2221(define-constant +extension-path+ "release/2/stream-wiki/tags/1.9/extensions")
    2322
     
    3837(define (eggref-dir eggname)
    3938  (and *major-version*
    40        (let* ((eggref-base (make-pathname +wiki-dir+ +eggref-path+))
     39       (let* ((eggref-base (make-pathname *wiki-dir* "eggref"))
    4140              (eggref-mver (make-pathname eggref-base (->string *major-version*))))
    4241         (make-pathname eggref-mver eggname))))
     42
     43(define (eggref-url eggname)
     44  (and *major-version*
     45       (format #f "~A/~A/~A/~A"
     46               +wiki-url+ "eggref" *major-version* eggname)) )
    4347
    4448(define categories
     
    260264                (p (b "Note: ")
    261265                   "This is taken from "
    262                    ((a href (or (eggref-dir egg) (format #f "~A/~A" +wiki-url+ egg)) )
     266                   ((a href (or (eggref-url egg) (format #f "~A/~A" +wiki-url+ egg)) )
    263267                    "the Chicken Wiki")
    264268                   ", where a more recent version could be available.")
  • release/3/egg-post-commit/trunk/egg-post-commit.setup

    r13638 r13641  
    44 'egg-post-commit
    55 "egg-post-commit"
    6  '((version "1.11")
     6 '((version "1.12")
    77   (documentation "egg-post-commit.html")))
Note: See TracChangeset for help on using the changeset viewer.