suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

raco pkg catalog-archive: fix handling of source with no checksum

Browse Source
This commit is contained in:
Matthew Flatt 2014-06-02 09:44:27 +01:00
parent a718aeb441
commit ae2b0b93a1
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
racket/collects/pkg/lib.rkt
View File

@ -3286,8 +3286,8 @@
(define new-checksum (define new-checksum
(file->string (path-replace-suffix pkg-file #".zip.CHECKSUM"))) (file->string (path-replace-suffix pkg-file #".zip.CHECKSUM")))
(parameterize ([db:current-pkg-catalog-file temp-catalog-file]) (parameterize ([db:current-pkg-catalog-file temp-catalog-file])
(define modules (db:get-pkg-modules name (db:pkg-catalog pkg) current-checksum)) (define modules (db:get-pkg-modules name (db:pkg-catalog pkg) (or current-checksum "")))
(define dependencies (db:get-pkg-dependencies name (db:pkg-catalog pkg) current-checksum)) (define dependencies (db:get-pkg-dependencies name (db:pkg-catalog pkg) (or current-checksum "")))
(db:set-pkg! name (db:pkg-catalog pkg) (db:set-pkg! name (db:pkg-catalog pkg)
(db:pkg-author pkg) (db:pkg-author pkg)
(path->string (path->complete-path pkg-file)) (path->string (path->complete-path pkg-file))