hpage 0.8.1 → 0.8.2

raw patch · 3 files changed

+3/−3 lines, 3 files

Files

• hpage.cabal +1/−1
• src/HPage/GUI/Dialogs.hs +1/−1
• src/HPage/GUI/SplashScreen.hs +1/−1

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

@@ -15,7 +15,7 @@  aboutDialog :: Window a -> FilePath -> IO () aboutDialog win aboutFile =-    htmlDialog win "About \955Page" (sz 400 500) $ "file://" ++ aboutFile+    htmlDialog win "About \955Page" (sz 400 500) aboutFile  hayooDialog :: Window a -> String -> IO () hayooDialog win query =

@@ -67,7 +67,7 @@         img <- imageFile         htmlw <- htmlWindowCreate win idAny (rect (point 0 0) (sz 870 176)) wxHW_SCROLLBAR_NEVER ""         htmlWindowSetBorders htmlw 0-        htmlWindowSetPage htmlw $ "<img src='file://" ++ img ++ "' />"+        htmlWindowSetPage htmlw $ "<img src='" ++ img ++ "' />"                  caption <- staticText win [text := "Loading..."]