emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [O] Why navigating in Org mode is so slow in overview mode?


From: Sebastien Vauban
Subject: Re: [O] Why navigating in Org mode is so slow in overview mode?
Date: Mon, 22 Jun 2015 10:21:58 +0200
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/24.5 (windows-nt)

Gregor Zattler <address@hidden> writes:
> * Nicolas Goaziou <address@hidden> [17. Jun. 2015]:
>> Gregor Zattler <address@hidden> writes:
>>> I would like to help but need help myself on how to produce
>>> profiler reports.
>> 
>> M-x profiler-start
>> 
>> Do something slow
>> 
>> M-x profiler-report
>
> Thanks, this seemed rather easy and I open the org file in
> question in overview now:
>
> - most of the time it’s not slow! That’s great and a big
>   difference to months ago, when it was slow very often.
>
> - but there some hangs now and then.  At that moment I cannot
>   start the profiler.  If I start the profiler at the
>   beginning of using this org file and stop it maybe hours later
>   after something was slow: Would such report be helpful? 

FWIW, I've always used:

--8<---------------cut here---------------start------------->8---
  ;; Do not switch to OVERVIEW at startup.
  (setq org-startup-folded nil)
--8<---------------cut here---------------end--------------->8---

and I don't see any particular slowdown for my Org files:

--8<---------------cut here---------------start------------->8---
(Info) Found file 
~/Public/Repositories/org-mode/lisp/../doc/library-of-babel.org in 1.28 s
(Info) Found file ~/org/personal/travaux-listing.org in 2.32 s
(Info) Found file ~/org/personal/travaux.org in 0.28 s
(Info) Found file ~/org/personal/conso.txt in 1.71 s
(Info) Found file ~/org/notes/Notes-on-Lisp.txt in 0.61 s
(Info) Found file ~/org/personal/Personal.org in 0.97 s
--8<---------------cut here---------------end--------------->8---

PS- Code to get the above timings:

--8<---------------cut here---------------start------------->8---
  (defadvice find-file (around my/find-file activate)
    "Open the file named FILENAME and report time spent."
    (let ((filename (ad-get-arg 0))
          (find-file-time-start (float-time)))
      (message "(Info) Finding file %s..." filename)
      ad-do-it
      (message "(Info) Found file %s in %.2f s" filename
               (- (float-time) find-file-time-start))))
--8<---------------cut here---------------end--------------->8---

Best regards,
  Seb

-- 
Sebastien Vauban




reply via email to

[Prev in Thread] Current Thread [Next in Thread]