                 :broadcast-group                (replace-socket-with-jgroups loc)
                 :discovery-group                (replace-socket-with-jgroups loc)
                 loc))))))
-  
+
 (defn transform-config [file]
   (let [in-file (io/file (jboss-dir) file)
         out-file in-file]

(defn slim-fs []
  (doseq [path ["appclient"
                "bin/appclient.bat" "bin/appclient.conf.bat"
                "bin/appclient.conf" "bin/appclient.sh" "bin/client"
                "bin/jconsole.bat" "bin/jconsole.sh" "bin/jdr.bat" "bin/jdr.sh"
                "bin/wsconsume.bat" "bin/wsconsome.sh" "bin/wsprovide.bat" "bin/wsprovide.sh"
                "bundles" "docs/examples" "docs/schema" "welcome-content"]]

(defn prep-for-slimming []
  (apply swap! extensions-to-remove conj fat-modules)
  (apply swap! subsystems-to-remove conj fat-modules)

  (swap! tags-to-remove conj
         (partial looking-at? :pooled-connection-factory)
         #(and (looking-at? :socket-binding %)
