obs

home-config/home-configuration.scm

@@ -17,6 +17,7 @@
              (gnu home services)
              (home-services pipewire)
              (home-packages shells)
+             (home-packages freedesktop)
              (home-packages mozillia)
              (home-packages vim)
              (home-packages gnome-xyz)
@@ -118,17 +119,18 @@
                                                     "element-desktop"
                                                     "nm-tray"
                                                     "pavucontrol"
+													"obs"
                                                     "syncthing"
 													"filezilla"
                                                     "pinentry"
-													"firefox-wayland"
                                                     "ungoogled-chromium"))
             (list neovim-new                ;; custom made packages
                   easyeffects               ;; thanks guix for not having them or doing them wrong >:(
-                  ;;firefox-wayland-new 
+                  firefox-wayland-new 
                   lavanda-gtk-theme 
                   zsh-autosuggestions
                   freya-ca-certs
+				  wl-mirror
                   vim-plug)))
 
   ;; Below is the list of Home services.  To search for available

modules/home-packages/freedesktop.scm

@@ -0,0 +1,55 @@
+(define-module (home-packages freedesktop)
+                #:use-module (guix download)
+                #:use-module ((guix licenses) #:prefix license:)
+                #: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)
+                #:use-module (gnu packages)
+                #:use-module (gnu packages gl)
+                #:use-module (gnu packages linux)
+                #:use-module (gnu packages image)
+                #:use-module (gnu packages qt)
+                #:use-module (gnu packages cmake)
+                #:use-module (gnu packages gcc)
+                #:use-module (gnu packages pkg-config)
+                #:use-module (gnu packages freedesktop)
+                #:use-module (gnu packages xorg)
+                #:use-module (gnu packages glib)
+                #:use-module (gnu packages man)
+                #:use-module (gnu packages wm))
+
+(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)))