Remove deprecated modules

4 files changed, 0 insertions, 449 deletions

diff --git a/hecate/packages/binaries.scm b/hecate/packages/binaries.scm
deleted file mode 100644
index e21a522..0000000
--- a/hecate/packages/binaries.scm
+++ /dev/null
@@ -1,52 +0,0 @@
-(define-module (hecate packages binaries)
-  #:use-module ((guix licenses) #:prefix license:)
-  #:use-module (guix gexp)
-  #:use-module (guix packages)
-  #:use-module (guix download)
-  #:use-module (guix build-system copy)
-  #:use-module (gnu packages base)
-  #:use-module (gnu packages bootstrap)
-  #:use-module (gnu packages compression)
-  #:use-module (gnu packages elf)
-  #:use-module (gnu packages gcc)
-  #:use-module (gnu packages glib))
-
-(define-public hugo-bin
-  (package
-    (name "hugo-bin")
-    (version "0.128.2")
-    (source (origin
-              (method url-fetch)
-              (uri (string-append
-                    "https://github.com/gohugoio/hugo" "/releases/download/v"
-                    version "/hugo_extended_" version "_linux-amd64.tar.gz"))
-              (sha256
-               (base32
-                "1i8jqhw9rra3xjkxzzyj6liqrg52wdi5cdzf3dzijv6pap0m6cm8"))))
-    (build-system copy-build-system)
-    (arguments
-     (list #:install-plan #~'(("hugo" "bin/"))
-           #:phases
-           #~(modify-phases %standard-phases
-               (delete 'strip)
-               (add-after 'install 'patch-elf
-                 (lambda _
-                   (let ((hugo (string-append #$output "/bin/hugo")))
-                     (invoke "patchelf" "--set-interpreter"
-                             (string-append #$(this-package-input "glibc")
-                                            #$(glibc-dynamic-linker))
-                             hugo)
-                     (invoke "patchelf" "--set-rpath"
-                             (string-append (ungexp (this-package-input "gcc")
-                                                    "lib")
-                                            "/lib")
-                             hugo)))))))
-    (supported-systems '("x86_64-linux"))
-    (native-inputs (list patchelf))
-    (inputs (list `(,gcc "lib") glibc))
-    (home-page "https://gohugo.io/")
-    (synopsis "Static site generator")
-    (description
-     "Hugo is a static site generator written in Go, optimized for speed and
-designed for flexibility.")
-    (license license:asl2.0)))
diff --git a/hecate/packages/browsers.scm b/hecate/packages/browsers.scm
deleted file mode 100644
index 8baa98f..0000000
--- a/hecate/packages/browsers.scm
+++ /dev/null
@@ -1,123 +0,0 @@
-(define-module (hecate packages browsers)
-  #:use-module (guix packages)
-  #:use-module (guix download)
-  #:use-module (guix git-download)
-  #:use-module (guix build-system qt)
-  #:use-module (guix gexp)
-  #:use-module ((guix licenses) #:prefix license:)
-  #:use-module (gnu packages qt)
-  #:use-module (gnu packages gl)
-  #:use-module (gnu packages gcc)
-  #:use-module (gnu packages xdisorg)
-  #:use-module (gnu packages tls))
-
-(define serenity-source
-  (origin
-    (method git-fetch)
-    (uri
-      (git-reference
-        (url "https://github.com/SerenityOS/serenity")
-        (commit "fd6bb41519d01390e7a8b1ed6554a58b38d6cb88")))
-    (file-name (git-file-name "serenity" "0"))
-    (sha256 (base32 "17rhgdqagj0by4h3pds9k71az5ffhzrx8f7d1zn0qr9qa7vkj6dd"))
-    (modules '((guix build utils)))
-    (snippet
-      '(begin
-         ; (delete-file "Userland/Libraries/LibUnicode/Normalize.cpp")
-         ; (substitute* "Userland/Libraries/LibUnicode/CMakeLists.txt"
-         ;   (("\\bNormalize\\.cpp\\b") ""))
-         (substitute* "Meta/CMake/utils.cmake"
-           (("Downloading file \\$\\{file} from \\$\\{url}") "Downloading file ${path} from ${url}"))
-         (substitute* "Meta/CMake/common_compile_options.cmake"
-           (("\\badd_compile_options\\(-Werror\\)") ""))))))
-
-(define cldr-version "42.0.0")
-(define cldr-json
-  (origin
-    (method url-fetch)
-    (uri (string-append "https://github.com/unicode-org/cldr-json/releases/download/" cldr-version "/cldr-" cldr-version "-json-modern.zip"))
-    (sha256 (base32 "1hmdqca0gdx3waafbz2dypika6gd5p7wb6p90ff0bfgvwx9p1n07"))))
-
-(define ucd-version "15.0.0")
-(define ucd-emoji-version "15.0")
-(define ucd
-  (origin
-    (method url-fetch)
-    (uri (string-append "https://unicode.org/Public/" ucd-version "/ucd/UCD.zip"))
-    (sha256 (base32 "133inqn33hcfvylmps63yjr6rrqrfq6x7a5hr5fd51z6yc0f9gaz"))))
-(define ucd-emoji-test
-  (origin
-    (method url-fetch)
-    (uri (string-append "https://unicode.org/Public/emoji/" ucd-emoji-version "/emoji-test.txt"))
-    (sha256 (base32 "1nskm3qqb568dlsz54r0ympqbzyf9zhn40lxw5mhk3iqr0xg4ic4"))))
-
-(define tzdb-version "2022f")
-(define tzdb
-  (origin
-    (method url-fetch)
-    (uri (string-append "https://data.iana.org/time-zones/releases/tzdata" tzdb-version ".tar.gz"))
-    (sha256 (base32 "007hgak36scah2fsgf7gkzw2fw5b3jp8mziip5kja8axcwgxg44r"))))
-
-(define ladybird
-  (package
-    (name "ladybird")
-    (version "0")
-    (synopsis "The Ladybird Web Browser is a browser using the SerenityOS LibWeb engine with a Qt GUI.")
-    (description synopsis)
-    (home-page "https://github.com/SerenityOS/ladybird")
-    (license license:bsd-2)
-    (source
-      (origin
-        (method git-fetch)
-        (uri
-          (git-reference
-            (url "https://github.com/SerenityOS/ladybird")
-            (commit "7e670a08180c51d474b982f871074c1b60cf49f7")))
-        (file-name (git-file-name name version))
-        (sha256 (base32 "1z0jmnif91fmby175584vv6cwl2aj0ks0c1aajigwskp024fx62m"))))
-    (native-inputs
-      (list
-        `("gcc" ,gcc-12)
-        `("libxkbcommon" ,libxkbcommon)
-        `("mesa" ,mesa)
-        `("openssl" ,openssl)
-        `("qtbase" ,qtbase)
-        `("qttools" ,qttools)
-        `("serenity-source" ,serenity-source)
-        `("cldr-json" ,cldr-json)
-        `("ucd" ,ucd)
-        `("ucd-emoji-test" ,ucd-emoji-test)
-        `("tzdb" ,tzdb)))
-    (build-system qt-build-system)
-    (arguments
-      `(#:configure-flags
-         (list
-           (string-append "-DSERENITY_SOURCE_DIR=" (getcwd) "/source/serenity"))
-        #:out-of-source? #f
-        #:phases
-          (modify-phases %standard-phases
-            (add-before 'patch-source-shebangs 'copy-serenity-source
-              (lambda* (#:key inputs #:allow-other-keys)
-                (copy-recursively (assoc-ref inputs "serenity-source") "serenity")))
-            (add-before 'configure 'copy-data
-              (lambda* (#:key inputs #:allow-other-keys)
-                (mkdir-p "CLDR") (mkdir-p "UCD") (mkdir-p "TZDB")
-                (let ((port (open-file "CLDR/version.txt" "w")))
-                  (display ,cldr-version port)
-                  (close port))
-                (let ((port (open-file "UCD/version.txt" "w")))
-                  (display ,ucd-version port)
-                  (close port))
-                (let ((port (open-file "TZDB/version.txt" "w")))
-                  (display ,tzdb-version port)
-                  (close port))
-                (copy-file (assoc-ref inputs "cldr-json") "CLDR/cldr.zip")
-                (copy-file (assoc-ref inputs "ucd") "UCD/UCD.zip")
-                (copy-file (assoc-ref inputs "ucd-emoji-test") "UCD/emoji-test.txt")
-                (copy-file (assoc-ref inputs "tzdb") "TZDB/tzdb.tar.gz")))
-            (add-before 'build 'make-libweb-generated-directories
-              (lambda _
-                (mkdir-p "_deps/lagom-build/Userland/Libraries/LibWeb/Bindings")
-                (mkdir-p "_deps/lagom-build/WebContent"))))
-        ; no tests
-        #:tests? #f))))
diff --git a/hecate/packages/sqlite.scm b/hecate/packages/sqlite.scm
deleted file mode 100644
index bfb91f0..0000000
--- a/hecate/packages/sqlite.scm
+++ /dev/null
@@ -1,125 +0,0 @@
-;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2013, 2015, 2018, 2020 Ludovic Courtès <[email protected]>
-;;; Copyright © 2014, 2015, 2016, 2018 Mark H Weaver <[email protected]>
-;;; Copyright © 2014 Sree Harsha Totakura <[email protected]>
-;;; Copyright © 2015, 2016 Sou Bunnbu <[email protected]>
-;;; Copyright © 2016 Efraim Flashner <[email protected]>
-;;; Copyright © 2016 Ben Woodcroft <[email protected]>
-;;; Copyright © 2016 David Craven <[email protected]>
-;;; Copyright © 2016, 2017, 2018, 2019, 2020, 2021 Marius Bakke <[email protected]>
-;;; Copyright © 2017 Ricardo Wurmus <[email protected]>
-;;; Copyright © 2017 Jelle Licht <[email protected]>
-;;; Copyright © 2018 Tobias Geerinckx-Rice <[email protected]>
-;;; Copyright © 2018 Alex Vong <[email protected]>
-;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <[email protected]>
-;;; Copyright © 2022 Matthew James Kraai <[email protected]>
-;;; Copyright © 2024 Zhu Zihao <[email protected]>
-;;;
-;;; This file is part of GNU Guix.
-;;;
-;;; GNU Guix is free software; you can redistribute it and/or modify it
-;;; under the terms of the GNU General Public License as published by
-;;; the Free Software Foundation; either version 3 of the License, or (at
-;;; your option) any later version.
-;;;
-;;; GNU Guix is distributed in the hope that it will be useful, but
-;;; WITHOUT ANY WARRANTY; without even the implied warranty of
-;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;; GNU General Public License for more details.
-;;;
-;;; You should have received a copy of the GNU General Public License
-;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.
-
-(define-module (hecate packages sqlite)
-  #:use-module (gnu packages)
-  #:use-module (gnu packages hurd)
-  #:use-module (gnu packages readline)
-  #:use-module ((guix licenses) #:prefix license:)
-  #:use-module (guix packages)
-  #:use-module (guix download)
-  #:use-module (guix build-system gnu)
-  #:use-module (guix utils)
-  #:use-module (guix deprecation)
-  #:use-module (ice-9 match)
-  #:use-module (srfi srfi-26))
-
-;;; Commentary:
-;;;
-;;; This module has been separated from (gnu packages databases) to reduce the
-;;; number of module references for core packages.
-
-(define (sqlite-uri version year)
-  (let ((numeric-version
-         (match (string-split version #\.)
-           ((first-digit other-digits ...)
-            (string-append first-digit
-                           (string-pad-right
-                            (string-concatenate
-                             (map (cut string-pad <> 2 #\0)
-                                  other-digits))
-                            6 #\0))))))
-    (string-append "https://sqlite.org/" (number->string year)
-                   "/sqlite-autoconf-" numeric-version ".tar.gz")))
-
-(define-public sqlite
-  (package
-   (name "sqlite")
-   (version "3.46.0")
-   (source (origin
-            (method url-fetch)
-            (uri (sqlite-uri version 2024))
-            (patches (search-patches "sqlite-hurd.patch"))
-            (sha256
-             (base32
-              "0zbs853s8ly693qdg0l7vs4shwn3plmvdczr2s478wsj6dxnm3kg"))))
-   (build-system gnu-build-system)
-   (inputs (list readline))
-   (outputs '("out" "static"))
-   (arguments
-    `(#:configure-flags
-      ;; Add -DSQLITE_SECURE_DELETE, -DSQLITE_ENABLE_FTS3,
-      ;; -DSQLITE_ENABLE_UNLOCK_NOTIFY and -DSQLITE_ENABLE_DBSTAT_VTAB
-      ;; to CFLAGS.  GNU Icecat will refuse to use the system SQLite
-      ;; unless these options are enabled.
-      (list (string-append "CFLAGS=-O2 -g -DSQLITE_SECURE_DELETE "
-                           "-DSQLITE_ENABLE_FTS3 "
-                           "-DSQLITE_ENABLE_UNLOCK_NOTIFY "
-                           "-DSQLITE_ENABLE_DBSTAT_VTAB "
-                           ;; Column metadata is required by GNU Jami and Qt, et.al.
-                           "-DSQLITE_ENABLE_COLUMN_METADATA"))
-      #:phases (modify-phases %standard-phases
-                 (add-after 'install 'move-static-library
-                   (lambda* (#:key outputs #:allow-other-keys)
-                     (let* ((out    (assoc-ref outputs "out"))
-                            (static (assoc-ref outputs "static"))
-                            (source (string-append out "/lib/libsqlite3.a")))
-                       (mkdir-p (string-append static "/lib"))
-                       (link source (string-append static "/lib/libsqlite3.a"))
-                       (delete-file source)
-
-                       ;; Remove reference to the static library from the .la file
-                       ;; so that Libtool looks for it in the usual places.
-                       (substitute* (string-append out "/lib/libsqlite3.la")
-                         (("^old_library=.*")
-                          "old_library=''\n"))
-                       #t))))))
-   (home-page "https://www.sqlite.org/")
-   (synopsis "The SQLite database management system")
-   (description
-    "SQLite is a software library that implements a self-contained, serverless,
-zero-configuration, transactional SQL database engine.  SQLite is the most
-widely deployed SQL database engine in the world.  The source code for SQLite
-is in the public domain.")
-   (license license:public-domain)))
-
-;; Newer version required for e.g. fossil.
-(define-public sqlite-next
-  (package
-    (inherit sqlite)
-    (version "3.46.0")
-    (source (origin
-              (method url-fetch)
-              (uri (sqlite-uri version 2024))
-              (sha256
-               (base32
-                "0zbs853s8ly693qdg0l7vs4shwn3plmvdczr2s478wsj6dxnm3kg"))))))
diff --git a/hecate/packages/version-control.scm b/hecate/packages/version-control.scm
deleted file mode 100644
index b2602bc..0000000
--- a/hecate/packages/version-control.scm
+++ /dev/null
@@ -1,149 +0,0 @@
-(define-module (hecate packages version-control)
-  #:use-module ((guix licenses) #:prefix license:)
-  #:use-module (guix utils)
-  #:use-module (guix packages)
-  #:use-module (guix deprecation)
-  #:use-module (guix gexp)
-  #:use-module (guix download)
-  #:use-module (guix git-download)
-  #:use-module (guix hg-download)
-  #:use-module (guix build-system cargo)
-  #:use-module (guix build-system cmake)
-  #:use-module (guix build-system copy)
-  #:use-module (guix build-system gnu)
-  #:use-module (guix build-system go)
-  #:use-module (guix build-system perl)
-  #:use-module (guix build-system pyproject)
-  #:use-module (guix build-system python)
-  #:use-module (guix build-system qt)
-  #:use-module (guix build-system trivial)
-  #:use-module (gnu packages apr)
-  #:use-module (gnu packages autotools)
-  #:use-module (gnu packages documentation)
-  #:use-module (gnu packages base)
-  #:use-module (gnu packages bash)
-  #:use-module (gnu packages bison)
-  #:use-module (gnu packages boost)
-  #:use-module (gnu packages check)
-  #:use-module (gnu packages cook)
-  #:use-module (gnu packages crates-io)
-  #:use-module (gnu packages crates-vcs)
-  #:use-module (gnu packages curl)
-  #:use-module (gnu packages databases)
-  #:use-module (gnu packages docbook)
-  #:use-module (gnu packages file)
-  #:use-module (gnu packages flex)
-  #:use-module (gnu packages freedesktop)
-  #:use-module (gnu packages gettext)
-  #:use-module (gnu packages gl)
-  #:use-module (gnu packages glib)
-  #:use-module (gnu packages gnome)
-  #:use-module (gnu packages gnupg)
-  #:use-module (gnu packages golang)
-  #:use-module (gnu packages golang-build)
-  #:use-module (gnu packages golang-check)
-  #:use-module (gnu packages golang-crypto)
-  #:use-module (gnu packages golang-web)
-  #:use-module (gnu packages golang-xyz)
-  #:use-module (gnu packages groff)
-  #:use-module (gnu packages guile)
-  #:use-module (gnu packages guile-xyz)
-  #:use-module (gnu packages image)
-  #:use-module (gnu packages imagemagick)
-  #:use-module (gnu packages linux)
-  #:use-module (gnu packages mail)
-  #:use-module (gnu packages man)
-  #:use-module (gnu packages maths)
-  #:use-module (gnu packages ncurses)
-  #:use-module (gnu packages ssh)
-  #:use-module (gnu packages web)
-  #:use-module (gnu packages patchutils)
-  #:use-module (gnu packages pcre)
-  #:use-module (gnu packages perl)
-  #:use-module (gnu packages perl-check)
-  #:use-module (gnu packages php)
-  #:use-module (gnu packages pkg-config)
-  #:use-module (gnu packages python)
-  #:use-module (gnu packages python-build)
-  #:use-module (gnu packages python-check)
-  #:use-module (gnu packages python-crypto)
-  #:use-module (gnu packages python-web)
-  #:use-module (gnu packages python-xyz)
-  #:use-module (gnu packages readline)
-  #:use-module (gnu packages ruby)
-  #:use-module (hecate packages sqlite)
-  #:use-module (gnu packages texinfo)
-  #:use-module (gnu packages text-editors)
-  #:use-module (gnu packages admin)
-  #:use-module (gnu packages xml)
-  #:use-module (gnu packages emacs)
-  #:use-module (gnu packages compression)
-  #:use-module (gnu packages sdl)
-  #:use-module (gnu packages swig)
-  #:use-module (gnu packages sync)
-  #:use-module (gnu packages tcl)
-  #:use-module (gnu packages textutils)
-  #:use-module (gnu packages time)
-  #:use-module (gnu packages tls)
-  #:use-module (gnu packages)
-  #:use-module (ice-9 match)
-  #:use-module (srfi srfi-1))
-
-(define-public fossil
-  (package
-    (name "fossil")
-    (version "2.23")
-    (source
-     (origin
-       (method url-fetch)
-       (uri (string-append
-             "https://www.fossil-scm.org/home/tarball/"
-             "47362306a7dd7c6fc3cab77cebe5d25469b0a9448479d9718eb5c49c8337b29"
-             "/fossil-src-" version ".tar.gz"))
-       ;; XXX: Currently the above hash must be manually updated.
-       (sha256
-        (base32 "1r1kabvmlhc0qgyq8g9zhq8i0123x9dba9b71j4xc71k14kfqjm9"))
-       (modules '((guix build utils)))
-       (snippet
-        '(delete-file-recursively "compat"))))
-    (build-system gnu-build-system)
-    (native-inputs
-     (list tcl                          ;for configuration only
-           which                        ;for tests only
-           ed))                         ;ditto
-    (inputs
-     (list openssl zlib sqlite))
-    (arguments
-     `(#:configure-flags (list "--with-openssl=auto"
-                               "--disable-internal-sqlite")
-       #:test-target "test"
-       #:phases (modify-phases %standard-phases
-                  (add-after 'patch-source-shebangs 'patch-sh
-                    (lambda _
-                      (substitute* '("auto.def")
-                        (("/bin/sh") (which "sh")))))
-                  (replace 'configure
-                    (lambda* (#:key outputs (configure-flags '())
-                              #:allow-other-keys)
-                      ;; The 'configure' script is not an autoconf script and
-                      ;; chokes on unrecognized options.
-                      (apply invoke
-                             "./configure"
-                             (string-append "--prefix="
-                                            (assoc-ref outputs "out"))
-                             configure-flags)))
-                  (add-before 'check 'test-setup
-                    (lambda _
-                      (setenv "USER" "guix")
-                      (setenv "TZ" "UTC"))))))
-    (home-page "https://fossil-scm.org")
-    (synopsis "Software configuration management system")
-    (description
-     "Fossil is a distributed source control management system which supports
-access and administration over HTTP CGI or via a built-in HTTP server.  It has
-a built-in wiki, built-in file browsing, built-in tickets system, etc.")
-    (properties
-     '((release-monitoring-url
-        . "https://fossil-scm.org/home/uv/latest-release.md")))
-    (license (list license:public-domain        ;src/miniz.c, src/shell.c
-                   license:bsd-2))))