From a5fd76880291ea8135ee6b9a433082ed7fd11564 Mon Sep 17 00:00:00 2001 From: ckonstanski Date: Tue, 6 Jan 2026 18:56:24 -0700 Subject: [INF-18492] Automate Queue Retry and Log Streaming Retry octopus fix --- lisp/service/octopus-environments-with-roles-service.lisp | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) (limited to 'lisp/service/octopus-environments-with-roles-service.lisp') diff --git a/lisp/service/octopus-environments-with-roles-service.lisp b/lisp/service/octopus-environments-with-roles-service.lisp index 8cd494e..588d32d 100644 --- a/lisp/service/octopus-environments-with-roles-service.lisp +++ b/lisp/service/octopus-environments-with-roles-service.lisp @@ -40,8 +40,6 @@ (with-octopus (octopus) (let ((environments (get-octopus-environments-with-roles octopus :ode-only-p (string= "true" ode_only_p) - :roles (remove-if (lambda (x) - (org-ckons-core::null-or-empty-p x)) - (cl-ppcre:split "[, ]" roles))))) + :roles (split-text-input roles)))) (setf (results instance) environments) (setf (session-value :octopus-roles) roles))))) -- cgit v1.3