               import-ns   (export-task-namespaces initial-env)
               scriptforms (emit boot? args userforms localforms bootforms import-ns)
               scriptstr   (binding [*print-meta* true]
-                            (str (string/join "\n\n" (map pr-str scriptforms)) "\n"))]
+                            (str (string/join "\n\n" (map pr-boot-form scriptforms)) "\n"))]
 
           (when (:boot-script opts) (util/exit-ok (print scriptstr)))
 

          base-pat  (re-pattern (format "^#!\\s*/usr/bin/env\\s+\\Q%s\\E(?:\\s+.*)?$" base-path))]
      (or (re-find full-pat bang-line) (re-find base-pat bang-line)))))

(defn -main [pod-id worker-pod shutdown-hooks [arg0 & args :as args*]]
  (when (not= (boot.App/getVersion) (boot.App/getBootVersion))
    (let [url "https://github.com/boot-clj/boot#install"]

  (:require
    [clojure.java.io             :as io]
    [clojure.string              :as string]
    [clojure.pprint              :as pp]
    [boot.pod                    :as pod]
    [boot.core                   :as core]
    [boot.file                   :as file]
