summaryrefslogtreecommitdiff
path: root/guix/gnu-maintenance.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guix/gnu-maintenance.scm')
-rw-r--r--guix/gnu-maintenance.scm11
1 files changed, 4 insertions, 7 deletions
diff --git a/guix/gnu-maintenance.scm b/guix/gnu-maintenance.scm
index 604522e913..cb774d2ed6 100644
--- a/guix/gnu-maintenance.scm
+++ b/guix/gnu-maintenance.scm
@@ -706,15 +706,12 @@ GNOME packages; EMMS is included though, because its releases are on gnu.org."
((? string? uri) uri)
((uri mirrors ...) uri))))
(package (package-upstream-name package))
- (directory (dirname (uri-path uri)))
- (rewrite (url-prefix-rewrite %savannah-base
- "mirror://savannah")))
+ (directory (dirname (uri-path uri))))
;; Note: We use the default 'file->signature', which adds ".sig", ".asc",
;; or whichever detached signature naming scheme PACKAGE uses.
- (and=> (latest-html-release package
- #:base-url %savannah-base
- #:directory directory)
- (cut adjusted-upstream-source <> rewrite))))
+ (latest-html-release package
+ #:base-url %savannah-base
+ #:directory directory)))
(define (latest-sourceforge-release package)
"Return the latest release of PACKAGE."