jpkg: default unscoped packages to @ober
ober
5c4d6b6a95a2e74e054107cef2b6b822b09a755d
--- a/lib/std/pkg/project.ss +++ b/lib/std/pkg/project.ss @@ -388,17 +388,17 @@ (def (default-scope) ;; The default scope applied when a package spec lacks an explicit @scope. ;; Override with $JPKG_DEFAULT_SCOPE (without the @); the canonical - ;; upstream registry is @lisp. + ;; upstream registry is @ober. (let ([env (getenv "JPKG_DEFAULT_SCOPE")]) (if (and env (> (string-length env) 0) (char=? (string-ref env 0) #\@)) env - (string-append "@" (or env "lisp"))))) + (string-append "@" (or env "ober"))))) (def (parse-pkg-spec spec) ;; "PKG" or "PKG@VERSION-OR-RANGE" -> (values name range-or-#f) ;; A bare name without @scope (e.g. "ssh" or "ssh@^1.0") is auto-prefixed - ;; with the default scope (e.g. "@lisp/ssh"). A name that already starts + ;; with the default scope (e.g. "@ober/ssh"). A name that already starts ;; with @scope is used as-is. (let ([spec (if (and (> (string-length spec) 0)