msyds/rlp
1
0
Fork 0
Code Issues 4 Pull Requests Actions Packages Projects Releases 2 Wiki Activity

clj style

Browse Source
This commit is contained in:
crumbtoo
2024-04-02 14:45:41 -06:00
parent 9977002f82
commit 7a065ff12b
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
find-build.clj
View File

@@ -9,5 +9,5 @@
n (count paths)] n (count paths)]
(cond (< 1 n) (die ">1 build directories found. run `cabal clean`.") (cond (< 1 n) (die ">1 build directories found. run `cabal clean`.")
(< n 1) (die "no build directories found. this shouldn't happen lol") (< n 1) (die "no build directories found. this shouldn't happen lol")
:else (-> (first paths) fs/real-path str println))) :else (-> paths first fs/real-path str println)))