From 2ae2edadd27c8fd21e98242a92d1b956672248d4 Mon Sep 17 00:00:00 2001
From: nik gaffney <nik@fo.am>
Date: Sun, 14 Jan 2024 15:31:53 +0100
Subject: [PATCH] Put in earplugs

---
 packages/zzkt/fonts-osp.scm | 57 +++++++++++++++++++------------------
 packages/zzkt/soupault.scm  | 48 +++++++++++++++----------------
 2 files changed, 53 insertions(+), 52 deletions(-)

diff --git a/packages/zzkt/fonts-osp.scm b/packages/zzkt/fonts-osp.scm
index 3b9c4a5..b558d6f 100644
--- a/packages/zzkt/fonts-osp.scm
+++ b/packages/zzkt/fonts-osp.scm
@@ -29,35 +29,36 @@
 
 ;; http://osp.kitchen/foundry
 
-;; - [ ] philibert
-;; - [x] fluxisch-else
-;; - [ ] ume
-;; - [ ] erbarre
-;; - [x] belgica-belgika
-;; - [x] alfphabet
-;; - [x] crickx
-;; - [ ] polsku
-;; - [ ] w-droge
-;; - [ ] vj12
-;; - [ ] sans-guilt-wafer
-;; - [x] reglo
-;; - [x] osp-din
-;; - [ ] notcouriersans
-;; - [ ] mill
-;; - [x] libertinage
-;; - [ ] le-patin-helvete
-;; - [ ] cowboy-henk
-;; - [ ] cimatics
-;; - [ ] certegeska
-;; - [ ] belogodor
 ;; - [ ] ax-28-script
-;; - [x] work-avec
-;; - [ ] metadin
-;; - [ ] limousine
-;; - [x] sans-guilt
+;; - [ ] belogodor
+;; - [ ] certegeska
+;; - [ ] cimatics
+;; - [ ] cowboy-henk
 ;; - [ ] dlf
+;; - [ ] erbarre
+;; - [ ] le-patin-helvete
+;; - [ ] limousine
 ;; - [ ] logisoso
+;; - [ ] metadin
+;; - [ ] mill
+;; - [ ] notcouriersans
+;; - [ ] philibert
+;; - [ ] polsku
+;; - [ ] sans-guilt-wafer
 ;; - [ ] skeleton
+;; - [ ] ume
+;; - [ ] vj12
+;; - [ ] w-droge
+
+;; - [x] alfphabet
+;; - [x] belgica-belgika
+;; - [x] crickx
+;; - [x] fluxisch-else
+;; - [x] libertinage
+;; - [x] osp-din
+;; - [x] reglo
+;; - [x] sans-guilt
+;; - [x] work-avec
 
 
 ;; http://osp.kitchen/foundry/libertinage/
@@ -183,9 +184,9 @@ Sans Guilt LB: Based on lead type from Royal College of Arts letterpress worksho
 ;; http://osp.kitchen/foundry/osp-din/
 ;; https://gitlab.constantvzw.org/osp/foundry.osp-din
 
-(define-public font-osp-osp-din
+(define-public font-osp-din
   (package
-    (name "font-osp-osp-din")
+    (name "font-osp-din")
     (version "1")
     (source
      (origin
@@ -199,7 +200,7 @@ Sans Guilt LB: Based on lead type from Royal College of Arts letterpress worksho
     (build-system font-build-system)
     (home-page "http://osp.kitchen/foundry/osp-din/")
     (synopsis "A DIN font based on the original 1932 drawings.")
-    (description "The first cut of OSP-DIN was drawn for the festival Cinema du réel 2009, when we were invited to work on a cartographic version of the programme. We drew the first cut of the open source DIN from grid based drawings similar to the original 1932 drawings of the DIN we saw during our investigative trip to Berlin in february 2008.")
+    (description "The first cut of OSP-DIN was drawn for the festival Cinema du réel 2009, when we were invited to work on a cartographic version of the programme. We drew the first cut of the open source DIN from grid based drawings similar to the original 1932 drawings of the DIN we saw during our investigative trip to Berlin in February 2008.")
     (license license:silofl1.1)))
 
 
diff --git a/packages/zzkt/soupault.scm b/packages/zzkt/soupault.scm
index 58a3a82..bc8cb53 100644
--- a/packages/zzkt/soupault.scm
+++ b/packages/zzkt/soupault.scm
@@ -494,46 +494,46 @@ currently designed for Unicode Standard 3.2.")
 
 (define-public ocaml-dune-site
   (package
-  (name "ocaml-dune-site")
-  (version "3.12.2")
-  (source
-   (origin
+   (name "ocaml-dune-site")
+   (version "3.12.2")
+   (source
+    (origin
      (method url-fetch)
      (uri
       "https://github.com/ocaml/dune/releases/download/3.12.2/dune-3.12.2.tbz")
      (sha256
       (base32 "1csz543wq66dcn08piabaascvbiswb1vxw1xfg4glgp8zq0mzap8"))))
-  (build-system dune-build-system)
-  (propagated-inputs (list dune
-                           ocaml-odoc))
-  (home-page "https://github.com/ocaml/dune")
-  (synopsis "Embed locations information inside executable and libraries")
-  (description #f)
-  (license license:expat)))
+   (build-system dune-build-system)
+   (propagated-inputs (list dune
+                            ocaml-odoc))
+   (home-page "https://github.com/ocaml/dune")
+   (synopsis "Embed locations information inside executable and libraries")
+   (description #f)
+   (license license:expat)))
 
 ;; via guix import opam lwt
 ;; note: v5.6 is currently available in guix
 
 (define-public ocaml-lwt
-(package
-  (name "ocaml-lwt")
-  (version "5.7.0")
-  (source
-   (origin
+  (package
+   (name "ocaml-lwt")
+   (version "5.7.0")
+   (source
+    (origin
      (method url-fetch)
      (uri "https://github.com/ocsigen/lwt/archive/refs/tags/5.7.0.tar.gz")
      (sha256
       (base32 "11dpr0aprqqjgb2n4j4czpw3l0bc8dzy1jqmp2qz3xkih31k241p"))))
-  (build-system dune-build-system)
-  (propagated-inputs (list ocaml-dune-configurator ocaml-ocplib-endian))
-  (native-inputs (list ocaml-cppo))
-  (home-page "https://github.com/ocsigen/lwt")
-  (synopsis "Promises and event-driven I/O")
-  (description
-   "This package provides a promise is a value that may become determined in the
+   (build-system dune-build-system)
+   (propagated-inputs (list ocaml-dune-configurator ocaml-ocplib-endian))
+   (native-inputs (list ocaml-cppo))
+   (home-page "https://github.com/ocsigen/lwt")
+   (synopsis "Promises and event-driven I/O")
+   (description
+    "This package provides a promise is a value that may become determined in the
 future.  Lwt provides typed, composable promises.  Promises that are resolved by
 I/O are resolved by Lwt in parallel.  Meanwhile, OCaml code, including code
 creating and waiting on promises, runs in a single thread by default.  This
 reduces the need for locks or other synchronization primitives.  Code can be run
 in parallel on an opt-in basis.")
-  (license license:expat)))
+   (license license:expat)))