diff --git a/modules/home-packages/freedesktop.scm b/modules/home-packages/freedesktop.scm
new file mode 100644
index 0000000..6b7a884
--- /dev/null
+++ b/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)))