pull/3/head
Mathieu Lirzin 2016-07-01 16:44:46 +02:00
parent a62624301b
commit efef5c29c8
1 changed files with 3 additions and 3 deletions

View File

@ -59,9 +59,9 @@ Run Guix job from a git repository cloned in CACHEDIR.
DIR if required." DIR if required."
(or (file-exists? cachedir) (mkdir cachedir)) (or (file-exists? cachedir) (mkdir cachedir))
(with-directory-excursion cachedir (with-directory-excursion cachedir
(let ((name (job-name job)) (let ((name (job-spec-name spec))
(url (job-url job)) (url (job-spec-url spec))
(branch (job-branch job))) (branch (job-spec-branch spec)))
(or (file-exists? name) (system* "git" "clone" url name)) (or (file-exists? name) (system* "git" "clone" url name))
(with-directory-excursion name (with-directory-excursion name
(and (zero? (system* "git" "fetch")) (and (zero? (system* "git" "fetch"))