SSH updejt

.config/guix/channels.scm

@@ -0,0 +1,23 @@
+(cons* (channel
+        (name 'nonguix)
+        (url "https://gitlab.com/nonguix/nonguix")
+        ;; Enable signature verification:
+        (introduction
+         (make-channel-introduction
+          "897c1a470da759236cc11798f4e0a5f7d4d59fbc"
+          (openpgp-fingerprint
+           "2A39 3FFF 68F4 EF7A 3D29  12AF 6F51 20A0 22FB B2D5"))))
+       ;(channel
+       ; (name 'guixrus)
+       ; (url "https://git.sr.ht/~whereiseveryone/guixrus")
+       ; (introduction
+       ;  (make-channel-introduction
+       ;   "7c67c3a9f299517bfc4ce8235628657898dd26b2"
+       ;   (openpgp-fingerprint
+       ;    "CD2D 5EAA A98C CB37 DA91  D6B0 5F58 1664 7F8B E551"))))
+       ;(channel
+       ;  (name 'kompot)
+       ;  ;;(url "https://git.kompot.si/kompot/guix-paketi")
+       ;  (url (string-append "file://" (getenv "HOME") "/projekti/guix-paketi"))
+       ;  (branch "main"))
+       %default-channels)

.config/rofi/config.rasi

@@ -3,12 +3,8 @@ combi-modi: "window,drun,run";
 terminal: "kitty";
 show-icons: true;
 sidebar-mode: true;
-color-normal: "#00383c4a, #c4cbd4, #96404552, #4084d6, #f9f9f9";
-color-urgent: "#002d303b, #cc6666, #e52d303b, #a54242, #f9f9f9";
-color-active: "#002d303b, #b5bd68, #e42d303b, #8c9440, #f9f9f9";
-color-window: "#f22d303b, #7c8389, #1d1f21";
 separator-style: "solid";
 font: "Iosevka 11";
 drun-icon-theme: "Papirus";
 }
-@theme "~/.config/rofi/themes/gruvbox/gruvbox-dark.rasi"
+@theme "gruvbox-dark.rasi"

.config/sway/config

@@ -16,6 +16,9 @@ set $term foot
 # Font
 font pango:Iosevka SS05 Medium 10
 
+# Kurzor
+seat * xcursor_theme Bibata-Modern-Classic 24
+
 # Launcher
 set $menu "rofi -combi-modi window,drun,run -show combi -modi combi"
 #set $menu j4-dmenu-desktop
@@ -281,9 +284,9 @@ bindsym Mod1+shift+x exec playerctl play-pause
 bindsym Mod1+shift+c exec playerctl play-pause
 
 # Zvok
-set $vol_down_cmd amixer -q sset Master 5%-
+set $vol_down_cmd pamixer -d 5
-set $vol_up_cmd amixer -q sset Master 5%+
+set $vol_up_cmd pamixer -i 5
-set $vol_toggle_cmd amixer -q sset Master toggle
+set $vol_toggle_cmd pamixer -t
 
 bindsym $mod+shift+d exec "$vol_up_cmd"
 bindsym XF86AudioRaiseVolume exec "$vol_up_cmd"
@@ -301,8 +304,8 @@ exec_always {
 }
 
 # Zvetlost zaslona
-bindsym XF86MonBrightnessUp exec "light -A 3"
+bindsym XF86MonBrightnessUp exec "brightnessctl set 3%+"
-bindsym XF86MonBrightnessDown exec "light -U 3"
+bindsym XF86MonBrightnessDown exec "brightnessctl set 3%-"
 
 # Zunanji skrin
 bindsym $mod+p exec "swaymsg output HDMI-A-2 enable"
@@ -330,14 +333,11 @@ exec dbus-update-activation-environment --systemd DISPLAY WAYLAND_DISPLAY SWAYSO
 exec ~/bin/inactive-windows-transparency.py
 
 # Desktop notifikacije
-exec mako --default-timeout=10000 --icon-path /usr/share/icons/Numix
+exec mako --default-timeout=5000 --icon-path /usr/share/icons/Numix
 
 # Autotiling https://github.com/nwg-piotr/autotiling
 exec ~/bin/autotiling.py
 
-# Rdece, da lahko spim, hvala
-exec gammastep -m wayland -l 46.05108:14.50513
-
 # Zagoni programov razporejeni na workspejse
 workspace 1:
 #exec firefox

.emacs.d/bookmarks

@@ -2,12 +2,24 @@
 ;;; This format is meant to be slightly human-readable;
 ;;; nevertheless, you probably don't want to edit it.
 ;;; -*- End Of Bookmark File Format Version Stamp -*-
-(("org-capture-last-stored"
+(("org-capture-last-stored-marker"
- (filename . "~/.notes")
+ (filename . "~/Dokumenti/zapiski.org")
- (front-context-string . "** TODO Zaraščen")
+ (front-context-string . "** TODO \n  [2023")
+ (rear-context-string . "th composer\",]]\n")
+ (position . 196)
+ (last-modified 25762 52373 677189 163000))
+("org-refile-last-stored"
+ (filename . "~/Dokumenti/zapiski.org")
+ (front-context-string . "** TODO \n  [2023")
+ (rear-context-string . "th composer\",]]\n")
+ (position . 196)
+ (last-modified 25762 52373 676796 964000))
+("org-capture-last-stored"
+ (filename . "~/Dokumenti/zapiski.org")
+ (front-context-string . "** TODO \n  [2023")
  (rear-context-string)
  (position . 9)
- (last-modified 25598 13456 906334 599000))
+ (last-modified 25762 52371 13354 624000))
 ("IRS"
  (filename . "~/rs/megla-sync/org/irs.org")
  (front-context-string . "- nov X, dizajn\n")

.emacs.d/init.el

@@ -6,12 +6,12 @@
 
 (setq debug-on-error t)
 
-;; Loudamo melpa paketice
-(add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/") t)
-
 ;; Set up package.el to work with MELPA
 (require 'package)
 
+;; Loudamo melpa paketice
+(add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/") t)
+
 (package-initialize)
 
 ;; Stare funkcije za namescanje paketov. Od use-package z :ensure naprej vec ne
@@ -311,10 +311,10 @@
 ;; Guile scheme
 (use-package geiser
   :ensure t
-  :mode "\\.scm\\'")
+  :defer t)
 (use-package geiser-guile
   :ensure t
-  :after geiser
+  :after geiser-guile
   :init (setq scheme-program-name "guile"))
 
 ;; Racket podpora
@@ -572,13 +572,89 @@
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
+ '(connection-local-criteria-alist
+   '(((:application tramp)
+      tramp-connection-local-default-system-profile tramp-connection-local-default-shell-profile)))
+ '(connection-local-profile-alist
+   '((tramp-connection-local-darwin-ps-profile
+      (tramp-process-attributes-ps-args "-acxww" "-o" "pid,uid,user,gid,comm=abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ" "-o" "state=abcde" "-o" "ppid,pgid,sess,tty,tpgid,minflt,majflt,time,pri,nice,vsz,rss,etime,pcpu,pmem,args")
+      (tramp-process-attributes-ps-format
+       (pid . number)
+       (euid . number)
+       (user . string)
+       (egid . number)
+       (comm . 52)
+       (state . 5)
+       (ppid . number)
+       (pgrp . number)
+       (sess . number)
+       (ttname . string)
+       (tpgid . number)
+       (minflt . number)
+       (majflt . number)
+       (time . tramp-ps-time)
+       (pri . number)
+       (nice . number)
+       (vsize . number)
+       (rss . number)
+       (etime . tramp-ps-time)
+       (pcpu . number)
+       (pmem . number)
+       (args)))
+     (tramp-connection-local-busybox-ps-profile
+      (tramp-process-attributes-ps-args "-o" "pid,user,group,comm=abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ" "-o" "stat=abcde" "-o" "ppid,pgid,tty,time,nice,etime,args")
+      (tramp-process-attributes-ps-format
+       (pid . number)
+       (user . string)
+       (group . string)
+       (comm . 52)
+       (state . 5)
+       (ppid . number)
+       (pgrp . number)
+       (ttname . string)
+       (time . tramp-ps-time)
+       (nice . number)
+       (etime . tramp-ps-time)
+       (args)))
+     (tramp-connection-local-bsd-ps-profile
+      (tramp-process-attributes-ps-args "-acxww" "-o" "pid,euid,user,egid,egroup,comm=abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ" "-o" "state,ppid,pgid,sid,tty,tpgid,minflt,majflt,time,pri,nice,vsz,rss,etimes,pcpu,pmem,args")
+      (tramp-process-attributes-ps-format
+       (pid . number)
+       (euid . number)
+       (user . string)
+       (egid . number)
+       (group . string)
+       (comm . 52)
+       (state . string)
+       (ppid . number)
+       (pgrp . number)
+       (sess . number)
+       (ttname . string)
+       (tpgid . number)
+       (minflt . number)
+       (majflt . number)
+       (time . tramp-ps-time)
+       (pri . number)
+       (nice . number)
+       (vsize . number)
+       (rss . number)
+       (etime . number)
+       (pcpu . number)
+       (pmem . number)
+       (args)))
+     (tramp-connection-local-default-shell-profile
+      (shell-file-name . "/bin/sh")
+      (shell-command-switch . "-c"))
+     (tramp-connection-local-default-system-profile
+      (path-separator . ":")
+      (null-device . "/dev/null"))))
  '(custom-safe-themes
    '("db3e80842b48f9decb532a1d74e7575716821ee631f30267e4991f4ba2ddf56e" "d14f3df28603e9517eb8fb7518b662d653b25b26e83bd8e129acea042b774298" "7661b762556018a44a29477b84757994d8386d6edee909409fabe0631952dad9" default))
  '(iswitchb-mode t)
  '(org-agenda-files
    '("~/Dokumenti/todo.org" "/home/g1smo/Dokumenti/plac.org" "/home/g1smo/rs/org/2021-05-25-spletna-stran.org" "/home/g1smo/rs/org/2021-07-02-spletna.org" "/home/g1smo/rs/org/README.org" "/home/g1smo/rs/org/git-delavnica.org" "/home/g1smo/rs/org/irs-plan-period.org" "/home/g1smo/rs/org/irs-plan.org" "/home/g1smo/rs/org/irs.org" "/home/g1smo/rs/org/irs_old.org" "/home/g1smo/rs/org/kaki.org" "/home/g1smo/rs/org/prepoznava-komadov.org" "/home/g1smo/Dokumenti/agenda.org" "/home/g1smo/Dokumenti/blurb.org" "/home/g1smo/Dokumenti/delo.org" "/home/g1smo/Dokumenti/emanat.org" "/home/g1smo/Dokumenti/kompot.org" "/home/g1smo/Dokumenti/ljudmila.org" "/home/g1smo/Dokumenti/mu4e-setup.org" "/home/g1smo/Dokumenti/muska.org" "/home/g1smo/Dokumenti/org.org" "/home/g1smo/Dokumenti/projekti.org" "/home/g1smo/Dokumenti/recepti.org" "/home/g1smo/Dokumenti/samozaposlitev-prijava.org" "/home/g1smo/Dokumenti/shta.org" "/home/g1smo/Dokumenti/wtf.org" "/home/g1smo/Dokumenti/zapisi.org"))
  '(package-selected-packages
-   '(toml-mode smartparens crdt.el openwith evil-org-agenda company-org-block org-block-capf writeroom-mode racket-mode htmlize company-lsp web-mode tidal org-caldav format-all company-phpactor phpactor extempore-mode ob-mermaid use-package lsp-mode yaml-mode drupal-mode magit markdown-mode flycheck arduino-mode rjsx-mode gdscript-mode rainbow-delimiters which-key paredit geiser-guile geiser web-beautify vue-mode treemacs-evil treemacs-projectile treemacs smart-tabs-mode smart-tabs js2-mode smex clojure-mode helpful doom-themes counsel swiper all-the-icons doom-modeline evil-collection fennel-mode rg ivy company projectile evil))
+   '(tree-sitter guix toml-mode smartparens crdt.el openwith evil-org-agenda company-org-block org-block-capf writeroom-mode racket-mode htmlize company-lsp web-mode tidal org-caldav format-all company-phpactor phpactor extempore-mode ob-mermaid use-package lsp-mode yaml-mode drupal-mode magit markdown-mode flycheck arduino-mode rjsx-mode gdscript-mode rainbow-delimiters which-key paredit geiser-guile geiser web-beautify vue-mode treemacs-evil treemacs-projectile treemacs smart-tabs-mode smart-tabs js2-mode smex clojure-mode helpful doom-themes counsel swiper all-the-icons doom-modeline evil-collection fennel-mode rg ivy company projectile evil))
  '(tool-bar-mode nil)
  '(warning-minimum-level :error)
  '(which-key-mode t))

.profile

@@ -1,3 +1,5 @@
+. /etc/profile
+
 # <3 default editor (za manjse urejanje)
 export EDITOR="vim"
 export VISUAL="vim"
@@ -52,13 +54,13 @@ export GUILE_SITE_DIR="$HOME/.local/guile/site_dir"
 export XDG_CURRENT_DESKTOP=sway
 
 # Guix
-export GUIX_LOCPATH="$HOME/.guix-profile/lib/locale"
+#export GUIX_PACKAGE_PATH="$HOME/projekti/guix-paketi # guix channel!
-export GUIX_PROFILE="$HOME/.guix-profile"
+#export GUIX_LOCPATH="$HOME/.guix-profile/lib/locale"
-export XDG_DATA_DIRS="/usr/local/share:/usr/share:$XDG_DATA_DIRS"
+#export GUIX_PROFILE="$HOME/.guix-profile"
-export XDG_DATA_DIRS="${GUIX_PROFILE}/share${XDG_DATA_DIRS:+:}$XDG_DATA_DIRS"
+#export XDG_DATA_DIRS="/usr/local/share:/usr/share:$XDG_DATA_DIRS"
-export GUIX_PACKAGE_PATH="$HOME/projekti/guix-paketi"
+#export XDG_DATA_DIRS="${GUIX_PROFILE}/share${XDG_DATA_DIRS:+:}$XDG_DATA_DIRS"
-export PATH="$HOME/.config/guix/current/bin:$PATH"
+#export PATH="$HOME/.config/guix/current/bin:$PATH"
-. "$GUIX_PROFILE/etc/profile"
+#. "$GUIX_PROFILE/etc/profile"
 
 # Loadamo sway na tty1!
 # If running from tty1 start sway

.ssh/config

@@ -6,7 +6,3 @@ Host pi
 
 Host felis.kreten.si
   Port 2312
-
-Host a2z.si
-  HostkeyAlgorithms ssh-dss,ssh-rsa
-  KexAlgorithms +diffie-hellman-group1-sha1

.zshrc

@@ -62,10 +62,11 @@ bindkey '^R' history-incremental-pattern-search-backward
 #}
 
 # Aliasi
+alias ll='ls -l'
+alias grep='grep --color=auto'
 alias ls='ls --color -C'
 alias vi='vim'
 alias sudo='sudo env PATH=$PATH '
-alias grep="grep --color=auto"
 alias ag="rg"
 alias less="less -R"
 
@@ -78,9 +79,6 @@ alias offer-files="python3 -m http.server"
 # X on wayland
 alias wxon="xhost +local:"
 
-# RŠ aliasi
-alias omnom="ssh root@debeli"
-
 # Ljudmila
 alias scdev="ssh culture@milci.ljudmila.org"
 alias scnew="ssh culture@zala.ljudmila.org"
@@ -99,7 +97,6 @@ alias srs='f(){ ssh jurijp@$1.radiostudent.local };f'
 alias srr='f(){ ssh root@$1.radiostudent.local };f'
 alias rss='f(){ ssh jurijp@$1.radiostudent.si };f'
 alias rsr='f(){ ssh root@$1.radiostudent.si };f'
-alias zw="ssh zeljko@dev.radiostudent.si"
 
 # Poslusaj snemanje
 alias poslusaj='pactl load-module module-loopback latency_msec=1'
@@ -129,8 +126,10 @@ alias run-gamma="pkill -f gammastep; sleep 3; screen -dm -- gammastep -m wayland
 
 
 # Za LXD!
-export PATH="${PATH}:$(go env GOPATH)/bin:/sbin:/usr/sbin"
+if command -v go &> /dev/null; then
-export LD_LIBRARY_PATH="$(go env GOPATH)/deps/dqlite/.libs/:$(go env GOPATH)/deps/raft/.libs/:${LD_LIBRARY_PATH}"
+  export PATH="${PATH}:$(go env GOPATH)/bin:/sbin:/usr/sbin"
+  export LD_LIBRARY_PATH="$(go env GOPATH)/deps/dqlite/.libs/:$(go env GOPATH)/deps/raft/.libs/:${LD_LIBRARY_PATH}"
+fi
 
 # JS fix (prevec nov za openssl)
 #export NODE_OPTIONS="--openssl-legacy-provider"

bin/inactive-windows-transparency.py

@@ -1,4 +1,4 @@
-#!/usr/bin/python3
+#!/usr/bin/env python3
 
 
 # This script requires i3ipc-python package (install it from a system package manager

config.scm

@@ -1,56 +1,64 @@
+;; -*- mode: scheme; -*-
 ;; This is an operating system configuration template
 ;; for a "desktop" setup with GNOME and Xfce.
 
-(use-modules (gnu) (srfi srfi-1) (gnu system nss))
+(use-modules (gnu) 
-(use-service-modules desktop networking)
+             (gnu system nss)
+             (guix utils)
+             (nongnu packages linux)
+             (nongnu system linux-initrd)
+	     (srfi srfi-1))
+(use-service-modules desktop xorg dns networking)
 (use-package-modules bootloaders certs shells ssh version-control emacs vim wm freedesktop xorg fontutils)
 
-;; ZSH location G-expr
-(define zsh-location
-  #~(string-append #$zsh "/bin/zsh"))
-
-;; Replace wicd with NetworkManager
-(define %desktop-services-nm
-   (cons* (service network-manager-service-type (network-manager-configuration))
-          (service wpa-supplicant-service-type)
-          ;;(service account-service-type)
-          (remove (lambda (service) (eq? wicd-service-type (service-kind service))) %desktop-services)))
-
-
 (operating-system
-  (host-name "gpnx")
+  (host-name "apnx")
   (timezone "Europe/Ljubljana")
-  (locale "en_US.UTF-8")
+  (locale "sl_SI.utf8")
+
+  ;; Use the UEFI variant of GRUB with the EFI System
+  ;; Partition mounted on /boot/efi.
+  (bootloader (bootloader-configuration
+                (bootloader grub-efi-bootloader)
+                (targets '("/boot/efi"))))
+
+  (kernel linux)
+  (initrd microcode-initrd)
+  (firmware (list linux-firmware))
 
-  ;; Assuming /dev/sdX is the target hard disk, and "my-root"
-  ;; is the label of the target root file system.
-  (bootloader (grub-configuration (grub grub);;-efi) 
-                                  ;;(device "/dev/sda1")))
-                                  (device "/dev/sda")))
   (file-systems (cons* (file-system
-                        (device "gpnx")
+                         (device "/dev/sda3")
-                        (title "GNU Guix SD pnx")
                          (mount-point "/")
-                        (type "ext4"))
+                         (type "btrfs")
+                         (options "compress"))
                         (file-system
-                        (device "/dev/sda1")
+                         (device "/dev/sda2")
                          (mount-point "/boot/efi")
                          (type "vfat"))
                         %base-file-systems))
 
+  (swap-devices
+    (list (swap-space (target "/swapfile"))))
+
   (users (cons* (user-account
-                  (name "yuri")
+                  (name "g1smo")
-                  (comment "Silly Yuri")
+                  (comment "Yuri")
                   (group "users")
-                  (shell zsh-location)
                   (supplementary-groups '("wheel" "netdev"
-                                          "audio" "video"))
+                                          "audio" "video" "dialout"))
-                  (home-directory "/home/yuri"))
+		  (shell (file-append zsh "/bin/zsh"))
+                  (home-directory "/home/g1smo"))
+                (user-account
+                  (name "bask")
+                  (comment "Balkan Anarchist Bookfair")
+                  (group "users")
+                  (supplementary-groups '("wheel" "netdev"
+                                          "audio" "video" "dialout"))
+                  (home-directory "/home/bask"))
                %base-user-accounts))
 
   ;; This is where we specify system-wide packages.
