[bug#61407] [PATCH] gnu: Add font-microsoft-cascadia.

[bug#61407] [PATCH] gnu: Add font-microsoft-cascadia.

[Jake Leporte]

---
 gnu/packages/fonts.scm | 94 ++++++++++++++++++++++++++----------------
 1 file changed, 59 insertions(+), 35 deletions(-)

diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm
index 9b7d965..13b66d4 100644
--- a/gnu/packages/fonts.scm
+++ b/gnu/packages/fonts.scm
@@ -1399,44 +1399,68 @@ (define-public font-fira-code
 @code{//}, ligatures are used to simulate proportional spacing.")
     (license license:silofl1.1)))
 
+(define-public font-microsoft-cascadia
+  (package
+    (name "font-microsoft-cascadia")
+    (version "2111.01")
+    (source (origin
+              (method url-fetch/zipbomb)
+              (uri (string-append
+                    "https://github.com/microsoft/cascadia-code/"
+                    "releases/download/v"
+                    version
+                    "/CascadiaCode-"
+                    version
+                    ".zip"))
+              (sha256
+               (base32
+                "04p72jmbafblrliy5phqi6sqi52wgzpilf3rphppxf7zdlbnizai"))))
+    (build-system font-build-system)
+    (home-page "https://github.com/microsoft/cascadia-code")
+    (synopsis "Monospaced font with programming ligatures")
+    (description
+     "Cascadia is a fun new coding font that comes bundled with Windows
+Terminal, and is now the default font in Visual Studio as well.")
+    (license license:silofl1.1)))
+
 (define-public font-awesome
   (package
-   (name "font-awesome")
-   ;; XXX The build scripts of version 5 are not freely licensed and
-   ;; so we have to stick with version 4 for now:
-   ;; <https://bugs.gnu.org/32916>
-   (version "4.7.0")
-   (source (origin
-            (method git-fetch)
-            (uri (git-reference
-                   (url "https://github.com/FortAwesome/Font-Awesome")
-                   (commit (string-append "v" version))))
-            (file-name (git-file-name name version))
-            (sha256
-             (base32
-              "0w30y26jp8nvxa3iiw7ayl6rkza1rz62msl9xw3srvxya1c77grc"))))
-   (build-system font-build-system)
-   (arguments
-    '(#:phases
-      (modify-phases %standard-phases
-        (replace 'install
-          (lambda* (#:key outputs #:allow-other-keys)
-            (let* ((out (assoc-ref outputs "out"))
-                   (source (string-append (getcwd) "/fonts"))
-                   (fonts (string-append out "/share/fonts")))
-              (for-each (lambda (file)
-                          (install-file file (string-append fonts "/truetype")))
-                        (find-files source "\\.(ttf|ttc)$"))
-              (for-each (lambda (file)
-                          (install-file file (string-append fonts "/opentype")))
-                        (find-files source "\\.(otf|otc)$"))
-              #t))))))
-   (home-page "https://fontawesome.com/")
-   (synopsis "Font that contains a rich iconset")
-   (description
-    "Font Awesome is a full suite of pictographic icons for easy scalable
+    (name "font-awesome")
+    ;; XXX The build scripts of version 5 are not freely licensed and
+    ;; so we have to stick with version 4 for now:
+    ;; <https://bugs.gnu.org/32916>
+    (version "4.7.0")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url "https://github.com/FortAwesome/Font-Awesome")
+                    (commit (string-append "v" version))))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32
+                "0w30y26jp8nvxa3iiw7ayl6rkza1rz62msl9xw3srvxya1c77grc"))))
+    (build-system font-build-system)
+    (arguments
+     '(#:phases
+       (modify-phases %standard-phases
+         (replace 'install
+           (lambda* (#:key outputs #:allow-other-keys)
+             (let* ((out (assoc-ref outputs "out"))
+                    (source (string-append (getcwd) "/fonts"))
+                    (fonts (string-append out "/share/fonts")))
+               (for-each (lambda (file)
+                           (install-file file (string-append fonts "/truetype")))
+                         (find-files source "\\.(ttf|ttc)$"))
+               (for-each (lambda (file)
+                           (install-file file (string-append fonts "/opentype")))
+                         (find-files source "\\.(otf|otc)$"))
+               #t))))))
+    (home-page "https://fontawesome.com/")
+    (synopsis "Font that contains a rich iconset")
+    (description
+     "Font Awesome is a full suite of pictographic icons for easy scalable
 vector graphics.")
-   (license license:silofl1.1)))
+    (license license:silofl1.1)))
 
 (define-public font-tamzen
   (package

base-commit: b8f6ead5faac3c1b9a8fa6e060c00cf0917e884e
prerequisite-patch-id: 55ebfdbee35b36ac06da23b716337ecfef350452
prerequisite-patch-id: 6cb7b2d1972d3eeb5ad8b82239b17043e7263ab0
prerequisite-patch-id: 52c97b6e4d8d4b78217423a3f1323d95a609de8c
prerequisite-patch-id: 90b350ab4778843697da28bb10344a84ccacc70c
prerequisite-patch-id: 0d5a1f7cfe93822a3f3b11c19f4b2662a79cda17
prerequisite-patch-id: f6dd89498a48185e628f547b7f023a30547d8933
-- 
2.39.1

[bug#61407] [PATCH v2] gnu: Add font-microsoft-cascadia.

[Jake Leporte]

I apologize, the original patch I had send included some extraneous
changes I didn't intend to include.  This is an updated patch without
those extraneous changes.

---
 gnu/packages/fonts.scm | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)

diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm
index 9b7d965..55d7aa8 100644
--- a/gnu/packages/fonts.scm
+++ b/gnu/packages/fonts.scm
@@ -1266,6 +1266,30 @@ (define-public font-adobe-source-serif-pro
 Sans Pro family.")
     (license license:silofl1.1)))

+(define-public font-microsoft-cascadia
+  (package
+    (name "font-microsoft-cascadia")
+    (version "2111.01")
+    (source (origin
+              (method url-fetch/zipbomb)
+              (uri (string-append
+                    "https://github.com/microsoft/cascadia-code/"
+                    "releases/download/v"
+                    version
+                    "/CascadiaCode-"
+                    version
+                    ".zip"))
+              (sha256
+               (base32
+                "04p72jmbafblrliy5phqi6sqi52wgzpilf3rphppxf7zdlbnizai"))))
+    (build-system font-build-system)
+    (home-page "https://github.com/microsoft/cascadia-code")
+    (synopsis "Monospaced font with programming ligatures")
+    (description
+     "Cascadia is a fun new coding font that comes bundled with Windows
+Terminal, and is now the default font in Visual Studio as well.")
+    (license license:silofl1.1)))
+
 (define-public font-fira-sans
   ;; Fira Sans v4.203 (which corresponds to Fira Mono v3.206) is the final
   ;; version to include UFO sources. It is the same version packaged by other

base-commit: b8f6ead5faac3c1b9a8fa6e060c00cf0917e884e
prerequisite-patch-id: 55ebfdbee35b36ac06da23b716337ecfef350452
prerequisite-patch-id: 6cb7b2d1972d3eeb5ad8b82239b17043e7263ab0
prerequisite-patch-id: 52c97b6e4d8d4b78217423a3f1323d95a609de8c
prerequisite-patch-id: 90b350ab4778843697da28bb10344a84ccacc70c
prerequisite-patch-id: 0d5a1f7cfe93822a3f3b11c19f4b2662a79cda17
prerequisite-patch-id: f6dd89498a48185e628f547b7f023a30547d8933
--
2.39.1

[bug#61407] [PATCH v3] gnu: Add font-microsoft-cascadia.

[Jake Leporte]

* gnu/packages/fonts.scm (font-microsoft-cascadia): New variable.
---

Re-submitting with a proper commit message.  Hoping this doesn't mess
up my currently passing QA!

 gnu/packages/fonts.scm | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)

diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm
index 4e7b7d0..13699cd 100644
--- a/gnu/packages/fonts.scm
+++ b/gnu/packages/fonts.scm
@@ -1266,6 +1266,30 @@ (define-public font-adobe-source-serif-pro
 Sans Pro family.")
     (license license:silofl1.1)))

+(define-public font-microsoft-cascadia
+  (package
+    (name "font-microsoft-cascadia")
+    (version "2111.01")
+    (source (origin
+              (method url-fetch/zipbomb)
+              (uri (string-append
+                    "https://github.com/microsoft/cascadia-code/"
+                    "releases/download/v"
+                    version
+                    "/CascadiaCode-"
+                    version
+                    ".zip"))
+              (sha256
+               (base32
+                "04p72jmbafblrliy5phqi6sqi52wgzpilf3rphppxf7zdlbnizai"))))
+    (build-system font-build-system)
+    (home-page "https://github.com/microsoft/cascadia-code")
+    (synopsis "Monospaced font with programming ligatures")
+    (description
+     "Cascadia is a fun new coding font that comes bundled with Windows
+Terminal, and is now the default font in Visual Studio as well.")
+    (license license:silofl1.1)))
+
 (define-public font-fira-sans
   ;; Fira Sans v4.203 (which corresponds to Fira Mono v3.206) is the final
   ;; version to include UFO sources. It is the same version packaged by other

base-commit: 81fbf5d71fb95367a0a93e45a86de5e930589a05
prerequisite-patch-id: 55ebfdbee35b36ac06da23b716337ecfef350452
prerequisite-patch-id: cc81d1d3eb9c0687793c8baf949901cd49c42650
prerequisite-patch-id: 52c97b6e4d8d4b78217423a3f1323d95a609de8c
prerequisite-patch-id: 90b350ab4778843697da28bb10344a84ccacc70c
prerequisite-patch-id: 0d5a1f7cfe93822a3f3b11c19f4b2662a79cda17
prerequisite-patch-id: f6dd89498a48185e628f547b7f023a30547d8933
--
2.39.1

bug#61407: [PATCH] gnu: Add font-microsoft-cascadia.

[Ludovic Courtès]

Hi,

Jake Leporte <jakeleporte@outlook.com> skribis:

> * gnu/packages/fonts.scm (font-microsoft-cascadia): New variable.

Applied, thanks!

Ludo’.