cage/tinmop
1
0
Fork 0
mirror of https://codeberg.org/cage/tinmop/ synced 2025-02-01 04:26:47 +01:00
Code Issues

- prevented crash when a program to open a link is not found.

Browse Source
This commit is contained in:
cage 2021-02-11 15:27:58 +01:00
parent 07d04f760a
commit bc3e7685a7
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/software-configuration.lisp
View File

@ -769,7 +769,7 @@
(gen-simple-access (all-link-open-program) +key-open-link-helper+) (gen-simple-access (all-link-open-program) +key-open-link-helper+)
(defun link-regex->program-to-use (link) (defun link-regex->program-to-use (link)
(let ((found (find-if (lambda (a) (when-let ((found (find-if (lambda (a)
(cl-ppcre:scan (re a) link)) (cl-ppcre:scan (re a) link))
(config-all-link-open-program)))) (config-all-link-open-program))))
(program-name found))) (program-name found)))