   (try
     (let [repo-name (repo-name application environment)
           options {:auto_init true :has-downloads false :has-issues false :has-wiki false :public false}
-          response (repos/create-org-repo organisation repo-name options)]
+          response (repos/create-org-repo organisation repo-name (merge-options options))]
       (if (busted? response)
         (do
           (with-logging-context {:response response}

(defn all-repositories
  "Gets all repositories in the organisation in Github."
  []
  (let [response (repos/org-repos organisation {:all_pages true})]
    (when-not (busted? response)
      (doall (map extract-repo-info (remove empty? response))))))


  [environment application]
  (try
    (let [repo-name (repo-name application environment)
          commits (repos/commits organisation repo-name github-options)]
      (map extract-commit-info (remove empty? commits)))
    (catch Exception e
      (with-logging-context {:application application
