chris/dotfiles
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

making qt5ct-kde and dolphin work a little better

Browse source 
I still need to add a way for dolphin to see icons, but It's coming.
This commit is contained in:
Chris Cochrun 2023-07-13 17:02:36 -05:00
parent fce2d2f066
commit 3e55894e1a
3 changed files with 20 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
guix/home.scm
View file

@ -8,7 +8,7 @@
#:use-module (pkgs emacs-xyz) #:use-module (pkgs emacs-xyz)
#:use-module (pkgs tridactyl-native) #:use-module (pkgs tridactyl-native)
#:use-module (pkgs phinger-cursors-theme) #:use-module (pkgs phinger-cursors-theme)
#:use-module (pkgs qt5ct-kde) #:use-module (pkgs qt5ct)
#:use-module (pkgs kdenlive) #:use-module (pkgs kdenlive)
#:use-module (home-services pipewire) #:use-module (home-services pipewire)
#:use-module (gnu home) #:use-module (gnu home)
@ -63,6 +63,11 @@
"curl" "curl"
"mpv" "mpv"
"mpv-mpris" "mpv-mpris"
"libva"
"libva-utils"
"libvdpau"
"libvdpau-va-gl"
"libvpx"
"yt-dlp" "yt-dlp"
"python" "python"
"playerctl" "playerctl"
@ -209,6 +214,7 @@
"emacs-org-re-reveal" "emacs-org-re-reveal"
"emacs-org-ql" "emacs-org-ql"
"emacs-org-msg" "emacs-org-msg"
"emacs-nov-el"
"emacs-calfw" "emacs-calfw"
"emacs-transmission" "emacs-transmission"
"emacs-emojify" "emacs-emojify"
@ -381,6 +387,7 @@ gtk-toolbar-style=3
home-files-service-type home-files-service-type
`(("bin" ,(local-file "../scripts" #:recursive? #t)) `(("bin" ,(local-file "../scripts" #:recursive? #t))
(".mozilla/firefox/chris.default/chrome" ,(local-file "../.config/firefox/chrome" #:recursive? #t)) (".mozilla/firefox/chris.default/chrome" ,(local-file "../.config/firefox/chrome" #:recursive? #t))
(".var/app/org.mozilla.firefox/.mozilla/firefox/chris.default/chrome" ,(local-file "../.config/firefox/chrome" #:recursive? #t))
(".Xresources" ,(plain-file "Xresources" "Xcursor.theme: phinger-cursors-light (".Xresources" ,(plain-file "Xresources" "Xcursor.theme: phinger-cursors-light
Xcursor.size: 36 Xcursor.size: 36
")) "))

12
guix/pkgs/dolphin-xyz.scm
View file

@ -1,6 +1,9 @@
(define-module (dolphin-xyz) (define-module (pkgs dolphin-xyz)
#:use-module (gnu packages) #:use-module (gnu packages)
#:use-module (gnu packages qt) #:use-module (gnu packages qt)
#:use-module (gnu packages wayland)
#:use-module (gnu packages kde)
#:use-module (gnu packages kde-frameworks)
#:use-module (gnu packages kde-systemtools) #:use-module (gnu packages kde-systemtools)
#:use-module (guix build-system qt) #:use-module (guix build-system qt)
#:use-module (guix utils) #:use-module (guix utils)
@ -32,9 +35,14 @@
ktextwidgets ktextwidgets
kuserfeedback kuserfeedback
kwindowsystem kwindowsystem
ffmpegthumbs
breeze-icons ;; default icon set breeze-icons ;; default icon set
oxygen-icons
phonon phonon
qtbase-5 qtbase-5
qtwayland qtwayland
wayland wayland
solid)))) solid))
(propogated-inputs '(kfind))))
dolphin-xyz

5
guix/pkgs/qt5ct.scm
View file

@ -8,8 +8,7 @@
#:use-module (gnu packages) #:use-module (gnu packages)
#:use-module (gnu packages qt) #:use-module (gnu packages qt)
#:use-module (gnu packages kde-frameworks) #:use-module (gnu packages kde-frameworks)
#:use-module (guix gexp) #:use-module (guix gexp))
#:use-module (srfi srfi-1))
(define-public qt5ct-kde (define-public qt5ct-kde
(package (package
@ -20,7 +19,7 @@
(method url-fetch) (method url-fetch)
(uri (uri
(string-append "mirror://sourceforge/qt5ct/qt5ct-" version ".tar.bz2")) (string-append "mirror://sourceforge/qt5ct/qt5ct-" version ".tar.bz2"))
(patches '("./patches/qt5ct-kde.patch")) (patches '("patches/qt5ct-kde.patch"))
(sha256 (sha256
(base32 "1mxqallxw0b5p4kjfnvv9ndzws54si4a3xlz3gnxyl2cdrm58n7d")))) (base32 "1mxqallxw0b5p4kjfnvv9ndzws54si4a3xlz3gnxyl2cdrm58n7d"))))
(inputs (modify-inputs (inputs (modify-inputs