projects
/
hs-java.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
33dc6f7
)
jar: use readAllJAR if there're no manifestEntries
author
Bernhard Urban
<lewurm@gmail.com>
Sat, 19 May 2012 19:13:20 +0000
(21:13 +0200)
committer
Bernhard Urban
<lewurm@gmail.com>
Sat, 19 May 2012 19:13:20 +0000
(21:13 +0200)
Java/JAR.hs
patch
|
blob
|
history
diff --git
a/Java/JAR.hs
b/Java/JAR.hs
index 93128b2e138909551412c369992064f300e5eb97..6188dd79610c7863506f50111ac49e550186c2de 100644
(file)
--- a/
Java/JAR.hs
+++ b/
Java/JAR.hs
@@
-46,6
+46,7
@@
readJAR jarfile = do
return (Just forest)
case r of
Nothing -> readAllJAR jarfile
return (Just forest)
case r of
Nothing -> readAllJAR jarfile
+ Just [] -> readAllJAR jarfile
Just f -> return f
-- | Add given JAR file to ClassPath
Just f -> return f
-- | Add given JAR file to ClassPath