Bläddra i källkod

Merge branch 'maint'

Nicolas Goaziou 10 år sedan
förälder
incheckning
ced4fa3205
1 ändrade filer med 4 tillägg och 7 borttagningar
  1. 4 7
      lisp/org-clock.el

+ 4 - 7
lisp/org-clock.el

@@ -2594,13 +2594,10 @@ from the dynamic block definition."
     total-time))
 
 (defun org-clocktable-indent-string (level)
-  (if (= level 1)
-      ""
-    (let ((str "\\__"))
-      (while (> level 2)
-	(setq level (1- level)
-	      str (concat str "___")))
-      (concat str " "))))
+  (if (= level 1) ""
+    (let ((str " "))
+      (dotimes (k (1- level) str)
+	(setq str (concat "\\emsp" str))))))
 
 (defun org-clocktable-steps (params)
   "Step through the range to make a number of clock tables."