edit: Don't assume that an emacs daemon is running.
* guix/scripts/edit.scm (%editor): Use Emacs as a default value.
This commit is contained in:
parent
b16dbd1311
commit
cd08fe4259
|
@ -49,8 +49,10 @@ Start $VISUAL or $EDITOR to edit the definitions of PACKAGE...\n"))
|
||||||
(show-bug-report-information))
|
(show-bug-report-information))
|
||||||
|
|
||||||
(define %editor
|
(define %editor
|
||||||
(make-parameter (or (getenv "VISUAL") (getenv "EDITOR")
|
;; XXX: It would be better to default to something more likely to be
|
||||||
"emacsclient")))
|
;; 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")))
|
||||||
|
|
||||||
(define (search-path* path file)
|
(define (search-path* path file)
|
||||||
"Like 'search-path' but exit if FILE is not found."
|
"Like 'search-path' but exit if FILE is not found."
|
||||||
|
|
Loading…
Reference in New Issue