diff options
| author | Carsten Dominik <carsten.dominik@gmail.com> | 2010-07-22 10:43:48 +0200 |
|---|---|---|
| committer | Carsten Dominik <carsten.dominik@gmail.com> | 2010-07-22 10:43:48 +0200 |
| commit | 1e48ae4259e0b4a18da53da17006d182c7c4650f (patch) | |
| tree | f4da2168a26081fcbef45a94f43db3ef062c7629 | |
| parent | 73304c5f467887cc64e1bc0e874fa45d20b38032 (diff) | |
| download | org-mode-1e48ae4259e0b4a18da53da17006d182c7c4650f.tar.gz | |
Column view: Fix indentation problem when org-indent-mode is active
* lisp/org-colview.el (org-columns-display-here): Use overlays to
overrule line prefix properties during column view.
| -rw-r--r-- | lisp/org-colview.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/org-colview.el b/lisp/org-colview.el index 4a599da..8c0ade2 100644 --- a/lisp/org-colview.el +++ b/lisp/org-colview.el @@ -228,7 +228,9 @@ This is the compiled version of the format.") (overlay-put ov 'org-columns-value (cdr ass)) (overlay-put ov 'org-columns-value-modified modval) (overlay-put ov 'org-columns-pom pom) - (overlay-put ov 'org-columns-format f)) + (overlay-put ov 'org-columns-format f) + (overlay-put ov 'line-prefix "") + (overlay-put ov 'wrap-prefix "")) (if (or (not (char-after beg)) (equal (char-after beg) ?\n)) (let ((inhibit-read-only t)) @@ -241,6 +243,8 @@ This is the compiled version of the format.") (overlay-put ov 'invisible t) (overlay-put ov 'keymap org-columns-map) (overlay-put ov 'intangible t) + (overlay-put ov 'line-prefix "") + (overlay-put ov 'wrap-prefix "") (push ov org-columns-overlays) (setq ov (make-overlay (1- (point-at-eol)) (1+ (point-at-eol)))) (overlay-put ov 'keymap org-columns-map) |