summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2015-06-02 22:01:06 +0200
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2015-06-02 22:01:06 +0200
commit03936a50f4fe9a261577d467098ed1080c61cb6e (patch)
tree3bcba61cb7fd3381c82d9612c77a12bf1cee6389
parentf1ee487218da00962eb8b67d1f5ec1f54a5a04db (diff)
downloadorg-mode-03936a50f4fe9a261577d467098ed1080c61cb6e.tar.gz
org-colview: Tiny speed-up
* lisp/org-colview.el (org-columns): Use buffer position instead of line number.
-rw-r--r--lisp/org-colview.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/org-colview.el b/lisp/org-colview.el
index c84b0eb..bc6b2dd 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))