diff options
author | Stuart Sierra <mail@stuartsierra.com> | 2010-01-20 15:39:56 -0500 |
---|---|---|
committer | Stuart Sierra <mail@stuartsierra.com> | 2010-01-20 15:39:56 -0500 |
commit | 2ede388a9267d175bfaa7781ee9d57532eb4f20f (patch) | |
tree | bb42002af196405d7e25cc4e30b4c1c9de5c06d5 /src/clojure/contrib/classpath.clj | |
parent | 1bc820d96048a6536706ff999e9892649b53c700 (diff) |
Move source files into Maven-style directory structure.
Diffstat (limited to 'src/clojure/contrib/classpath.clj')
-rw-r--r-- | src/clojure/contrib/classpath.clj | 39 |
1 files changed, 0 insertions, 39 deletions
diff --git a/src/clojure/contrib/classpath.clj b/src/clojure/contrib/classpath.clj deleted file mode 100644 index a5a1a6d3..00000000 --- a/src/clojure/contrib/classpath.clj +++ /dev/null @@ -1,39 +0,0 @@ -;;; classpath.clj: utilities for working with the Java class path - -;; by Stuart Sierra, http://stuartsierra.com/ -;; April 19, 2009 - -;; Copyright (c) Stuart Sierra, 2009. All rights reserved. The use -;; and distribution terms for this software are covered by the Eclipse -;; Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php) -;; which can be found in the file epl-v10.html at the root of this -;; distribution. By using this software in any fashion, you are -;; agreeing to be bound by the terms of this license. You must not -;; remove this notice, or any other, from this software. - - -(ns - #^{:author "Stuart Sierra", - :doc "Utilities for dealing with the JVM's classpath"} - clojure.contrib.classpath - (:require [clojure.contrib.jar :as jar]) - (:import (java.io File) - (java.util.jar JarFile))) - -(defn classpath - "Returns a sequence of File objects of the elements on CLASSPATH." - [] - (map #(File. %) - (.split (System/getProperty "java.class.path") - (System/getProperty "path.separator")))) - -(defn classpath-directories - "Returns a sequence of File objects for the directories on classpath." - [] - (filter #(.isDirectory %) (classpath))) - -(defn classpath-jarfiles - "Returns a sequence of JarFile objects for the JAR files on classpath." - [] - (map #(JarFile. %) (filter jar/jar-file? (classpath)))) - |