Remove intanglibe overlay
* org-colview.el (org-columns-display-here): * org-agenda.el (org-agenda-dim-blocked-tasks): Remove intanglible overlay. Suggested-by: Stefan Monnier <monnier@IRO.UMontreal.CA> <http://permalink.gmane.org/gmane.emacs.orgmode/96914> (Incl. original patch by Stefan).
This commit is contained in:
parent
cd7cbdcda8
commit
586e29618b
|
@ -3880,8 +3880,7 @@ dimming them."
|
||||||
e (point-at-eol)
|
e (point-at-eol)
|
||||||
ov (make-overlay b e))
|
ov (make-overlay b e))
|
||||||
(if invis1
|
(if invis1
|
||||||
(progn (overlay-put ov 'invisible t)
|
(overlay-put ov 'invisible t)
|
||||||
(overlay-put ov 'intangible t))
|
|
||||||
(overlay-put ov 'face 'org-agenda-dimmed-todo-face))
|
(overlay-put ov 'face 'org-agenda-dimmed-todo-face))
|
||||||
(overlay-put ov 'org-type 'org-blocked-todo))))))
|
(overlay-put ov 'org-type 'org-blocked-todo))))))
|
||||||
(when (org-called-interactively-p 'interactive)
|
(when (org-called-interactively-p 'interactive)
|
||||||
|
|
|
@ -236,7 +236,6 @@ This is the compiled version of the format.")
|
||||||
(setq ov (org-columns-new-overlay beg (point-at-eol)))
|
(setq ov (org-columns-new-overlay beg (point-at-eol)))
|
||||||
(overlay-put ov 'invisible t)
|
(overlay-put ov 'invisible t)
|
||||||
(overlay-put ov 'keymap org-columns-map)
|
(overlay-put ov 'keymap org-columns-map)
|
||||||
(overlay-put ov 'intangible t)
|
|
||||||
(overlay-put ov 'line-prefix "")
|
(overlay-put ov 'line-prefix "")
|
||||||
(overlay-put ov 'wrap-prefix "")
|
(overlay-put ov 'wrap-prefix "")
|
||||||
(push ov org-columns-overlays)
|
(push ov org-columns-overlays)
|
||||||
|
|
Loading…
Reference in New Issue