added fonts and wl-mirror

home-config/fonts/MonofurNerdFont/LICENSE.txt

@@ -0,0 +1,20 @@
+------------------------------------------------------------------------
+The monofur typeface by tobias b koehler (unci@tigerden.com)
+------------------------------------------------------------------------
+
+This is a monospaced geometric rounded sans serif font based on the
+eurofurence typeface family.
+
+The character set includes Roman, Greek and Cyrillic characters as well
+as box drawing characters. File format is TrueType for PC (under 
+Windows, Linux etc).
+
+These fonts are freeware and can be distributed as long as they are
+together with this text file. I would appreciate it though if you could
+contact me at unci@tigerden.com if you put them on a server. Free
+samples from commercial users are always very welcome. :)
+
+For more information, please see the uncifonts WWW page at:
+http://mercurio.iet.unipi.it/users/tobias/uncifonts.html
+
+Have fun!                                   tobias b koehler, 2000-04-02

home-config/fonts/MonofurNerdFont/readme.md

@@ -0,0 +1,8 @@
+
+# Nerd Fonts
+
+This is an archived font from a Nerd Fonts release.
+
+For more information see:
+* https://github.com/ryanoasis/nerd-fonts/
+* https://github.com/ryanoasis/nerd-fonts/releases/latest/

home-config/home-configuration.scm

@@ -16,7 +16,8 @@
              (gnu home services desktop)
              (gnu home services gnupg)
              (gnu home services)
-             (ryan-services pipewire))
+             (ryan-services pipewire)
+             (ryan-packages freedesktop))
 
 (define my-neovim
   (package
@@ -91,7 +92,7 @@
                                                     "git"
                                                     "node"
                                                     "git-lfs"))
-                    (list my-neovim)))
+                    (list my-neovim wl-mirror)))
 
   ;; Below is the list of Home services.  To search for available
   ;; services, run 'guix home search KEYWORD' in a terminal.

modules/ryan-packages/freedesktop.scm

@@ -4,6 +4,9 @@
                 #:use-module (guix gexp)
                 #:use-module (guix build-system meson)
                 #:use-module (guix build-system qt)
+                #:use-module (guix build-system cmake)
+                #:use-module (guix build utils)
+                #:use-module (guix build glib-or-gtk-build-system)
                 #:use-module (guix packages)
                 #:use-module (guix git-download)
                 #:use-module (guix utils)
@@ -15,6 +18,8 @@
                 #:use-module (gnu packages cmake)
                 #:use-module (gnu packages pkg-config)
                 #:use-module (gnu packages freedesktop)
+                #:use-module (gnu packages xorg)
+                #:use-module (gnu packages man)
                 #:use-module (rosenthal packages wm)
                 #:use-module (gnu packages wm))
 
@@ -97,4 +102,34 @@
     (description "test")
     (license license:bsd-3)))
 
-xdg-desktop-portal-hyprland
+(define-public wl-mirror
+  (package
+    (name "wl-mirror")
+    (version "0.13.2")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                     (url "https://github.com/Ferdi265/wl-mirror")
+                     (commit (string-append "v" version))
+                     (recursive? #t)))
+              (file-name (git-file-name name version))
+              (sha256
+                (base32
+                  "0vkd73x5r2585s3w1ckvslc2mq9qbzrm5xkwg8gpy9ydaxhn8hmp"))))
+    (inputs (list wayland egl-wayland mesa))
+    (native-inputs (list pkg-config scdoc wayland-protocols))
+    (build-system cmake-build-system)
+    (arguments (list
+                 #:tests? #f
+                 #:phases
+                 #~(modify-phases %standard-phases
+                    (add-before 'configure 'touch
+                      (lambda _
+                        (invoke "touch" "proto/wayland-protocols/.git")
+                        (invoke "touch" "proto/wlr-protocols/.git"))))))
+    (home-page "bleh")
+    (synopsis "mirror displays")
+    (description "mirror displays")
+    (license license:expat)))
+
+wl-mirror