 
 (defn log-operation
     [job-name git-repo branch operation metadata]
-    (println "***" operation "***")
-    (println "job-name" job-name)
-    (println "git-repo" git-repo)
-    (println "branch"   branch)
-    (println "metadata" metadata))
+    (log "***" operation "***")
+    (log "job-name" job-name)
+    (log "git-repo" git-repo)
+    (log "branch"   branch)
+    (log "metadata" metadata))
 
 (defn send-configuration-xml-to-jenkins
     [url config]

(defn post-command
    [jenkins-url jenkins-auth job-name command]
    (let [url (str (job-name->url (update-jenkins-url jenkins-url jenkins-auth) job-name) "/" command)]
        (println "URL to use: " url)
        (http-client/post url {
                    :keystore "keystore"
                    :keystore-pass "changeit"

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