From ae2b0b93a1c54a91721265344d20cf68e63899a5 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Mon, 2 Jun 2014 09:44:27 +0100 Subject: [PATCH] raco pkg catalog-archive: fix handling of source with no checksum --- racket/collects/pkg/lib.rkt | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/racket/collects/pkg/lib.rkt b/racket/collects/pkg/lib.rkt index 9e51d790ea..ef2f201030 100644 --- a/racket/collects/pkg/lib.rkt +++ b/racket/collects/pkg/lib.rkt @@ -3286,8 +3286,8 @@ (define new-checksum (file->string (path-replace-suffix pkg-file #".zip.CHECKSUM"))) (parameterize ([db:current-pkg-catalog-file temp-catalog-file]) - (define modules (db:get-pkg-modules name (db:pkg-catalog pkg) current-checksum)) - (define dependencies (db:get-pkg-dependencies 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) (or current-checksum ""))) (db:set-pkg! name (db:pkg-catalog pkg) (db:pkg-author pkg) (path->string (path->complete-path pkg-file))