                                         (< (:val slice) max))
                                slice))
                            slices)]
-      (println (str (:perc slice) "% (" (pretty-file-size num-copied-bytes)  ") completed")))))
+      (print-if-verbose (str (:perc slice) "% (" (pretty-file-size num-copied-bytes)  ") completed")))))
 
 (defn- remote-file-copy [in-stream out-stream file-size]
   "Similar to  the corresponding implementation of #'do-copy in 'clojure.java.io

        slices   (percentage-slices file-size 100)]
    (loop [bytes-copied 0]
      (let [size (.read in-stream buffer)]
        (when *verbose-overtone-file-helpers*
          (print-file-copy-status bytes-copied size file-size slices))
        (when (pos? size)
          (do (.write out-stream buffer 0 size)
              (recur (+ size bytes-copied))))))
    (when *verbose-overtone-file-helpers*
      (println "Download successful"))))

(defn- download-file-without-timeout
  "Downloads remote file at url to local file specified by target path. Has

         (catch Exception e
           (rm-rf! path)
           (Thread/sleep wait-t)
           (print-if-verbose (str "Download timed out. Retry " (inc attempts-made) ": " url ))
           (download-file* url path timeout n-retries wait-t (inc attempts-made)))))))

(defn- print-download-file
  [url]
  (let [size   (remote-file-size url)
        p-size (pretty-file-size size)]
    (print-if-verbose (str "Downloading file (" p-size ") - "  url))))

(defn download-file
  "Downloads the file pointed to by url to local path. If no timeout