-  (packages (cons* nss-certs         ;for HTTPS access
+  (packages (cons* zsh               ;Z shell
-                   zsh               ;Z shell
                    openssh
                    git
                    emacs
@@ -66,9 +74,23 @@
   ;; include the X11 log-in service, networking with Wicd,
   ;; and more.
 
-  (services (cons* ;;(xfce-desktop-service)
+  (services (cons* (service xfce-desktop-service-type)
-                   (gnome-desktop-service)
+                   (service gnome-desktop-service-type)
-                   %desktop-services-nm))
+		   (service dnsmasq-service-type
+			    (dnsmasq-configuration
+			      (cache-size 1500)))
+		   (service network-manager-service-type
+			    (network-manager-configuration 
+			      (dns "dnsmasq")))
+		   (service pam-limits-service-type
+		      (list 
+			(pam-limits-entry "@audio" 'both 'rtprio 99) 
+			(pam-limits-entry "@audio" 'both 'memlock 'unlimited)))
+
+		   (remove 
+		     (lambda (service)
+		       (eq? network-manager-service-type (service-kind service))) 
+		     %desktop-services)))
 
   ;; Allow resolution of '.local' host names with mDNS.
   (name-service-switch %mdns-host-lookup-nss))

guix/.bash_profile

@@ -0,0 +1,14 @@
+# Set up Guix Home profile
+if [ -f ~/.profile ]; then . ~/.profile; fi
+
+# Honor per-interactive-shell startup file
+if [ -f ~/.bashrc ]; then . ~/.bashrc; fi
+
+# Merge search-paths from multiple profiles, the order matters.
+eval "$(guix package --search-paths \
+-p $HOME/.config/guix/current \
+-p $HOME/.guix-profile \
+-p /run/current-system/profile)"
+
+# Prepend setuid programs.
+export PATH=/run/setuid-programs:$PATH

guix/.bashrc

@@ -0,0 +1,64 @@
+# Bash initialization for interactive non-login shells and
+# for remote shells (info "(bash) Bash Startup Files").
+
+# Export 'SHELL' to child processes.  Programs such as 'screen'
+# honor it and otherwise use /bin/sh.
+export SHELL
+
+if [[ $- != *i* ]]
+then
+    # We are being invoked from a non-interactive shell.  If this
+    # is an SSH session (as in "ssh host command"), source
+    # /etc/profile so we get PATH and other essential variables.
+    [[ -n "$SSH_CLIENT" ]] && source /etc/profile
+
+    # Don't do anything else.
+    return
+fi
+
+# Source the system-wide file.
+[ -f /etc/bashrc ] && source /etc/bashrc
+
+
+source /etc/profile
+
+# Term compatibility
+export TERM=rxvt-256color
+
+# Aliasi
+alias ls='ls -p --color=auto'
+alias ll='ls -l'
+alias grep='grep --color=auto'
+alias ls='ls --color -C'
+alias vi='vim'
+alias sudo='sudo env PATH=$PATH '
+alias ag="rg"
+alias less="less -R"
+
+alias gitclean="git fetch -p && for branch in \$\(git branch -vv | grep ': gone]' | gawk '{print \$1}'\); do git branch -D \$branch; echo 'deleted \$branch'; done"
+alias sctl="systemctl"
+alias ddrush="ddev exec drush"
+alias dcomposer="ddev exec composer"
+alias offer-files="python3 -m http.server"
+
+# X on wayland
+alias wxon="xhost +local:"
+alias kill-element='kill $(ps aux | grep element | awk '\''{print $2;}'\'')'
+alias run-gamma="pkill -f gammastep; sleep 3; screen -dm -- gammastep -m wayland -l 46.05108:14.50513"
+
+# RŠ ssh
+srs() {
+  ssh "jurijp@$1.radiostudent.local"
+}
+srr() {
+  ssh "root@$1.radiostudent.local"
+}
+rss() {
+  ssh "jurijp@$1.radiostudent.si"
+}
+rsr() {
+  ssh "root@$1.radiostudent.si"
+}
+
+export BSD_GAMES_DIR=~/.local/share/bsd-games
+

guix/home-configuration.scm

@@ -0,0 +1,125 @@
+;; This "home-environment" file can be passed to 'guix home reconfigure'
+;; to reproduce the content of your profile.  This is "symbolic": it only
+;; specifies package names.  To reproduce the exact same profile, you also
+;; need to capture the channels being used, as returned by "guix describe".
+;; See the "Replicating Guix" section in the manual.
+
+(use-modules (gnu home)
+             (gnu packages)
+             (gnu packages xdisorg)
+             (gnu services)
+             (guix gexp)
+             (gnu home services shells)
+             (gnu home services desktop)
+             (gnu home services pm)
+             (gnu home services sound))
+
+(home-environment
+  ;; Below is the list of packages that will show up in your
+  ;; Home profile, under ~/.guix-home/profile.
+  (packages (specifications->packages (list "htop"
+                                            "emacs-pgtk"
+                                            "binutils"
+                                            "gcc-toolchain@11"
+                                            "icecat-l10n:sl"
+                                            "icecat"
+                                            "crawl-tiles"
+                                            "acpi"
+                                            "zynaddsubfx"
+                                            "gnome-tweaks"
+                                            "gimp"
+                                            "supercollider"
+                                            "ardour"
+                                            "slurp"
+                                            "wireplumber"
+                                            "pipewire"
+                                            "qjackctl"
+                                            "mplayer"
+                                            "ffmpeg"
+                                            "libcaca"
+                                            "kigo"
+                                            "lierolibre"
+                                            "transmission:gui"
+                                            "wine64"
+                                            "wine"
+                                            "audacity"
+                                            "numix-gtk-theme"
+                                            "nextcloud-client"
+                                            "nyxt"
+                                            "icedove-wayland"
+                                            "ungoogled-chromium-wayland"
+                                            "keepassxc"
+                                            "libappindicator"
+                                            "snixembed"
+                                            "vlc"
+                                            "qpwgraph"
+                                            "pamixer"
+                                            "element-desktop"
+                                            "pavucontrol"
+                                            "libreoffice"
+                                            "mako"
+                                            "alacritty"
+                                            "redshift-wayland"
+                                            "i3status"
+                                            "rofi-wayland"
+                                            "sway"
+                                            "wev"
+                                            "grim"
+                                            "xjackfreak"
+                                            "ncdu"
+                                            "bind:utils"
+                                            "python-i3ipc"
+                                            "python"
+                                            "screen"
+                                            "bibata-cursor-theme"
+                                            "ripgrep"
+                                            "brightnessctl"
+                                            "foot"
+                                            "jack"
+                                            "amb-plugins"
+                                            "fil-plugins"
+                                            "gnugo"
+                                            "bsd-games"
+                                            "file"
+                                            "nmap"
+                                            "font-fira-code"
+                                            "font-awesome"
+                                            "unzip"
+                                            "zsh"
+                                            "curl")))
+
+  ;; Below is the list of Home services.  To search for available
+  ;; services, run 'guix home search KEYWORD' in a terminal.
+  (services
+   (list (service home-zsh-service-type
+                  (home-zsh-configuration
+                   (zshrc (list (local-file
+                                 "/home/g1smo/sredstva/dotfiles/.zshrc"
+                                 "zshrc")))
+                   (zprofile (list (local-file
+                                    "/home/g1smo/sredstva/dotfiles/.profile"
+                                    "profile")))))
+         
+         ;; Skrij misko po 4 sekundah ne-premikanja
+         (service home-unclutter-service-type
+                  (home-unclutter-configuration
+                   (idle-timeout 2)))
+
+         ;; Rdecenje zaslona @TODO se ne dela :(
+         (service home-redshift-service-type
+                  (home-redshift-configuration
+                   (redshift redshift-wayland)
+                   (adjustment-method 'wayland)
+                   (location-provider 'manual)
+                   (latitude 46.05108)
+                   (longitude 14.50513)))
+
+
+         ;; Pipewire zvok!
+         ;; Dbus je odvisen paket
+         (service home-dbus-service-type)
+         (service home-pipewire-service-type)
+
+         ;; Indikator nizke baterije
+         (service home-batsignal-service-type)
+         )))

povezi.sh

@@ -42,6 +42,10 @@ ln -s $DIR/.config/compton.conf ~/.config/compton.conf
 # redshift (pordeci skrin, X)
 ln -s $DIR/.config/redshift ~/.config/redshift
 
+# guix (channel z lokalnimi paketi
+mkdir ~/.config/guix
+ln -s $DIR/.config/guix/channels.scm ~/.config/guix/channels.scm
+
 # i3 block, bolj fensi statusbar (ne uporabljam vec)
 ln -s $DIR/.i3blocks.conf ~/.i3blocks.conf
 
@@ -92,8 +96,6 @@ ln -s $DIR/applications/dbeaver.desktop ~/.local/share/applications/com.obsproje
 # Emacs <3
 mkdir ~/.emacs.d
 ln -s $DIR/.emacs.d/init.el ~/.emacs.d/init.el
-ln -s $DIR/.emacs.d/projectile-bookmarks.eld ~/.emacs.d/projectile-bookmarks.eld
-ln -s $DIR/.emacs.d/bookmarks ~/.emacs.d/bookmarks
 
 # SSH (timeout)
 mkdir ~/.ssh