summaryrefslogtreecommitdiff
path: root/gnu/services.scm
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/services.scm')
-rw-r--r--gnu/services.scm8
1 files changed, 7 insertions, 1 deletions
diff --git a/gnu/services.scm b/gnu/services.scm
index 7083c88c130..5dbda176b80 100644
--- a/gnu/services.scm
+++ b/gnu/services.scm
@@ -124,6 +124,7 @@
124 etc-service-type 124 etc-service-type
125 etc-profile-d-service-type 125 etc-profile-d-service-type
126 etc-bashrc-d-service-type 126 etc-bashrc-d-service-type
127 %default-etc-bashrc-d-files
127 etc-directory 128 etc-directory
128 privileged-program-service-type 129 privileged-program-service-type
129 setuid-program-service-type ; deprecated 130 setuid-program-service-type ; deprecated
@@ -992,6 +993,10 @@ log in.")))
992(define files->bashrc-d-directory 993(define files->bashrc-d-directory
993 (make-files->etc-directory "bashrc.d")) 994 (make-files->etc-directory "bashrc.d"))
994 995
996(define %default-etc-bashrc-d-files
997 (list (file-append bash-completion
998 "/etc/profile.d/bash_completion.sh")))
999
995(define etc-bashrc-d-service-type 1000(define etc-bashrc-d-service-type
996 (service-type 1001 (service-type
997 (inherit etc-profile-d-service-type) 1002 (inherit etc-profile-d-service-type)
@@ -1000,7 +1005,8 @@ log in.")))
1000 files->bashrc-d-directory))) 1005 files->bashrc-d-directory)))
1001 (description "A service for populating @file{/etc/bashrc.d/} with Bash 1006 (description "A service for populating @file{/etc/bashrc.d/} with Bash
1002scripts having the @file{.sh} file extension, to be sourced by interactive 1007scripts having the @file{.sh} file extension, to be sourced by interactive
1003Bash shells."))) 1008Bash shells.")
1009 (default-value %default-etc-bashrc-d-files)))
1004 1010
1005(define (privileged-program->activation-gexp programs) 1011(define (privileged-program->activation-gexp programs)
1006 "Return an activation gexp for privileged-program from PROGRAMS." 1012 "Return an activation gexp for privileged-program from PROGRAMS."