database: Fix "db-get-worker".

* src/cuirass/database.scm (db-get-worker): Handle the case where no worker
were found.
This commit is contained in:
Mathieu Othacehe 2021-02-01 12:22:56 +01:00
parent da93cb96ff
commit 7697735fce
No known key found for this signature in database
GPG Key ID: 8354763531769CA6
1 changed files with 2 additions and 1 deletions

View File

@ -1415,7 +1415,8 @@ WHERE name = " name ";"))
(address address)
(machine machine)
(systems (string-split systems #\,))
(last-seen last-seen))))))
(last-seen last-seen)))
(else #f))))
(define (db-get-workers)
"Return the workers in Workers table."