tec/org-mode
tec/org-mode
1
0
Fork 0
forked from mirrors/org-mode
Code Pull requests Releases Activity

org-clock.el (org-clock-put-overlay): Minor enhancements

Browse source 
* org-clock.el (org-clock-put-overlay): Don't use a line of
dots anymore.  Enhance display of time.

Thanks to Noah Slater for suggesting this.
This commit is contained in:
Bastien Guerry 2014-04-17 13:10:09 +02:00
parent 1a27bed477
commit 13230e3a66
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/org-clock.el
View file

@ -1863,9 +1863,9 @@ will be easy to remove."
tx (concat (buffer-substring (1- (point)) (point))
(make-string
(max 0 (- (- c (current-column))
(length (org-get-at-bol 'line-prefix)))) ?.)
(length (org-get-at-bol 'line-prefix)))) ? )
(org-add-props
(concat " " (org-minutes-to-clocksum-string time) " ")
(format " %9s " (org-minutes-to-clocksum-string time))
(list 'face 'org-clock-overlay))
""))
(if (not (featurep 'xemacs))