diff --git a/ajatt/packages/audio.scm b/ajatt/packages/audio.scm index 4d6cf06..8f2cd6f 100644 --- a/ajatt/packages/audio.scm +++ b/ajatt/packages/audio.scm @@ -2,23 +2,45 @@ #:use-module (gnu packages video) #:use-module (guix build-system copy) #:use-module (guix git-download) + #:use-module (guix download) #:use-module (guix packages) #:use-module (guix gexp) #:use-module ((guix licenses) #:prefix license:)) + + +(define-public navidrome-bin + (package + (name "navidrome-bin") + (version "0.51.1") + (source (origin + (method url-fetch) + (uri (string-append "https://github.com/navidrome/navidrome/releases/download/v" + version "/navidrome_" version "_linux_amd64.tar.gz")) + (sha256 "0s7p3nfk9qfv8agjajpn438l1hcfl5w2i4s1c8a0d6679xw2nckl"))) + (build-system copy-build-system) + (supported-systems '("x86_64-linux")) + (arguments + `(#:install-plan '(("navidrome" "bin/")))) + (synopsis "ModNavidrome is an open source web-based music collection server and streamer. It gives you freedom to listen to your music collection from any browser or mobile device. It's like your personal Spotify!") + (description "Modern Music Server and Streamer compatible with Subsonic/Airsonic.") + (home-page "https://github.com/navidrome/navidrome") + (license license:gpl3))) + + (define-public impd (package - (name "impd") - (version "0.8") - (source - (origin - (method git-fetch) - (uri - (git-reference - (url "https://github.com/Ajatt-Tools/impd.git") - (commit (string-append "v" version)))) - (sha256 - (base32 "1wxmc628jh3prxrwbca4cdhfa58birdxr2nh76k11j1cjw939hzg")))) + (name "impd") + (version "0.8") + (source + (origin + (method git-fetch) + (uri + (git-reference + (url "https://github.com/Ajatt-Tools/impd.git") + (commit (string-append "v" version)))) + (sha256 + (base32 "1wxmc628jh3prxrwbca4cdhfa58birdxr2nh76k11j1cjw939hzg")))) (build-system copy-build-system) (arguments (list #:install-plan @@ -28,3 +50,6 @@ (synopsis "AJATT-style passive listening and condensed audio without bloat.") (description "AJATT-style passive listening and condensed audio without bloat.") (license license:gpl3))) + + +navidrome-bin diff --git a/ajatt/packages/dictionaries.scm~ b/ajatt/packages/dictionaries.scm~ deleted file mode 100644 index bd885a7..0000000 --- a/ajatt/packages/dictionaries.scm~ +++ /dev/null @@ -1,169 +0,0 @@ -(define-module (ajatt packages dictionaries) - #:use-module (gnu packages cmake) - #:use-module (gnu packages compression) - #:use-module (gnu packages dictionaries) - #:use-module (gnu packages education) - #:use-module (gnu packages fontutils) - #:use-module (gnu packages fonts) - #:use-module (gnu packages gstreamer) - #:use-module (gnu packages hunspell) - #:use-module (gnu packages icu4c) - #:use-module (gnu packages image) - #:use-module (gnu packages perl) - #:use-module (gnu packages pkg-config) - #:use-module ((gnu packages qt) #:hide (qtspeech)) - #:use-module (gnu packages search) - #:use-module (gnu packages textutils) - #:use-module (gnu packages version-control) - #:use-module (gnu packages video) - #:use-module (gnu packages vulkan) - #:use-module (gnu packages web) - #:use-module (gnu packages xdisorg) - #:use-module (gnu packages xiph) - #:use-module (gnu packages xorg) - #:use-module (guix build-system cmake) - #:use-module (guix build-system gnu) - #:use-module (guix gexp) - #:use-module (guix utils) - #:use-module (guix git-download) - #:use-module (guix packages) - #:use-module (ajatt packages qt) - #:use-module (ajatt packages suckless) - #:use-module ((guix licenses) #:prefix license:)) - -(define-public goldendict-ng - (package - (name "goldendict-ng") - (version "24.02.16") - (source - (origin - (method git-fetch) - (uri - (git-reference - (url "https://github.com/xiaoyifang/goldendict-ng.git") - (commit "68c95001005fd77c95936589bbc2487ff3086019"))) - (sha256 - (base32 "10aghpghysc024jcd14hl6mslzags5jf9pbr8apndycczc4ybswy")))) - (build-system cmake-build-system) - (arguments - (list #:cmake cmake - #:tests? #f - #:configure-flags - #~(list "-DCMAKE_BUILD_TYPE=Release") - #:phases - #~(modify-phases %standard-phases - (add-after 'unpack 'absolutize-qt-headers - (lambda _ - (let ((qtbase-file - (lambda (path) - (string-append "\"" #$qtbase path "\"")))) - (substitute* "src/ui/mainwindow.cc" - (("") - (qtbase-file - "/include/qt6/QtPrintSupport/QPrinter")) - (("") - (qtbase-file - "/include/qt6/QtPrintSupport/QPageSetupDialog")) - (("") - (qtbase-file - "/include/qt6/QtPrintSupport/QPrintPreviewDialog")) - (("") - (qtbase-file - "/include/qt6/QtPrintSupport/QPrintDialog")))))) - (add-after 'wrap 'wrap-qt-process-path - (lambda* (#:key inputs outputs #:allow-other-keys) - (wrap-program (search-input-file outputs "bin/goldendict") - `("QTWEBENGINE_RESOURCES_PATH" = - (,(search-input-directory - inputs "/share/qt6/resources"))) - `("QTWEBENGINEPROCESS_PATH" = - (,(search-input-file - inputs "/lib/qt6/libexec/QtWebEngineProcess"))))))))) - (native-inputs - (list hunspell - icu4c - libeb - libtiff - libvorbis - libxkbcommon - libxkbfile - libxtst - libzim - lzo - opencc - pkg-config - qt5compat - gstreamer - qtspeech - qtsvg - qttools - qtwebview - qtx11extras - vulkan-headers - (list xz "static") - zlib - (list zstd "lib"))) - (inputs - (list ao - bzip2 - ffmpeg - xapian - qtmultimedia - qtwebengine - gstreamer - qtbase - xproto)) - (synopsis "A feature-rich dictionary lookup program") - (description - "GoldenDict is a feature-rich dictionary lookup program, -supporting multiple dictionary formats (StarDict, Babylon, Lingvo, Dictd, AARD, -MDict, SDict) and online dictionaries, featuring perfect article rendering with -the complete markup, illustrations and other content retained, and allowing you -to type in words without any accents or correct case.") - (home-page "https://xiaoyifang.github.io/goldendict-ng/") - (license - (list license:gpl3+ - license:zlib)))) - -(define-public suckless-dictpopup - (package - (name "suckless-dictpopup") - (version "2.5_stable") - (source - (origin - (method git-fetch) - (uri - (git-reference - (url "https://github.com/KonstantinDjairo/suckless_dictpopup.git") - (commit "5309e184d0a68bad266ca0f4bef7c3d73ccc5eef"))) - (sha256 - (base32 "1pnx25s101ydldcvsrh79imkpirw5j5n9qzp9pzi37fz1g1xbb1k")))) - (build-system gnu-build-system) - (inputs - (list freetype - libxft - libx11 - font-google-noto-sans-cjk - libxinerama - perl - sdcv - sselp)) - (arguments - (list #:tests? #f - #:make-flags - #~(list (string-append "CC=" #$(cc-for-target)) - (string-append "PREFIX=" #$output) - (string-append "CPPFLAGS=-I" - (assoc-ref %build-inputs "freetype") - "/include/freetype2")) - #:phases - #~(modify-phases %standard-phases - (replace 'configure - (lambda _ (copy-file "config.def.h" "config.h")))))) - (synopsis "A very lightweight popup dictionary written in C.") - (description "suckless_dictpopup is a very lightweight program to show popups -with the dictionary entries of the selected text. It uses Xlib for displaying -the popup and sdcv for the dictionary lookup.") - (home-page "https://github.com/KonstantinDjairo/suckless_dictpopup") - (license license:bsd-0))) -