cristiancmoises
/
zero
mirror of https://codeberg.org/anemofilia/zero
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Compare commits

base: cristiancmoises:58a9713d4a7cb0aec5d5e694048897a90ad357eb
Branches Tags
cristiancmoises:main
cristiancmoises:impermanence
cristiancmoises:buersako
..
compare: cristiancmoises:a2da805db2372f3c355de7c1125bb6eebe0583c0
Branches Tags
cristiancmoises:main
cristiancmoises:impermanence
cristiancmoises:buersako

No commits in common. "58a9713d4a7cb0aec5d5e694048897a90ad357eb" and "a2da805db2372f3c355de7c1125bb6eebe0583c0" have entirely different histories.
58a9713d4a ... a2da805db2

4 changed files with 79 additions and 85 deletions
Show Stats Expand all files Collapse all files

84
home-environments/radio.scm
View File

@ -28,7 +28,6 @@
#|Radio|#
#|C|# #:use-module ((radio channels) #:prefix channel:)
#|P|# #:use-module ((radio packages) #:prefix packages:)
#|M|# #:use-module ((radio mime-types) #:prefix mime-types:)
#|S|# #:use-module ((radio shepherd-services) #:prefix shepherd-service:)
#|Radix|#
@ -83,13 +82,52 @@
(service home-xdg-mime-applications-service-type
(home-xdg-mime-applications-configuration
(default (associate-right
('chromium.desktop mime-types:browser)
('kak.desktop mime-types:editor)
('lf.desktop mime-types:file-manager)
('mpv.desktop (append mime-types:audio
mime-types:video))
('imv.desktop mime-types:image)
('sioyek.desktop mime-types:document)))))
('chromium.desktop
`("application/xhtml+xml"
"application/x-extension-htm"
"application/x-extension-xhtml"
"application/x-extension-xht"
"x-scheme-handler/http"
"x-scheme-handler/https"))
('kak.desktop
`("text/html"
"text/plain"
"text/troff"
"text/xml"
"text/x-c"
"text/x-c++"
"text/x-clojure"
"text/x-diff"
"text/x-lisp"
"text/x-scheme"
"text/x-script.python"
"text/x-shellscript"
"text/x-tex"))
('lf.desktop
`("inode/directory"
"x-scheme-handler/ftp"
"x-scheme-handler/nfs"
"x-scheme-handler/smb"
"x-scheme-handler/ssh"
"application/x-directory"))
('mpv.desktop
`("image/gif"
"audio/mpeg"
"audio/ogg"
"audio/opus"
"audio/x-opus+ogg"
"video/mp4"
"video/x-matroska"
"video/webm"))
('imv.desktop
`("image/avif"
"image/bmp"
"image/jpeg"
"image/png"
"image/svg+xml"
"image/webp"))
('sioyek.desktop
`("application/pdf"))))))
(service home-special-files-service-type
`((".config/guix/home.scm" ,radio.scm)))
@ -162,7 +200,6 @@
--classify ~
--human-readable ~
-v"))
("tree" . "tree -CF --dirsfirst")
#|Clear terminal screen without ncurses|#
("clear" . "printf \"\\033c\"")
@ -248,24 +285,17 @@
(environment-variables
;; adicionar toggle de dotfiles na lista e no preview
;; adicionar toggle pro base-directory ser $PWD
`(("LS_COLORS" . "'di=01;34:ln=01;36:or=01;31'")
("fzf_preview_dir_cmd" . "")
("FZF_DEFAULT_OPTS"
. ("--filepath-word"
"--height=~40%"
"--layout=reverse"
"--scheme=path"
"--scroll-off=2"
"--color=fg:blue,hl:#cccccc"
"--color=fg+:blue,hl+:#cccccc"
"--color=prompt:blue,pointer:blue"
"--color=info:#ffffff,border:#000000"))
("fzf_fd_opts"
. ("--absolute-path"
"--exclude='\\..*'"
"--follow"
"--base-directory=$HOME"
"--type=directory"))))))
`(("fzf_preview_dir_cmd" . "")
("FZF_DEFAULT_OPTS" . ("--filepath-word"
"--height=~40%"
"--layout=reverse"
"--scheme=path"
"--scroll-off=2"))
("fzf_fd_opts" . ("--absolute-path"
"--exclude='\\..*'"
"--follow"
"--base-directory=$HOME"
"--type=directory"))))))
#|Environment variables services|#
(simple-service 'home-shell-environment-variables

21
home-environments/radio/files/.local/bin/screenshot Executable file
View File

@ -0,0 +1,21 @@
#!/bin/sh
case "$1" in
"activewindow")
# Get active window geometry
eval $(xdotool getactivewindow getwindowgeometry --shell)
REGION="$((${WIDTH} + 10))x$((${HEIGHT}+10))+$((${X}-5))+$((${Y}-5))"
maim -Bg "${REGION}" | xclip -selection clipboard -t image/png;;
"selectwindow")
# Let the user select a window and get its geometry
eval $(xdotool selectwindow getwindowgeometry --shell)
REGION="$((${WIDTH} + 10))x$((${HEIGHT}+10))+$((${X}-5))+$((${Y}-5))"
maim -Bg "${REGION}" | xclip -selection clipboard -t image/png;;
"selectregion")
maim -s | xclip -selection clipboard -t image/png;;
*)
# Get current screen
SCREEN=$(xdotool get_desktop)
REGION="$(hostname):${SCREEN}.1"
maim -u | xclip -selection clipboard -t image/png;;
esac

56
home-environments/radio/mime-types.scm
View File

@ -1,56 +0,0 @@
(define-module (radio mime-types)
#:export (browser editor file-manager audio video image document))
(define browser
`("application/xhtml+xml"
"application/x-extension-htm"
"application/x-extension-xhtml"
"application/x-extension-xht"
"x-scheme-handler/http"
"x-scheme-handler/https"))
(define editor
`("text/html"
"text/plain"
"text/troff"
"text/xml"
"text/x-c"
"text/x-c++"
"text/x-clojure"
"text/x-diff"
"text/x-lisp"
"text/x-scheme"
"text/x-script.python"
"text/x-shellscript"
"text/x-tex"))
(define file-manager
`("inode/directory"
"x-scheme-handler/ftp"
"x-scheme-handler/nfs"
"x-scheme-handler/smb"
"x-scheme-handler/ssh"
"application/x-directory"))
(define audio
`("video/mp4"
"video/x-matroska"
"video/webm"))
(define video
`("audio/mpeg"
"audio/ogg"
"audio/opus"
"audio/x-opus+ogg"))
(define image
`("image/avif"
"image/bmp"
"image/gif"
"image/jpeg"
"image/png"
"image/svg+xml"
"image/webp"))
(define document
`("application/pdf"))

3
home-environments/radio/packages.scm
View File

@ -120,8 +120,7 @@
#|zig-xyz |# river))
(define development
(list #|admin |# tree
#|gnupg |# gnupg pinentry
(list #|gnupg |# gnupg pinentry
#|math |# libqalculate
#|ssh |# openssh
#|text-editors |# kakoune