diff options
Diffstat (limited to 'manifest.scm')
| -rw-r--r-- | manifest.scm | 62 |
1 files changed, 2 insertions, 60 deletions
diff --git a/manifest.scm b/manifest.scm index 3fec294..1a2371a 100644 --- a/manifest.scm +++ b/manifest.scm @@ -1,60 +1,2 @@ -;;; guix-forge --- Guix software forge meta-service -;;; Copyright © 2022, 2023, 2026 Arun Isaac <arunisaac@systemreboot.net> -;;; -;;; This file is part of guix-forge. -;;; -;;; guix-forge 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. -;;; -;;; guix-forge 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 guix-forge. If not, see -;;; <https://www.gnu.org/licenses/>. - -(use-modules ((gnu packages fonts) #:prefix guix:) - (guix packages)) - -;; Install web fonts in font-charter and font-fira-code. There is a -;; pending patchset https://issues.guix.gnu.org/54471 to do this in -;; upstream Guix. Use the upstream Guix packages once that patchset -;; lands in the upstream master branch. - -(define font-charter - (package - (inherit guix:font-charter) - (outputs '("out")) - (arguments - `(#:phases - (modify-phases %standard-phases - (add-after 'install 'install-web-fonts - (lambda* (#:key outputs #:allow-other-keys) - (let* ((out (assoc-ref outputs "out")) - (source (getcwd)) - (fonts (string-append out "/share/fonts"))) - (for-each (lambda (file) - (install-file file (string-append fonts "/web"))) - (find-files source "\\.(woff|woff2)$")))))))))) - -(define font-fira-code - (package - (inherit guix:font-fira-code) - (arguments - `(#:phases - (modify-phases %standard-phases - (add-after 'install 'install-web-fonts - (lambda* (#:key outputs #:allow-other-keys) - (let* ((out (assoc-ref outputs "out")) - (source (getcwd)) - (fonts (string-append out "/share/fonts"))) - (for-each (lambda (file) - (install-file file (string-append fonts "/web"))) - (find-files source "\\.(woff|woff2)$")))))))))) - -(packages->manifest - (list font-charter font-fira-code)) +(specifications->manifest + (list "font-charter" "font-fira-code")) |
