summaryrefslogtreecommitdiff
path: root/modules/ryan-packages/wm.scm
blob: 474596a28adddfed1d86cffbc8d57fcef72c0079 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
(define-module (ryan-packages wm)
               #:use-module ((guix licenses) #:prefix license:)
               #:use-module (guix download)
               #:use-module (guix packages)
               #:use-module (guix gexp)
               #:use-module (gnu packages)
               #:use-module (guix build-system cmake)
               #:use-module (guix build-system meson)
               #:use-module (gnu packages python)
               #:use-module (gnu packages audio)
               #:use-module (gnu packages glib)
               #:use-module (gnu packages freedesktop)
               #:use-module (gnu packages pkg-config)
               #:use-module (gnu packages gtk)
               #:use-module (gnu packages xdisorg)
               #:use-module (gnu packages xorg)
               #:use-module (gnu packages linux)
               #:use-module (gnu packages gl)
               #:use-module (gnu packages llvm)
               #:use-module (gnu packages gcc)
               #:use-module (gnu packages check)
               #:use-module (guix git-download)
               #:use-module (guix utils)
               #:use-module (rosenthal packages wm)
               #:use-module (ryan-packages gtk)
               #:use-module (gnu packages wm))

(define-public swaylock-effects-new
  (package
    (inherit swaylock-effects)
    (version "1.7.0.0")
    (source (origin
              (method git-fetch)
              (uri (git-reference
                     (url "https://github.com/jirutka/swaylock-effects")
                     (commit (string-append "v" version))))
              (sha256
                (base32
                  "0cgpbzdpxj6bbpa8jwql1snghj21mhryyvj6sk46g66lqvwlrqbj"))))
    (inputs (modify-inputs (package-inputs swaylock-effects) (delete "linux-pam")))))

(define-public swayidle-new
  (package
    (inherit swayidle)
    (version "1.8.0")
    (source
     (origin
       (method git-fetch)
       (uri (git-reference
             (url "https://github.com/swaywm/swayidle")
             (commit version)))
       (file-name (git-file-name "swayidle" version))
       (sha256
        (base32 "0y0qdqzx90kvk6l80darldvizr7p5g65bnblhxlq5a2rgvs9hkpx"))))))

(define-public waybar-new
  (package
    (inherit waybar)
    (name "waybar-new")
    (version "0.10.3")
    (source
     (origin
       (method git-fetch)
       (uri (git-reference
             (url "https://github.com/Alexays/Waybar")
             (commit version)))
       (file-name (git-file-name name version))
       (sha256
        (base32 "04xd61ycn1nisq1s5ch14zkbsjcfcy6n29nkjn68s2ribmws0iid"))))
    (arguments
      (list
        #:configure-flags #~(list "--wrap-mode=nodownload" "-Dexperimental=true")))))
    ;(inputs (modify-inputs (package-inputs waybar) (delete "gtkmm") (prepend gtkmm-ryan))))) ;(prepend python cava catch2 gtkmm)))))
    ;(native-inputs (modify-inputs (package-native-inputs waybar) (prepend gcc-13)))))

(define cairo-hypr ;;; stolen from rosenthal since it is not exported
  (package
    (inherit cairo)
    (name "cairo")
    (version "1.18.0")
    (source (origin
              (method url-fetch)
              (uri (string-append "https://cairographics.org/releases/cairo-"
                                  version ".tar.xz"))
              (sha256
               (base32
                "0r0by563s75xyzz0d0j1nmjqmdrk2x9agk7r57p3v8vqp4v0ffi4"))))
    (build-system meson-build-system)
    (arguments
     (list #:tests? #f
           #:glib-or-gtk? #t
           #:configure-flags
           #~(list "-Dspectre=disabled")))
    (outputs '("out"))))


(define-public hyprlock
  (package
    (name "hyprlock")
    (version "0.3.0")
    (source
      (origin
        (method git-fetch)
        (uri (git-reference
               (url "https://github.com/hyprwm/hyprlock")
               (commit (string-append "v" version))))
        (file-name (git-file-name name version))
        (sha256
          (base32 "0w2a25hivn8xd8p05vc9xg57rd9siv12dwmr4skpqx4dcmxxbg5d"))))
    (build-system cmake-build-system)
    (native-inputs
      (list gcc-13
            pkg-config
            mesa-headers
            wayland))
    (inputs
      (list cairo
            pango
            libxkbcommon
            libdrm
            hyprlang
            mesa
            wayland-protocols
            linux-pam))
    (home-page "https://github.com/hyprwm/hyprlock")
    (license license:bsd-3)
    (synopsis "Screen locker for Hyprland")
    (description "Screen locker for hyprland.")))

hyprlock