mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2026-05-28 12:01:49 +02:00
gnu: home: dotfiles: Fix inclusion of directories having .git in their name.
* gnu/home/services/dotfiles.scm (%home-dotfiles-excluded): Replace .git/.* with /.git/.* . * doc/guix.texi: Document it. Fixes https://codeberg.org/guix/guix/issues/6808 Change-Id: Ib6c824bb4bf5a5b3d6939807667c7961ce0cf6d2
This commit is contained in:
+1
-1
@@ -51409,7 +51409,7 @@ the @code{home-dotfiles-service-type} will only provision dotfiles from this
|
|||||||
subset of applications. This field will be ignored if @code{layout} is set
|
subset of applications. This field will be ignored if @code{layout} is set
|
||||||
to @code{'plain}.
|
to @code{'plain}.
|
||||||
|
|
||||||
@item @code{excluded} (default: @code{'(".*~" ".*\\.swp" "\\.git/.*" "\\.gitignore")}) (type: list-of-strings)
|
@item @code{excluded} (default: @code{'(".*~" ".*\\.swp" "/\\.git/.*" "\\.gitignore")}) (type: list-of-strings)
|
||||||
The list of file patterns @code{home-dotfiles-service-type} will exclude
|
The list of file patterns @code{home-dotfiles-service-type} will exclude
|
||||||
while visiting each one of the @code{directories}.
|
while visiting each one of the @code{directories}.
|
||||||
|
|
||||||
|
|||||||
@@ -1,6 +1,6 @@
|
|||||||
;;; GNU Guix --- Functional package management for GNU
|
;;; GNU Guix --- Functional package management for GNU
|
||||||
;;; Copyright © 2024 Ludovic Courtès <ludo@gnu.org>
|
;;; Copyright © 2024 Ludovic Courtès <ludo@gnu.org>
|
||||||
;;; Copyright © 2024 Giacomo Leidi <therewasa@fishinthecalculator.me>
|
;;; Copyright © 2024, 2026 Giacomo Leidi <therewasa@fishinthecalculator.me>
|
||||||
;;;
|
;;;
|
||||||
;;; This file is part of GNU Guix.
|
;;; This file is part of GNU Guix.
|
||||||
;;;
|
;;;
|
||||||
@@ -45,7 +45,9 @@
|
|||||||
(define %home-dotfiles-excluded
|
(define %home-dotfiles-excluded
|
||||||
'(".*~"
|
'(".*~"
|
||||||
".*\\.swp"
|
".*\\.swp"
|
||||||
"\\.git/.*"
|
;; This first / is safe until regexp-exec in directory-contents
|
||||||
|
;; is passed an absolute file name.
|
||||||
|
"/\\.git/.*"
|
||||||
"\\.gitignore"))
|
"\\.gitignore"))
|
||||||
|
|
||||||
(define %home-dotfiles-layouts
|
(define %home-dotfiles-layouts
|
||||||
|
|||||||
Reference in New Issue
Block a user