Update home configurations

Julien LepillerSat Jul 23 12:05:36+0200 2022

27967df

Update home configurations

homes/modules/gnu/home/services/openbox.scm

9999 
(define (add-openbox-configuration config)
100100 
  (match config
101101 
    (($ <home-openbox-configuration> autostart environ menus root-elements rc)
102-
     `(("config/openbox/menu.xml"
102+
     `((".config/openbox/menu.xml"
103103 
        ,(computed-file "menu.xml" (generate-openbox-menu menus root-elements)))
104-
       ("config/openbox/autostart" ,(openbox-autostart autostart))
105-
       ("config/openbox/environment" ,(openbox-environment environ))
106-
       ("config/openbox/rc.xml" ,(openbox-rc rc))))))
104+
       (".config/openbox/autostart" ,(openbox-autostart autostart))
105+
       (".config/openbox/environment" ,(openbox-environment environ))
106+
       (".config/openbox/rc.xml" ,(openbox-rc rc))))))
107107 
108108 
(define home-openbox-service-type
109109 
  (service-type (name 'home-openbox)
homes/sybil.scm
3434 
  (games packages sunless-skies)
3535 
  (nongnu packages steam-client)
3636 
  (guix gexp)
37+
38+
  (srfi srfi-11); let-values
3739 
  )
3840 
3941 
(define openbox-environment
…
4143 
export GTK_IM_MODULE=ibus
4244 
export XMODIFIERS=@im=ibus
4345 
export QT_IM_MODULE=ibus
44-
export GUIX_GTK2_IM_MODULE_FILE=/home/tyreunom/.guix-profile/lib/gtk-2.0/2.10.0/immodules-gtk2.cache
45-
export GUIX_GTK3_IM_MODULE_FILE=/home/tyreunom/.guix-profile/lib/gtk-3.0/3.0.0/immodules-gtk3.cache"))
46+
export GUIX_GTK2_IM_MODULE_FILE=/home/tyreunom/.guix-home/profile/lib/gtk-2.0/2.10.0/immodules-gtk2.cache
47+
export GUIX_GTK3_IM_MODULE_FILE=/home/tyreunom/.guix-home/profile/lib/gtk-3.0/3.0.0/immodules-gtk3.cache"))
4648 
4749 
(define openbox-autostart
4850 
  (computed-file "autostart"
…
5658 
           (format #t "export GTK_IM_MODULE=ibus
5759 
export XMODIFIERS=@im=ibus
5860 
export QT_IM_MODULE=ibus
59-
export GUIX_GTK2_IM_MODULE_FILE=~~/.guix-profile/lib/gtk-2.0/2.10.0/immodules-gtk2.cache
60-
export GUIX_GTK3_IM_MODULE_FILE=~~/.guix-profile/lib/gtk-3.0/3.0.0/immodules-gtk3.cache
61-
IBUS_COMPONENT_PATH=~~/.guix-profile/share/ibus/component ~a -drx~%" #$(file-append ibus "/bin/ibus-daemon"))))))
61+
export GUIX_GTK2_IM_MODULE_FILE=~~/.guix-home/profile/lib/gtk-2.0/2.10.0/immodules-gtk2.cache
62+
export GUIX_GTK3_IM_MODULE_FILE=~~/.guix-home/profile/lib/gtk-3.0/3.0.0/immodules-gtk3.cache
63+
IBUS_COMPONENT_PATH=~~/.guix-home/profile/share/ibus/component ~a -drx~%" #$(file-append ibus "/bin/ibus-daemon"))))))
6264 
(define openbox-rc (local-file "files/openbox/rc.xml"))
6365 
6466 
(define tyreunom-openbox-configuration
…
150152 
151153 
(home-environment
152154 
  (packages
153-
    (map specification->package+output
155+
    (map (lambda (package)
156+
           (let-values (((package output) (specification->package+output package)))
157+
             (list package output)))
154158 
         (list "arc-theme"
155159 
               "arc-icon-theme"
156160 
               "hicolor-icon-theme"
…
158162 
               ;; utilities
159163 
               "ibus"
160164 
               "ibus-anthy"
165+
               "dconf"
166+
               "xdg-user-dirs"
161167 
162168 
               ;; gui
163169 
               "feh"
…
229235 
                       `(("GTK_IM_MODULE" . "ibus")
230236 
                         ("XMODIFIERS" . "@im=ibus")
231237 
                         ("QT_IM_MODULE" . "ibus")
232-
                         ("GUIX_GTK2_IM_MODULE_FILE" . "/home/tyreunom/.guix-profile/lib/gtk-2.0/2.10.0/immodules-gtk2.cache")
233-
                         ("GUIX_GTK3_IM_MODULE_FILE" . "/home/tyreunom/.guix-profile/lib/gtk-3.0/3.0.0/immodules-gtk3.cache")
238+
                         ("GUIX_GTK2_IM_MODULE_FILE" . "/home/tyreunom/.guix-home/profile/lib/gtk-2.0/2.10.0/immodules-gtk2.cache")
239+
                         ("GUIX_GTK3_IM_MODULE_FILE" . "/home/tyreunom/.guix-home/profile/lib/gtk-3.0/3.0.0/immodules-gtk3.cache")
234240 
                         ("EDITOR" . "nvim")))
235241 
                     (bashrc
236242 
                      (list
…
239245 
alias info=\"info --vi-keys\"")))))
240246 
          (service home-openbox-service-type tyreunom-openbox-configuration)
241247 
           (simple-service 'nvim-config home-files-service-type
242-
             `(("config/nvim/init.vim" ,(plain-file "init.vim" "set tabstop=4
248+
             `((".config/nvim/init.vim" ,(plain-file "init.vim" "set tabstop=4
243249 
set colorcolumn=80
244250 
set expandtab
245251 
autocmd FileType latex,tex,text,md,markdown setlocal spell"))))
246252 
          (simple-service 'xfce4-terminal home-files-service-type
247-
            `(("config/xfce4/terminal/terminalrc" ,(local-file "files/xfce4-terminal/terminalrc"))))
253+
            `((".config/xfce4/terminal/terminalrc" ,(local-file "files/xfce4-terminal/terminalrc"))))
248254 
          (simple-service 'guile home-files-service-type
249-
            `(("guile" ,(local-file "files/guilerc"))))
255+
            `((".guile" ,(local-file "files/guilerc"))))
250256 
          (simple-service 'git home-files-service-type
251-
            `(("gitconfig" ,(local-file "files/gitconfig"))))
257+
            `((".gitconfig" ,(local-file "files/gitconfig"))))
252258 
          (simple-service 'gtk home-files-service-type
253-
            `(("gtkrc-2.0" ,(plain-file "gtkrc-2.0"
259+
            `((".gtkrc-2.0" ,(plain-file "gtkrc-2.0"
254260 
                                        "gtk-theme-name=\"Arc-Dark\"
255261 
gtk-icon-theme-name=\"Arc\""))
256-
              ("config/gtk-3.0/settings.ini" ,(plain-file "settings.ini"
262+
              (".config/gtk-3.0/settings.ini" ,(plain-file "settings.ini"
257263 
                                                          "[Settings]
258264 
gtk-theme-name=Arc-Dark
259265 
gtk-icon-theme-name=Arc")))))))
homes/tachikoma.scm
238238 
alias info=\"info --vi-keys\"")))))
239239 
          (service home-openbox-service-type tyreunom-openbox-configuration)
240240 
           (simple-service 'nvim-config home-files-service-type
241-
             `(("config/nvim/init.vim" ,(plain-file "init.vim" "set tabstop=4
241+
             `((".config/nvim/init.vim" ,(plain-file "init.vim" "set tabstop=4
242242 
set colorcolumn=80
243243 
set expandtab
244244 
autocmd FileType latex,tex,text,md,markdown setlocal spell"))))
245245 
          (simple-service 'xfce4-terminal home-files-service-type
246-
            `(("config/xfce4/terminal/terminalrc" ,(local-file "files/xfce4-terminal/terminalrc"))))
246+
            `((".config/xfce4/terminal/terminalrc" ,(local-file "files/xfce4-terminal/terminalrc"))))
247247 
          (simple-service 'guile home-files-service-type
248-
            `(("guile" ,(local-file "files/guilerc"))))
248+
            `((".guile" ,(local-file "files/guilerc"))))
249249 
          (simple-service 'git home-files-service-type
250-
            `(("gitconfig" ,(local-file "files/gitconfig"))))
250+
            `((".gitconfig" ,(local-file "files/gitconfig"))))
251251 
          (simple-service 'gtk home-files-service-type
252-
            `(("gtkrc-2.0" ,(plain-file "gtkrc-2.0"
252+
            `((".gtkrc-2.0" ,(plain-file "gtkrc-2.0"
253253 
                                        "gtk-theme-name=\"Arc-Dark\"
254254 
gtk-icon-theme-name=\"Arc\""))
255255 
              ("config/gtk-3.0/settings.ini" ,(plain-file "settings.ini"
homes/test/.bash_profile unknown status 1
1+
# Setups system and user profiles and related variables
2+
# /etc/profile will be sourced by bash automatically
3+
# Setups home environment profile
4+
if [ -f ~/.profile ]; then source ~/.profile; fi
5+
6+
# Honor per-interactive-shell startup file
7+
if [ -f ~/.bashrc ]; then source ~/.bashrc; fi
8+
export GTK_IM_MODULE=ibus
9+
export XMODIFIERS=@im=ibus
10+
export QT_IM_MODULE=ibus
11+
export GUIX_GTK2_IM_MODULE_FILE=/home/tyreunom/.guix-profile/lib/gtk-2.0/2.10.0/immodules-gtk2.cache
12+
export GUIX_GTK3_IM_MODULE_FILE=/home/tyreunom/.guix-profile/lib/gtk-3.0/3.0.0/immodules-gtk3.cache
13+
export EDITOR=nvim
homes/test/.bashrc unknown status 1
1+
# Bash initialization for interactive non-login shells and
2+
# for remote shells (info "(bash) Bash Startup Files").
3+
4+
# Export 'SHELL' to child processes.  Programs such as 'screen'
5+
# honor it and otherwise use /bin/sh.
6+
export SHELL
7+
8+
if [[ $- != *i* ]]
9+
then
10+
    # We are being invoked from a non-interactive shell.  If this
11+
    # is an SSH session (as in "ssh host command"), source
12+
    # /etc/profile so we get PATH and other essential variables.
13+
    [[ -n "$SSH_CLIENT" ]] && source /etc/profile
14+
15+
    # Don't do anything else.
16+
    return
17+
fi
18+
19+
# Source the system-wide file.
20+
if [[ -e /etc/bashrc ]]; then
21+
    source /etc/bashrc
22+
fi
23+
24+
# Adjust the prompt depending on whether we're in 'guix environment'.
25+
if [ -n "$GUIX_ENVIRONMENT" ]
26+
then
27+
    PS1='\u@\h \w [env]\$ '
28+
else
29+
    PS1='\u@\h \w\$ '
30+
fi
31+
alias ls='ls -p --color=auto'
32+
alias ll='ls -l'
33+
alias grep='grep --color=auto'
34+
alias vim=nvim
35+
alias info="info --vi-keys"