[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[bug#68169] [PATCH 4/9] system: Export default gdbinit.
From: |
Efraim Flashner |
Subject: |
[bug#68169] [PATCH 4/9] system: Export default gdbinit. |
Date: |
Sun, 31 Dec 2023 13:39:43 +0200 |
* gnu/system/shadow.scm (%default-gdbinit): Extract from
default-skeletons, export.
(default-skeletons): Use %default-gdbinit.
Change-Id: Ia5188f8083a83ad4cdb96e234dbd730b1bfe0072
---
gnu/system/shadow.scm | 26 +++++++++++++++-----------
1 file changed, 15 insertions(+), 11 deletions(-)
diff --git a/gnu/system/shadow.scm b/gnu/system/shadow.scm
index be7c4370a2..e1dd31262a 100644
--- a/gnu/system/shadow.scm
+++ b/gnu/system/shadow.scm
@@ -67,6 +67,7 @@ (define-module (gnu system shadow)
%default-bash-profile
%default-zprofile
%default-xdefaults
+ %default-gdbinit
default-skeletons
skeleton-directory
%base-groups
@@ -188,16 +189,9 @@ (define %default-xdefaults
XTerm*utf8: always
XTerm*metaSendsEscape: true\n"))
-(define (default-skeletons)
- "Return the default skeleton files for /etc/skel. These files are copied by
-'useradd' in the home directory of newly created user accounts."
-
- (let ((profile %default-bash-profile)
- (bashrc %default-bashrc)
- (zprofile %default-zprofile)
- (xdefaults %default-xdefaults)
- (gdbinit (plain-file "gdbinit" "\
-# Tell GDB where to look for separate debugging files.
+(define %default-gdbinit
+ (plain-file "gdbinit"
+ "# Tell GDB where to look for separate debugging files.
guile
(use-modules (gdb))
(execute (string-append \"set debug-file-directory \"
@@ -215,7 +209,17 @@ (define (default-skeletons)
# Authorize extensions found in the store, such as the
# pretty-printers of libstdc++.
-set auto-load safe-path /gnu/store/*/lib\n")))
+set auto-load safe-path /gnu/store/*/lib\n"))
+
+(define (default-skeletons)
+ "Return the default skeleton files for /etc/skel. These files are copied by
+'useradd' in the home directory of newly created user accounts."
+
+ (let ((profile %default-bash-profile)
+ (bashrc %default-bashrc)
+ (zprofile %default-zprofile)
+ (xdefaults %default-xdefaults)
+ (gdbinit %default-gdbinit))
`((".bash_profile" ,profile)
(".bashrc" ,bashrc)
;; Zsh sources ~/.zprofile before ~/.zshrc, and it sources ~/.zlogin
--
Efraim Flashner <efraim@flashner.co.il> רנשלפ םירפא
GPG key = A28B F40C 3E55 1372 662D 14F7 41AA E7DC CA3D 8351
Confidentiality cannot be guaranteed on emails sent or received unencrypted
- [bug#68169] [PATCH 0/9] Add guix-home config to /etc/skel, Efraim Flashner, 2023/12/31
- [bug#68169] [PATCH 1/9] system: Export default bash-profile., Efraim Flashner, 2023/12/31
- [bug#68169] [PATCH 3/9] system: Export default xdefaults., Efraim Flashner, 2023/12/31
- [bug#68169] [PATCH 2/9] system: Export default zprofile., Efraim Flashner, 2023/12/31
- [bug#68169] [PATCH 4/9] system: Export default gdbinit.,
Efraim Flashner <=
- [bug#68169] [PATCH 5/9] system: Export default nanorc., Efraim Flashner, 2023/12/31
- [bug#68169] [PATCH 7/9] system: Add default guix-home-config., Efraim Flashner, 2023/12/31
- [bug#68169] [PATCH 9/9] home: services: zsh: Use unified zprofile., Efraim Flashner, 2023/12/31
- [bug#68169] [PATCH 6/9] system: Export default guile config., Efraim Flashner, 2023/12/31
- [bug#68169] [PATCH 8/9] system: default-zprofile: Sync with home zprofile., Efraim Flashner, 2023/12/31