From 03936a50f4fe9a261577d467098ed1080c61cb6e Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Tue, 2 Jun 2015 22:01:06 +0200 Subject: [PATCH] org-colview: Tiny speed-up * lisp/org-colview.el (org-columns): Use buffer position instead of line number. --- lisp/org-colview.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/org-colview.el b/lisp/org-colview.el index c84b0eb52..bc6b2dd77 100644 --- a/lisp/org-colview.el +++ b/lisp/org-colview.el @@ -691,7 +691,7 @@ When COLUMNS-FMT-STRING is non-nil, use it as the column format." (cache (org-map-entries (lambda () - (cons (org-current-line) + (cons (point) (mapcar (lambda (p) (cons p (org-entry-get nil p 'selective t))) @@ -711,7 +711,7 @@ When COLUMNS-FMT-STRING is non-nil, use it as the column format." truncate-lines)) (setq truncate-lines t) (dolist (x cache) - (org-goto-line (car x)) + (goto-char (car x)) (org-columns-display-here (cdr x)))))))) (eval-when-compile (defvar org-columns-time)) -- 2.11.4.GIT