amaharaneko/guix-mirrors
1
1
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2025-10-02 02:15:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

home: symlink-manager: Remove appending of leading dot.

Browse source 
* gnu/home/services.scm (xdg-configuration-files-directory): Add leading dot.
* gnu/home/services.scm (xdg-configuration-files-service-type): Change name.
* gnu/home/services/shells.scm (add-shell-profile-file,
zsh-get-configuration-files, add-zsh-dot-configuration,
add-zsh-xdg-configuration, add-bash-configuration): Add leading dots.
* gnu/home/services/symlink-manager.scm (update-symlinks-script): Remove
leading dot.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Andrew Tropin 2022-03-29 11:28:30 +03:00 • committed by Ludovic Courtès
parent 868da34d54
commit 5832d9fb60
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
4 changed files with 16 additions and 16 deletions
Download patch file Download diff file Expand all files Collapse all files

8
gnu/home/services.scm
View file

@ -285,10 +285,10 @@ directory containing FILES."
(description "Files that will be put in
@file{~~/.guix-home/files}, and further processed during activation.")))
(define xdg-configuration-files-directory "config")
(define xdg-configuration-files-directory ".config")
(define (xdg-configuration-files files)
"Add config/ prefix to each file-path in FILES."
"Add .config/ prefix to each file-path in FILES."
(map (match-lambda
((file-path . rest)
(cons (string-append xdg-configuration-files-directory "/" file-path)
@ -296,7 +296,7 @@ directory containing FILES."
files))
(define home-xdg-configuration-files-service-type
(service-type (name 'home-files)
(service-type (name 'home-xdg-configuration)
(extensions
(list (service-extension home-files-service-type
xdg-configuration-files)))
@ -304,7 +304,7 @@ directory containing FILES."
(extend append)
(default-value '())
(description "Files that will be put in
@file{~~/.guix-home/files/config}, and further processed during activation.")))
@file{~~/.guix-home/files/.config}, and further processed during activation.")))
(define %initialize-gettext
#~(begin