public
/
backplane-dns
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Die if a password file is missing

This commit is contained in:
Niten 2020-11-16 20:11:45 -08:00
parent bfad36c9d2
commit 939aa16231
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
backplane-dns.lisp
View File

@ -194,7 +194,9 @@
(defun read-file-line (filename) (defun read-file-line (filename)
(let ((input (open filename :if-does-not-exist nil))) (let ((input (open filename :if-does-not-exist nil)))
(read-line input))) (if input
(read-line input)
(uiop:die 1 "unable to read file: ~A" filename))))
(defun start-listener-with-env () (defun start-listener-with-env ()
(backplane-dns-listen (backplane-dns-listen