   (rest (file-seq (io/file (io/resource uri)))))
 
 (defn filename-as-text
+  "Turns 'some_file.clj' into 'Some file'."
   [filename]
   (str/capitalize
    (str/replace (str/replace filename #"_" " ") #".clj" "")))

  [entry]
  (re-matches (re-pattern (str example-dir ".*.clj")) (.getName entry)))

(defn examples-in-jar
  [uri]
  (with-open [jar (java.util.jar.JarFile. uri)]
    (doall (filter example-entry? (enumeration-seq (.entries jar))))))

(defn get-jar-path
  [uri]
  (re-find #"(?<=jar:file:).+(?=[!])" uri))


(ns clj-formal-specifications-app.examples
  (:require [clojure.string :as str]
            [clojure.java.io :as io]))

(def example-dir "public/examples/")

