branch master updated: system: Move nanorc to XDG_CONFIG_HOME.

[guix-commits]

This is an automated email from the git hooks/post-receive script.

efraim pushed a commit to branch master
in repository guix.

The following commit(s) were added to refs/heads/master by this push:
     new f12bd0b  system: Move nanorc to XDG_CONFIG_HOME.
f12bd0b is described below

commit f12bd0bedde4fb6476064c5e2b32642c49857510
Author: Efraim Flashner <address@hidden>
AuthorDate: Tue Mar 31 21:10:47 2020 +0300

    system: Move nanorc to XDG_CONFIG_HOME.
    
    * gnu/system/shadow.scm (skeleton-directory): Move .nanorc to
    .config/nano/nanorc.
---
 gnu/system/shadow.scm | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/gnu/system/shadow.scm b/gnu/system/shadow.scm
index 46efdfd..42480e8 100644
--- a/gnu/system/shadow.scm
+++ b/gnu/system/shadow.scm
@@ -2,6 +2,7 @@
 ;;; Copyright © 2013, 2014, 2015, 2016, 2017, 2018, 2019 Ludovic Courtès 
<address@hidden>
 ;;; Copyright © 2016 Alex Griffin <address@hidden>
 ;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <address@hidden>
+;;; Copyright © 2020 Efraim Flashner <address@hidden>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -215,6 +216,10 @@ for a colorful Guile experience.\\n\\n\"))))\n"))
                                    ((target source)
                                     (copy-recursively source target)))
                                  '#$skeletons)
+                       ;; Make nanorc respect XDG_CONFIG_HOME.
+                       (when (file-exists? ".nanorc")
+                         (mkdir-p ".config/nano")
+                         (rename-file ".nanorc" ".config/nano/nanorc"))
                        #t))))
 
 (define (assert-valid-users/groups users groups)