diff options
author | Bastien Guerry <bzg@altern.org> | 2013-03-15 11:43:27 +0100 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2013-03-15 11:43:27 +0100 |
commit | 450878fb215dcb3b4f940eaf6dd724080c3c4300 (patch) | |
tree | 7f0f969d7b1945df9bbc546924e37ddb98b4fc57 | |
parent | 1ca26a755aa8b0ac2b13513b2b09efc2c2f650ab (diff) | |
download | org-mode-450878fb215dcb3b4f940eaf6dd724080c3c4300.tar.gz |
Fix previous commit
-rw-r--r-- | lisp/org-clock.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org-clock.el b/lisp/org-clock.el index fd0758b..6eeb32b 100644 --- a/lisp/org-clock.el +++ b/lisp/org-clock.el @@ -2576,7 +2576,7 @@ from the dynamic block definition." (apply 'encode-time (org-parse-time-string te)))))) (setq tsb (if (eq step0 'week) - (- ts (* 86400 (- (nth (abs (- 7 ws)) (decode-time (seconds-to-time ts))) 1))) + (- ts (* 86400 (- (nth 6 (decode-time (seconds-to-time ts))) ws))) ts)) (setq p1 (plist-put p1 :header "")) (setq p1 (plist-put p1 :step nil)) |