hpage 0.4.1 → 0.4.2

raw patch · 2 files changed

+3/−3 lines, 2 files

Files

hpage.cabal +1/−1
src/HPage/Control.hs +2/−2

hpage.cabal view

@@ -1,5 +1,5 @@ name: hpage-version: 0.4.1+version: 0.4.2 cabal-version: >=1.6 build-type: Custom license: BSD3

src/HPage/Control.hs view

@@ -466,7 +466,7 @@                         confirmRunning                         syncRun $ do                                     mns <- Hint.getLoadedModules-                                    mis <- mapM Hint.isModuleInterpreted mns+                                    let mis = map (>0) [1..]                                     return $ zipWith ModDesc mns mis   getImportedModules :: HPage [Hint.ModuleName]@@ -622,7 +622,7 @@                         confirmRunning                         asyncRun $ do                                         mns <- Hint.getLoadedModules-                                        mis <- mapM Hint.isModuleInterpreted mns+                                        let mis = map (>0) [1..]                                         return $ zipWith ModDesc mns mis                                      getImportedModules' :: HPage (MVar [Hint.ModuleName])