profile details

profile code

(lambda()
  (define (time-machine cmd)
          (let ((time-cmd (string-append "cd "
                                         "/etc/byggsteg/job-clone/"
                                         "maak/trunk"
                                         " && "
                                         "sudo guix time-machine --channels=channels.scm --"
                                         " shell -f guix.scm -- ~a")))
            (format #f time-cmd cmd)))

  (list
   `((task . "trivial")
     (project . "maak")
     (branch-name . "trunk")
     (clone-url . "https://codeberg.org/jjba23/maak.git")
     (trivial-cmds . ,(list (time-machine "maak test"))))
   `((task . "trivial")
     (project . "maak")
     (branch-name . "trunk")
     (clone-url . "https://codeberg.org/jjba23/maak.git")
     (trivial-cmds . ,(list (time-machine "maak deploy"))))))