Bläddra i källkod

Merge branch 'maint'

Nicolas Goaziou 9 år sedan
förälder
incheckning
b78a9badcd
1 ändrade filer med 2 tillägg och 0 borttagningar
  1. 2 0
      lisp/org-clock.el

+ 2 - 0
lisp/org-clock.el

@@ -2627,12 +2627,14 @@ from the dynamic block definition."
 	 ((eq formula '%)
 	  ;; compute the column where the % numbers need to go
 	  (setq pcol (+ 2
+			(length properties)
 			(if multifile 1 0)
 			(if level-p 1 0)
 			(if timestamp 1 0)
 			(min maxlevel (or ntcol 100))))
 	  ;; compute the column where the total time is
 	  (setq tcol (+ 2
+			(length properties)
 			(if multifile 1 0)
 			(if level-p 1 0)
 			(if timestamp 1 0)))