diff --git a/racket/collects/pkg/private/install.rkt b/racket/collects/pkg/private/install.rkt index 813fe04a60..cf294e8a26 100644 --- a/racket/collects/pkg/private/install.rkt +++ b/racket/collects/pkg/private/install.rkt @@ -590,7 +590,8 @@ (define alt-dir-name ;; If we had to pick an alternate dir name, then record it: (let-values ([(base name dir?) (split-path final-pkg-dir)]) - (and (regexp-match? #rx"[+]" name) + (and (path? name) + (regexp-match? #rx"[+]" name) (path->string name)))) (define this-pkg-info (make-pkg-info orig-pkg checksum auto? single-collect alt-dir-name))