Builds client SSR approach, sunsets old cljs.
This commit is contained in:
@@ -36,14 +36,20 @@
|
||||
(sort-by :created-at)
|
||||
reverse))
|
||||
|
||||
(defn is-background-job? [task]
|
||||
|
||||
(defn is-background-job?
|
||||
"This function checks whether a given task is a background job.
|
||||
It does this by checking the environment of the task's container definitions for an environment variable
|
||||
with the name 'INTEGREAT_JOB'. If such a variable exists, the function returns true, otherwise, it returns false.
|
||||
Parameters: task - a map representing the task to be checked.
|
||||
Returns: true if the task is a background job, false otherwise."
|
||||
[task]
|
||||
(->> task
|
||||
:task-definition
|
||||
:container-definitions
|
||||
(mapcat :environment)
|
||||
(filter (comp #{"INTEGREAT_JOB"} :name))
|
||||
seq))
|
||||
|
||||
(defn task-definition->job-name [task-definition]
|
||||
(->> (:container-definitions task-definition)
|
||||
(mapcat :environment)
|
||||
|
||||
1721
src/clj/auto_ap/ssr/admin/clients.clj
Normal file
1721
src/clj/auto_ap/ssr/admin/clients.clj
Normal file
File diff suppressed because it is too large
Load Diff
0
src/clj/auto_ap/ssr/admin/sales_powerqueries.clj
Normal file
0
src/clj/auto_ap/ssr/admin/sales_powerqueries.clj
Normal file
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
Reference in New Issue
Block a user