allow editor to be nil

src/os-utils.lisp

@@ -63,7 +63,9 @@
   (let ((error-message
          (_ "No editor found, please configure the 'editor' directive in your configuration file"))
         (editor (or (swconf:external-editor)
-                    (getenv "EDITOR"))))
+                    (getenv "VISUAL")
+                    (getenv "EDITOR")
+                    "ed")))
     (if (null editor)
         (error error-message)
         (let ((space (cl-ppcre:scan "\\s" editor)))

src/software-configuration.lisp

@@ -757,8 +757,8 @@
                             4))
 
 (defun external-editor ()
-  (access-non-null-conf-value *software-configuration*
-                              +key-editor+))
+  (access:access *software-configuration*
+                 +key-editor+))
 
 (defun color-regexps ()
   (access:accesses *software-configuration*