luciano/babashka
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

[#457] Add java.nio.file.PathMatcher

Browse source
This commit is contained in:
Michiel Borkent 2020-05-30 20:55:43 +02:00
parent 4d937406a8
commit 0389ed7127
4 changed files with 22 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
CHANGELOG.md
View file

@ -18,7 +18,6 @@ For a list of breaking changes, check [here](#breaking-changes)
Details about releases prior to v0.1.0 can be found Details about releases prior to v0.1.0 can be found
[here](https://github.com/borkdude/babashka/releases). [here](https://github.com/borkdude/babashka/releases).
## Breaking changes ## Breaking changes
### v0.0.90 ### v0.0.90

5
src/babashka/impl/classes.clj
View file

@ -146,6 +146,7 @@
java.nio.file.LinkOption java.nio.file.LinkOption
java.nio.file.NoSuchFileException java.nio.file.NoSuchFileException
java.nio.file.Path java.nio.file.Path
java.nio.file.PathMatcher
java.nio.file.Paths java.nio.file.Paths
java.nio.file.StandardCopyOption java.nio.file.StandardCopyOption
java.nio.file.attribute.FileAttribute java.nio.file.attribute.FileAttribute
@ -248,7 +249,9 @@
(instance? java.io.OutputStream v) (instance? java.io.OutputStream v)
java.io.OutputStream java.io.OutputStream
(instance? java.nio.file.FileSystem v) (instance? java.nio.file.FileSystem v)
java.nio.file.FileSystem))))) java.nio.file.FileSystem
(instance? java.nio.file.PathMatcher v)
java.nio.file.PathMatcher)))))
(def class-map (gen-class-map)) (def class-map (gen-class-map))

5
test/babashka/main_test.clj
View file

@ -350,7 +350,10 @@
(catch java.nio.file.FileAlreadyExistsException _ (catch java.nio.file.FileAlreadyExistsException _
(java.nio.file.Files/copy p p' (into-array [java.nio.file.StandardCopyOption/REPLACE_EXISTING]))))))" (java.nio.file.Files/copy p p' (into-array [java.nio.file.StandardCopyOption/REPLACE_EXISTING]))))))"
temp-path)) temp-path))
(is (.exists f2)))) (is (.exists f2))
(let [v (bb nil "-f" (.getPath (io/file "test" "babashka" "scripts" "glob.bb")))]
(is (vector? v))
(is (.exists (io/file (first v)))))))
(deftest future-print-test (deftest future-print-test
(testing "the root binding of sci/*out*" (testing "the root binding of sci/*out*"

14
test/babashka/scripts/glob.bb Normal file
View file

@ -0,0 +1,14 @@
(require '[clojure.java.io :as io])
(defn glob [pattern]
(let [matcher (.getPathMatcher
(java.nio.file.FileSystems/getDefault)
(str "glob:" pattern))]
(into []
(comp (filter #(.isFile %))
(filter #(.matches matcher (.normalize (.toPath %))))
(map #(.relativize (.toURI (io/file ".")) (.toURI %)))
(map #(.getPath %)))
(file-seq (io/file ".")))))
(glob "*/doc/*.md") ;;=> ["sci/doc/libsci.md" "babashka.nrepl/doc/intro.md"]