view src/rlm/classpath_utils.clj @ 3:c8e35134bf8e

working on qotd.
author Robert McIntyre <rlm@mit.edu>
date Wed, 18 Jan 2012 05:18:57 -0700
parents 78a630e650d2
children
line wrap: on
line source
1 (ns rlm.classpath-utils
2 (:require [clojure.contrib [duck-streams :as ds]])
3 (:use [clojure.contrib java-utils]))
6 (defn classpath []
7 (get-system-property "java.class.path"))
10 (defn add-to-classpath [file-name]
11 (wall-hack-method java.net.URLClassLoader
12 'addURL [java.net.URL]
13 (ClassLoader/getSystemClassLoader)
14 (.toURL (ds/file-str file-name))))