fix minor default

svn: r1623
2005-12-15 20:14:16 +00:00 · 2005-12-15 20:14:16 +00:00 · 202dcd2414
commit 202dcd2414
parent af2c759187
1 changed files with 1 additions and 1 deletions
--- a/collects/dynext/filename-version.ss
+++ b/collects/dynext/filename-version.ss
@ -7,7 +7,7 @@
    (cond [(regexp-match #rx"^([0-9]+(?:p[0-9])?)(?:[.]([0-9]+))?$"
                         (version))
           => (lambda (m)
-                (let ([major (cadr m)] [minor (or (caddr m) #"")])
+                (let ([major (cadr m)] [minor (or (caddr m) "")])
                  (string-append major "_"
                                 (make-string (- (string-length "xxxxxxx")
                                                 1