gistfile1.clj

(defscript jre-lib-security [])
(defimpl jre-lib-security :default []
  (str @(update-java-alternatives -l "|" cut "-d ' '" -f 3 "|" head -1)
       "/jre/lib/security/"))

(defn security-file
  "Installs JCE policy jars (string paths, please) in the remote
   JAVA_HOME's lib/security directory, enabling the use of \"unlimited strength\"
   crypto implementations.  Options are as for remote-file."
  [filename & options]
  (apply remote-file (script (str (jre-lib-security) "/" ~filename)) options))