From cc34e597eab437a9f09701035e2acc9147858af5 Mon Sep 17 00:00:00 2001 From: Tobias Geerinckx-Rice Date: Sun, 29 Sep 2024 02:00:00 +0200 Subject: [PATCH] gnu: stfl: Use archived source & home page. * gnu/packages/ncurses.scm (stfl)[source]: Download from the Internet Archive. [home-page]: Same. Change-Id: I528dbe408ea83b72f21f84a66fd646cd8b8c1fb8 --- gnu/packages/ncurses.scm | 13 ++++++++----- 1 file changed, 8 insertions(+), 5 deletions(-) diff --git a/gnu/packages/ncurses.scm b/gnu/packages/ncurses.scm index c19fe6d990..e82e6ebd54 100644 --- a/gnu/packages/ncurses.scm +++ b/gnu/packages/ncurses.scm @@ -323,11 +323,13 @@ (define-public stfl (source (origin (method url-fetch) - (uri (string-append "http://www.clifford.at/stfl/stfl-" + ;; The original home page has been taken over by gamblespammers. + ;; Luckily, the original is archived and even includes the tarball. + (uri (string-append "https://web.archive.org/web/20211113222004/" + "http://www.clifford.at/stfl/stfl-" version ".tar.gz")) (sha256 - (base32 - "1460d5lc780p3q38l3wc9jfr2a7zlyrcra0li65aynj738cam9yl")))) + (base32 "1460d5lc780p3q38l3wc9jfr2a7zlyrcra0li65aynj738cam9yl")))) (build-system gnu-build-system) (arguments `(#:tests? #f ; no test target @@ -336,7 +338,7 @@ (define-public stfl #:phases (modify-phases %standard-phases (delete 'configure) ; there is no configure script - ;; in our ncurses, the headers are in /include + ;; In our ncurses, the headers are in /include. (add-before 'build 'patch-ncursesw (lambda _ (substitute* "stfl_internals.h" @@ -349,7 +351,8 @@ (define-public stfl (symlink "libstfl.so" (string-append lib "/libstfl.so.0")))))))) (inputs (list ncurses)) (native-inputs (list ncurses swig)) - (home-page "https://www.clifford.at/stfl/") + (home-page (string-append "https://web.archive.org/web/20211113222004/" + "http://www.clifford.at/stfl/")) (synopsis "Structured terminal forms library") (description "Stfl is a library which implements a curses-based widget set for text terminals.")