cage
/
tinmop
mirror of https://codeberg.org/cage/tinmop/
1
0
Fork 0
Code Issues

Merge branch 'master' of omar-polo/tinmop into master

This commit is contained in:
cage 2021-05-28 18:23:54 +00:00 committed by Gogs
parent f8352e5212 61c8adb649
commit 9c09ed1fad
2 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/os-utils.lisp
View File

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

2
src/software-configuration.lisp
View File

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