diff --git a/Handler/Demand.hs b/Handler/Demand.hs index ef6cae4..7384281 100644 --- a/Handler/Demand.hs +++ b/Handler/Demand.hs @@ -19,8 +19,4 @@ import Import getDemandR :: Int -> Handler Html getDemandR level = defaultLayout $ do - let audio = lookup level $ [1..] `zip` map StaticR - [audio_air_alarm_mp3, - audio_nuclear_alarm_mp3, - audio_alarm_loud_pulsating_mp3] $(widgetFile "demand") diff --git a/static/audio/air-alarm.mp3 b/static/audio/air-alarm.mp3 deleted file mode 100644 index 3fc0fa2..0000000 Binary files a/static/audio/air-alarm.mp3 and /dev/null differ diff --git a/static/audio/alarm-loud-pulsating.mp3 b/static/audio/alarm-loud-pulsating.mp3 deleted file mode 100644 index b094048..0000000 Binary files a/static/audio/alarm-loud-pulsating.mp3 and /dev/null differ diff --git a/static/audio/nuclear-alarm.mp3 b/static/audio/nuclear-alarm.mp3 deleted file mode 100644 index 000569d..0000000 Binary files a/static/audio/nuclear-alarm.mp3 and /dev/null differ diff --git a/templates/demand.hamlet b/templates/demand.hamlet index 1dcee40..3183890 100644 --- a/templates/demand.hamlet +++ b/templates/demand.hamlet @@ -2,6 +2,3 @@ $doctype 5
_{MsgPurchaseDebtful} - -$maybe src <- audio -