Renamed custom job.

40ants · Feb 27, 2024 · 925dea2 · 925dea2
1 parent 2550776
commit 925dea2
Show file tree

Hide file tree

Showing 3 changed files with 9 additions and 6 deletions.
diff --git a/.github/workflows/ci.yml b/.github/workflows/ci.yml
@@ -146,7 +146,7 @@
         }
       ]
     },
-    "lisp-job": {
+    "check-ros-config": {
       "runs-on": "ubuntu-latest",
       "env": {
         "OS": "ubuntu-latest",

diff --git a/src/ci.lisp b/src/ci.lisp
@@ -50,7 +50,8 @@
           :qlfile "{% ifequal quicklisp_dist \"ultralisp\" %}
                    dist ultralisp http://dist.ultralisp.org
                    {% endifequal %}")
-         (40ants-ci/jobs/lisp-job:lisp-job :lisp "ccl-bin"
+         (40ants-ci/jobs/lisp-job:lisp-job :name "check-ros-config"
+                                           :lisp "ccl-bin"
                                            :steps ((40ants-ci/steps/sh:sh "Show Roswell Config"
                                                                           "ros config")))))
 

diff --git a/src/jobs/job.lisp b/src/jobs/job.lisp
@@ -52,13 +52,15 @@
 
 (defmethod initialize-instance :after ((job job) &rest initargs)
   (declare (ignore initargs))
+
   (unless (slot-boundp job 'name)
     (setf (slot-value job 'name)
           (string-downcase
-           (class-name (class-of job))))
-    (setf (slot-value job 'steps)
-          (mapcar #'ensure-step
-                  (slot-value job 'steps)))))
+           (class-name (class-of job)))))
+
+  (setf (slot-value job 'steps)
+        (mapcar #'ensure-step
+                (slot-value job 'steps))))
 
 
 (defmethod os :around ((job job))