     (let [template (slurp "data/template.xml")
           config   (update-template template git-repo branch)
           url      (str (job-name->url (update-jenkins-url jenkins-url jenkins-auth) job-name) "/config.xml")]
-          (println "URL to use: " url)
+          (log "URL to use: " url)
           (try
               (->> (send-configuration-xml-to-jenkins url config)
                    (ok-response-structure job-name "update" include-jenkins-reply?))

    "Read list of all jobs via Jenkins API."
    [jenkins-url job-list-part]
    (let [all-jobs-url (str jenkins-url job-list-part)]
        (println "Using the following URL to retrieve all Jenkins jobs: " all-jobs-url)
        (let [data (json/read-str (get-command all-jobs-url))]
            (if data
                (get data "jobs")

    "Read content of given filename from the job artifact."
    [jenkins-url job-name filename]
    (let [url (str (job-name->url jenkins-url job-name) "/lastSuccessfulBuild/artifact/" filename)]
        (log "Using the following URL to retrieve job results: " url)
        (try
            (slurp url)
            (catch Exception e
