aboutsummaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2015-03-17 09:33:45 +0000
committerSean Whitton <spwhitton@spwhitton.name>2015-03-17 09:33:45 +0000
commit19b5829b093f766a53882c71e6c78c8ed9557156 (patch)
treef21d5709a705f5db0be4453627e5f384a59b9007
parent2b6437f5c5bb9b13d3a6f22c164abc0801a206b7 (diff)
downloadsariulclocks-19b5829b093f766a53882c71e6c78c8ed9557156.tar.gz
clock div should be id not class
-rw-r--r--src/sariulclocks.hs2
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))