Browse Source

org-habit.el: Fix bug while inserting habit graph in the agenda buffer.

* org-habit.el (org-habit-insert-consistency-graphs): Fix bug
while inserting habit graph in the agenda buffer.

TINYCHANGE
Thomas Morgan 13 years ago
parent
commit
490ef86497
1 changed files with 6 additions and 7 deletions
  1. 6 7
      lisp/org-habit.el

+ 6 - 7
lisp/org-habit.el

@@ -344,13 +344,12 @@ current time."
 	    (delete-char (min (+ 1 org-habit-preceding-days
 				 org-habit-following-days)
 			      (- (line-end-position) (point))))
-	    (insert (org-habit-build-graph
-		     habit
-		     (time-subtract moment
-				    (days-to-time org-habit-preceding-days))
-		     moment
-		     (time-add moment
-			       (days-to-time org-habit-following-days))))))
+	    (insert-before-markers
+	     (org-habit-build-graph
+	      habit
+	      (time-subtract moment (days-to-time org-habit-preceding-days))
+	      moment
+	      (time-add moment (days-to-time org-habit-following-days))))))
 	(forward-line)))))
 
 (defun org-habit-toggle-habits ()