From a6ce6178b45922c228b042c24368d65ec2d6f373 Mon Sep 17 00:00:00 2001
From: Bernhard Urban <lewurm@gmail.com>
Date: Sat, 19 May 2012 21:13:20 +0200
Subject: [PATCH] jar: use readAllJAR if there're no manifestEntries

---
 Java/JAR.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Java/JAR.hs b/Java/JAR.hs
index 93128b2..6188dd7 100644
--- a/Java/JAR.hs
+++ b/Java/JAR.hs
@@ -46,6 +46,7 @@ readJAR jarfile = do
                       return (Just forest)
   case r of
     Nothing -> readAllJAR jarfile
+    Just [] -> readAllJAR jarfile
     Just f  -> return f
 
 -- | Add given JAR file to ClassPath
-- 
2.25.1