diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2015-03-17 09:33:45 +0000 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2015-03-17 09:33:45 +0000 |
commit | 19b5829b093f766a53882c71e6c78c8ed9557156 (patch) | |
tree | f21d5709a705f5db0be4453627e5f384a59b9007 | |
parent | 2b6437f5c5bb9b13d3a6f22c164abc0801a206b7 (diff) | |
download | sariulclocks-19b5829b093f766a53882c71e6c78c8ed9557156.tar.gz |
clock div should be id not class
-rw-r--r-- | src/sariulclocks.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/sariulclocks.hs b/src/sariulclocks.hs index 2b34ce3..8bdb4b4 100644 --- a/src/sariulclocks.hs +++ b/src/sariulclocks.hs @@ -70,7 +70,7 @@ clocks = do case leftClockType of CountUpClock -> "activity-countup" CountDownClock -> "activity-countdown" - let leftClockClock = thediv ! [strAttr "class" leftClockClockDiv] << noHtml + let leftClockClock = thediv ! [strAttr "id" leftClockClockDiv] << noHtml let leftClockButtons = makeLeftClockButtons leftClockType let leftClock = (<<) clockColumn $ (h1 << ("Activity time" +++ " " +++ leftClockToggle)) |