diff options
| author | Matthias Schiffer <mschiffer@universe-factory.net> | 2011-07-16 15:55:31 +0200 |
|---|---|---|
| committer | Matthias Schiffer <mschiffer@universe-factory.net> | 2011-07-16 15:55:31 +0200 |
| commit | b66d6690d8a062053268b3246a2a55cbff46410d (patch) | |
| tree | 2e111ee0a0c90796480cb5f1e0675aa33f829966 /lib/Phi/Widgets/Clock.hs | |
| parent | 8854f0aec4b882324649d3a5ce1c99e8af9862d7 (diff) | |
| download | phi-b66d6690d8a062053268b3246a2a55cbff46410d.tar phi-b66d6690d8a062053268b3246a2a55cbff46410d.zip | |
Taskbar: Sort windows by screen
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 3e88b0e..7172f77 100644 --- a/lib/Phi/Widgets/Clock.hs +++ b/lib/Phi/Widgets/Clock.hs @@ -57,7 +57,7 @@ instance WidgetClass Clock where minSize (Clock config ) = clockSize config - render (Clock config) (ClockState time) w h = do + render (Clock config) (ClockState time) w h _ = do time <- liftIO getZonedTime let (r, g, b, a) = fontColor config str = formatTime defaultTimeLocale (clockFormat config) time |