diff --git a/pkgs/plt-services/meta/pkg-push/push-catalog.rkt b/pkgs/plt-services/meta/pkg-push/push-catalog.rkt index 0a51a7973a..8159f7eea4 100644 --- a/pkgs/plt-services/meta/pkg-push/push-catalog.rkt +++ b/pkgs/plt-services/meta/pkg-push/push-catalog.rkt @@ -62,10 +62,12 @@ (loop (set-add pkgs a) (set-union r - (apply set (map (lambda (p) (if (pair? p) (car p) p)) - (hash-ref (hash-ref new-pkgs a) - 'dependencies - '()))))))]))) + (set-remove + (apply set (map (lambda (p) (if (pair? p) (car p) p)) + (hash-ref (hash-ref new-pkgs a) + 'dependencies + '()))) + "racket"))))]))) (printf "Getting current S3 content...\n") (define old-content (list->set (ls (string-append bucket "/pkgs"))))