Update Main.hs
This commit is contained in:
parent
4346d4097a
commit
bc49d27bbb
1 changed files with 3 additions and 1 deletions
4
Main.hs
4
Main.hs
|
|
@ -13,7 +13,9 @@ import Data.GI.Base
|
|||
-- This function runs when the application is activated
|
||||
activate :: Gtk.Application -> IO ()
|
||||
activate app = do
|
||||
-- Create an Image widget from the file
|
||||
|
||||
-- todo: change to this:
|
||||
-- https://git.ajattix.org/hashirama/xcdat-Cwrapper/src/commit/dd731c93e1612e4001b0b3d6dd1465ea06189ab8/haskell.hs#L80
|
||||
image <- imageNewFromFile "/home/hashirama/image_test.jpg"
|
||||
|
||||
-- Set image to expand and fill available space
|
||||
|
|
|
|||
Loading…
Reference in a new issue