[Ho cleanups
Einar Karttunen <ekarttun@cs.helsinki.fi>**20060228153809] hunk ./Ho/Library.hs 9
-import Binary
hunk ./Ho/Library.hs 14
-import Control.Exception
hunk ./Ho/LibraryMap.hs 2
-    (libraryMapFind,libraryList,LibraryName,CheckSum
+    (libraryMapFind,libraryList
hunk ./Ho/LibraryMap.hs 5
+import Ho.Type
hunk ./Ho/LibraryMap.hs 8
-import Data.Char(isAlphaNum)
-import Data.List(intersperse,sort)
hunk ./Ho/LibraryMap.hs 9
-import Data.Version
hunk ./Ho/LibraryMap.hs 11
-import Text.ParserCombinators.ReadP
hunk ./Ho/LibraryMap.hs 12
-type CheckSum = Integer
-type LibraryName= String
hunk ./Ho/LibraryMap.hs 35
-getPM fp = do
+getPM fp = flip catch (\_ -> return Map.empty) $ do
hunk ./Ho/Type.hs 13
-import Ho.LibraryMap(LibraryName,CheckSum)
hunk ./Ho/Type.hs 26
+type CheckSum = Integer
+type LibraryName= String
+