rewrote longpolling, trying to avoid duplication

does not work though. stupid JS
This commit is contained in:
Joey Hess 2012-07-30 18:01:41 -04:00
parent d1358cc96f
commit 502bc5d5f8
3 changed files with 51 additions and 52 deletions

View file

@ -146,6 +146,7 @@ autoUpdate :: Text -> Route WebApp -> Int -> Int -> Widget
autoUpdate ident gethtml ms_delay ms_startdelay = do
let delay = show ms_delay
let startdelay = show ms_startdelay
addScript $ StaticR longpolling_js
$(widgetFile "longpolling")
{- A display of currently running and queued transfers.