summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRaghav Gururajan <raghavgururajan@disroot.org>2020-04-22 20:55:40 -0400
committerLudovic Courtès <ludo@gnu.org>2020-04-27 23:29:40 +0200
commit47f82b310e320ed6c0282c89748485d1f9212d2c (patch)
tree638d5012150753aed13dc8acdcb5a14e835d9582
parent5fbc753ab524809cd81e3e5c54b3d0acbe33792d (diff)
downloadpatches-47f82b310e320ed6c0282c89748485d1f9212d2c.tar
patches-47f82b310e320ed6c0282c89748485d1f9212d2c.tar.gz
guix: edit: Make nano the default editor.
* guix/scripts/edit.scm: Make nano the default editor. Nano is sensible default, as it is installed by base system. For development, user can set custom value for $EDITOR. Signed-off-by: Ludovic Courtès <ludo@gnu.org>
-rw-r--r--guix/scripts/edit.scm7
1 files changed, 3 insertions, 4 deletions
diff --git a/guix/scripts/edit.scm b/guix/scripts/edit.scm
index a6fd1d2751..43f3011869 100644
--- a/guix/scripts/edit.scm
+++ b/guix/scripts/edit.scm
@@ -56,10 +56,9 @@ Start $VISUAL or $EDITOR to edit the definitions of PACKAGE...\n"))
(show-bug-report-information))
(define %editor
- ;; XXX: It would be better to default to something more likely to be
- ;; pre-installed on an average GNU system. Since Nano is not suited for
- ;; editing Scheme, Emacs is used instead.
- (make-parameter (or (getenv "VISUAL") (getenv "EDITOR") "emacs")))
+ ;; Nano is sensible default, as it is installed by base system.
+ ;; For development, user can set custom value for $EDITOR.
+ (make-parameter (or (getenv "VISUAL") (getenv "EDITOR") "nano")))
(define (search-path* path file)
"Like 'search-path' but exit if FILE is not found."