Changeset 25926 in project


Ignore:
Timestamp:
02/19/12 05:47:01 (8 years ago)
Author:
felix winkelmann
Message:

henrietta 0.6: better egg name checking

Location:
release/4/henrietta/trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • release/4/henrietta/trunk/henrietta.scm

    r24437 r25926  
    8181      (lambda (path) (string-match rx path))))
    8282
     83  (define (illegal-name? name)
     84    (or (equal? #\. (string-ref name 0))
     85        (any (cut equal? #\/ <>)
     86             (string->list name))))
     87
    8388  (define (retrieve name version)
     89    (when (illegal-name? name)
     90      (fail "illegal egg name" name))
    8491    (let-values (((dir ver)
    8592                  (hairy
  • release/4/henrietta/trunk/henrietta.setup

    r24437 r25926  
    77 'henrietta
    88 '("henrietta")
    9  '((version 0.5)))
     9 '((version 0.6)))
Note: See TracChangeset for help on using the changeset viewer.