diff options
| author | Matthias Schiffer <mschiffer@universe-factory.net> | 2011-08-29 15:10:55 +0200 |
|---|---|---|
| committer | Matthias Schiffer <mschiffer@universe-factory.net> | 2011-08-29 15:10:55 +0200 |
| commit | 7a87ba6f2e3e864fb1c487c097e2cf17bfca2df6 (patch) | |
| tree | 2bf7bbce179721b7e932b9ca7fe3d2c2b74ba5eb /lib/Phi/Widgets/Clock.hs | |
| parent | e48e3a6fe01b63d693eb33260c26505f891f21a6 (diff) | |
| download | phi-7a87ba6f2e3e864fb1c487c097e2cf17bfca2df6.tar phi-7a87ba6f2e3e864fb1c487c097e2cf17bfca2df6.zip | |
Get rid of layout function
Diffstat (limited to 'lib/Phi/Widgets/Clock.hs')
| -rw-r--r-- | lib/Phi/Widgets/Clock.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Phi/Widgets/Clock.hs b/lib/Phi/Widgets/Clock.hs index a11ef9e..e232ef5 100644 --- a/lib/Phi/Widgets/Clock.hs +++ b/lib/Phi/Widgets/Clock.hs @@ -43,7 +43,7 @@ data ClockState = ClockState !ZonedTime deriving (Show, Eq) data ClockMessage = UpdateTime !ZonedTime deriving (Show, Typeable) instance Widget Clock ClockState (RenderCache Clock ClockState) where - initWidget (Clock _) phi _ = do + initWidget (Clock _) phi _ _ = do forkIO $ forever $ do time <- getZonedTime sendMessage phi $ UpdateTime time |