From 96950a3b40e462abf607377d509ebf14c7d4a1a1 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 8 Aug 2012 14:14:19 -0400 Subject: add pause/start and cancel buttons to transfer display --- templates/dashboard/transfers.hamlet | 48 ++++++++++++++++++++++-------------- templates/documentation/about.hamlet | 2 +- templates/sidebar/alert.hamlet | 4 +-- 3 files changed, 33 insertions(+), 21 deletions(-) (limited to 'templates') diff --git a/templates/dashboard/transfers.hamlet b/templates/dashboard/transfers.hamlet index b48ae6f6d..20d1b5e8a 100644 --- a/templates/dashboard/transfers.hamlet +++ b/templates/dashboard/transfers.hamlet @@ -5,21 +5,33 @@ $forall (transfer, info) <- transfers $with percent <- maybe "unknown" (showPercentage 0) $ percentComplete transfer info
-

- $maybe file <- associatedFile info - #{file} - $nothing - #{show $ transferKey transfer} - $case transferDirection transfer - $of Upload - → - $of Download - ← - #{maybe "unknown" Remote.name $ transferRemote info} - $with size <- maybe "unknown" (roughSize dataUnits True) $ keySize $ transferKey transfer - $if isJust $ startedTime info - #{percent} of #{size} - $else - queued (#{size}) -
-
+
+
+

+ $maybe file <- associatedFile info + #{file} + $nothing + #{show $ transferKey transfer} + $case transferDirection transfer + $of Upload + → + $of Download + ← + #{maybe "unknown" Remote.name $ transferRemote info} + $with size <- maybe "unknown" (roughSize dataUnits True) $ keySize $ transferKey transfer + $if isJust $ startedTime info + #{percent} of #{size} + $else + queued (#{size}) +
+
+
+
+ $if isNothing (startedTime info) +