diff options
| author | Efraim Flashner <efraim@flashner.co.il> | 2023-12-31 10:29:41 +0200 |
|---|---|---|
| committer | Efraim Flashner <efraim@flashner.co.il> | 2024-01-17 11:11:09 +0200 |
| commit | 33136e0426f5722dea63e18a14e7f54cda530132 (patch) | |
| tree | d47e38f8111544064e958c05694cca4fe278448b /gnu/system | |
| parent | eef3babfdb3fecbca80d8e25bbeb9e43cc5cc097 (diff) | |
| download | guix-33136e0426f5722dea63e18a14e7f54cda530132.tar guix-33136e0426f5722dea63e18a14e7f54cda530132.tar.gz | |
system: Export default nanorc.
* gnu/system/shadow.scm (%default-nanorc): Extract from
default-skeletons, export.
(default-skeletons): Use %default-nanorc.
Change-Id: I0d07b13ed4894b1152a08b96d9ef8527dde073ce
Diffstat (limited to 'gnu/system')
| -rw-r--r-- | gnu/system/shadow.scm | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/gnu/system/shadow.scm b/gnu/system/shadow.scm index e1dd31262a..a8bc2d9567 100644 --- a/gnu/system/shadow.scm +++ b/gnu/system/shadow.scm @@ -68,6 +68,7 @@ %default-zprofile %default-xdefaults %default-gdbinit + %default-nanorc default-skeletons skeleton-directory %base-groups @@ -211,6 +212,11 @@ end # pretty-printers of libstdc++. set auto-load safe-path /gnu/store/*/lib\n")) +(define %default-nanorc + (plain-file "nanorc" + "# Include all the syntax highlighting modules. +include /run/current-system/profile/share/nano/*.nanorc\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." @@ -226,9 +232,7 @@ set auto-load safe-path /gnu/store/*/lib\n")) ;; after ~/.zshrc. To avoid interfering with any customizations a user ;; may have made in their ~/.zshrc, put this in .zprofile, not .zlogin. (".zprofile" ,zprofile) - (".nanorc" ,(plain-file "nanorc" "\ -# Include all the syntax highlighting modules. -include /run/current-system/profile/share/nano/*.nanorc\n")) + (".nanorc" ,%default-nanorc) (".Xdefaults" ,xdefaults) (".guile" ,(plain-file "dot-guile" "(cond ((false-if-exception (resolve-interface '(ice-9 readline))) |