diff options
| -rw-r--r-- | lisp/octopus/octopus.lisp | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/octopus/octopus.lisp b/lisp/octopus/octopus.lisp index 3d933f5..c242d54 100644 --- a/lisp/octopus/octopus.lisp +++ b/lisp/octopus/octopus.lisp @@ -451,6 +451,7 @@ as an input filter are stored here for the ride through the queue.") (string= (id x) (cdr (assoc :*project-id deployment)))) projects) when (and (and environment project) + (filter-match-p environment-filter `(,(name environment))) (filter-match-p project-filter `(,(name project)))) collect (make-instance 'octopus-deployment :id (cdr (assoc :*id deployment)) |