summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBastien <bzg@gnu.org>2018-04-27 00:44:55 +0200
committerBastien <bzg@gnu.org>2018-04-27 00:44:55 +0200
commit8cdefed80b5ea02b17e5e6ec17175b0fd0c53d05 (patch)
tree9908f31a80318fb8d8eacc884174282221d7a738
parent25f99522adf1488f934e23328c735e879391a1c9 (diff)
downloadorg-mode-8cdefed80b5ea02b17e5e6ec17175b0fd0c53d05.tar.gz
org-colview.el: Possibly take linum-offset into account
* lisp/org-colview.el (org-columns--display-here-title): Possibly take linum-offset into account. Thanks to Eric S Fraga for reporting this.
-rw-r--r--lisp/org-colview.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/org-colview.el b/lisp/org-colview.el
index d7011f0..65d6c54 100644
--- a/lisp/org-colview.el
+++ b/lisp/org-colview.el
@@ -448,6 +448,7 @@ for the duration of the command.")
"Overlay the newline before the current line with the table title."
(interactive)
(let ((title "")
+ (linum-offset (line-number-display-width 'columns))
(i 0))
(dolist (column org-columns-current-fmt-compiled)
(pcase column
@@ -459,7 +460,7 @@ for the duration of the command.")
(setq-local org-previous-header-line-format header-line-format)
(setq org-columns-full-header-line-format
(concat
- (org-add-props " " nil 'display '(space :align-to 0))
+ (org-add-props " " nil 'display `(space :align-to ,linum-offset))
(org-add-props (substring title 0 -1) nil 'face 'org-column-title)))
(setq org-columns-previous-hscroll -1)
(add-hook 'post-command-hook 'org-columns-hscroll-title nil 'local)))