[Emacs-diffs] emacs/lisp/org org-agenda.el

[Carsten Dominik]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Carsten Dominik <cdominik>      09/09/03 07:19:15

Modified files:
        lisp/org       : org-agenda.el 

Log message:
        2009-09-03  Carsten Dominik  <address@hidden>
        
                * org-agenda.el (org-agenda-dim-blocked-tasks): Make sure we are
                referencing the start of the line.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/org/org-agenda.el?cvsroot=emacs&r1=1.30&r2=1.31

Patches:
Index: org-agenda.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/org/org-agenda.el,v
retrieving revision 1.30
retrieving revision 1.31
diff -u -b -r1.30 -r1.31
--- org-agenda.el       2 Sep 2009 12:59:53 -0000       1.30
+++ org-agenda.el       3 Sep 2009 07:19:15 -0000       1.31
@@ -2573,7 +2573,9 @@
                                       :from 'todo
                                       :to 'done)))))))
            (if org-blocked-by-checkboxes (setq invis1 nil))
-           (setq b (if invis1 (max (point-min) (1- (point))) (point))
+           (setq b (if invis1
+                       (max (point-min) (1- (point-at-bol)))
+                     (point-at-bol))
                  e (point-at-eol)
                  ov (org-make-overlay b e))
            (if invis1