2 files changed, 83 insertions, 0 deletions
diff --git a/oni/packages/inkplate.scm b/oni/packages/inkplate.scm
new file mode 100644
index 0000000..911a218
--- /dev/null
+++ b/oni/packages/inkplate.scm
@@ -0,0 +1,41 @@
+(define-module (oni packages inkplate)
+  #:use-module (guix packages)
+  #:use-module (guix git-download)
+  #:use-module (guix build-system gnu)
+  #:use-module (gnu packages autotools)
+  #:use-module (gnu packages pkg-config)
+  #:use-module (gnu packages texinfo)
+  #:use-module (gnu packages guile)
+  #:use-module ((guix licenses) #:prefix license:))
+
+(define-public guile-inkplate
+  (package
+    (name "guile-inkplate")
+    (version "0.1")
+    (source
+      (origin
+        (method git-fetch)
+        (uri (git-reference
+               (url "https://code.ryuslash.org/ryuslash/guile-inkplate/")
+               (commit "17e45127e137ff5c96596ae35b1913deb77f0d83")))
+        (file-name "guile-inkplate-0.1-checkout")
+        (sha256 (base32 "106w10c07kvgxhk702ii3bkxw00ra4xsf0nyybgwcnbswxcn1m19"))))
+    (build-system gnu-build-system)
+    (arguments
+     `(#:phases
+       (modify-phases %standard-phases
+         (add-before 'configure 'autoreconf
+           (lambda* (#:key inputs #:allow-other-keys)
+             (system* (string-append (assoc-ref inputs "autoconf") "/bin/autoreconf")))))))
+    (native-inputs
+      `(("autoconf" ,autoconf)
+        ("automake" ,automake)
+        ("pkg-config" ,pkg-config)
+        ("texinfo" ,texinfo)))
+    (inputs `(("guile" ,guile-3.0)))
+    (propagated-inputs `())
+    (synopsis "")
+    (description "")
+    (home-page "")
+    (license license:gpl3+)))
+
diff --git a/oni/packages/utilities.scm b/oni/packages/utilities.scm
new file mode 100644
index 0000000..10dd5bb
--- /dev/null
+++ b/oni/packages/utilities.scm
@@ -0,0 +1,42 @@
+(define-module (oni packages utilities)
+  #:use-module (guix packages)
+  #:use-module (guix git-download)
+  #:use-module (guix build-system gnu)
+  #:use-module ((guix licenses) #:prefix license:)
+  #:use-module (gnu packages base)
+  #:use-module (gnu packages bash)
+  #:use-module (gnu packages guile)
+  #:use-module (oni packages inkplate))
+
+(define-public inkplate-display
+  (let ((commit "8b2782e00b37d6e94d17071b7fe570d654af56f6")
+        (revision "0"))
+    (package
+      (name "inkplate-display")
+      (version (git-version "0.0.0" revision commit))
+      (source
+       (origin
+         (uri (git-reference
+               (url "https://code.ryuslash.org/ryuslash/inkplate-display.git")
+               (commit commit)))
+         (method git-fetch)
+         (sha256
+          (base32 "0s8vm09zdhwyvdnna68yhwxcxn869g5xds8p87jfzwvi7rg08crr"))
+         (file-name (git-file-name name version))))
+      (propagated-inputs
+       (list guile-3.0 guile-inkplate))
+      (build-system gnu-build-system)
+      (arguments
+       `(#:tests? #f
+         #:phases
+         (modify-phases %standard-phases
+           (delete 'configure)
+           (delete 'build)
+           (replace 'install
+             (lambda* (#:key outputs #:allow-other-keys)
+               (let ((bin (string-append (assoc-ref outputs "out") "/bin")))
+                 (install-file "inkplate-display" bin)))))))
+      (home-page "https://ryuslash.org/")
+      (synopsis "My script for displaying information on my Inkplate")
+      (description "My script for displaying information on my Inkplate.")
+      (license license:gpl3+))))