summaryrefslogtreecommitdiff
path: root/chess-display.el
diff options
context:
space:
mode:
authorJohn Wiegley <johnw@newartisans.com>2002-04-25 22:25:55 +0000
committerJohn Wiegley <johnw@newartisans.com>2002-04-25 22:25:55 +0000
commitc32bc8f78d17728ae4a8fd52eda5d60dfaa6375f (patch)
tree510b95d3bf791fc0d9ef62e110358e6a34537656 /chess-display.el
parent68157cc103685e1a6dfe1ff3e970e45cc0cba068 (diff)
*** no comment ***
Diffstat (limited to 'chess-display.el')
-rw-r--r--chess-display.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/chess-display.el b/chess-display.el
index 6bf858b..8c95d15 100644
--- a/chess-display.el
+++ b/chess-display.el
@@ -182,8 +182,10 @@ also view the same game."
(setq white (chess-ply-keyword last-ply :white)
black (chess-ply-keyword last-ply :black))))
(if (and white black)
- (format "W %02d:%02d B %02d:%02d "
+ (format "W %s%02d:%02d B %s%02d:%02d "
+ (if (and (< white 0) (= 0 (floor white))) "-" "")
(/ (floor white) 60) (% (abs (floor white)) 60)
+ (if (and (< black 0) (= 0 (floor black))) "-" "")
(/ (floor black) 60) (% (abs (floor black)) 60)))))
(defun chess-display-set-index (display index)