Commit e22c74b7 authored by Antoine Martin's avatar Antoine Martin
Browse files

Handle case where release doesn't exist

Better handling for typos during testing
parent 90aa1e10
......@@ -22,6 +22,8 @@
all-provided-systems
:key #'get-release-name
:test #'string=)))
(unless first-system-found
(error "Release not found"))
(ql-dist:provided-systems (ql-dist:release first-system-found))))
(defun get-trimmed-system-name (system)
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment