emacs-orgmode
[Top][All Lists]
Advanced

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

Re: [Orgmode] Speeding up agenda display


From: Carsten Dominik
Subject: Re: [Orgmode] Speeding up agenda display
Date: Wed, 30 Dec 2009 20:20:24 +0100

Hi Andrew,

could you please also instrument your ajk/ functions for profiling and repeat the experiment? And show the code of all these functions, not only some (I am missing for example `ajk/org-agenda-skip-if-due- soon'....

Also:

- Are you using property inheritance?
- Are you relying on tag inheritance to check for @yard and @home?
- Are you using the latest version of Org-mode?

Thanks

- Carsten

On Dec 30, 2009, at 8:06 PM, Andrew J. Korty wrote:

My agenda views take a couple seconds to build, and I'd like them to be faster. I'm posting a portion of configuration and some profiling results here in case anyone can see any opportunities for optimization.

Some background: I don't use the diary at all -- this agenda view exists only to show me tasks that are due soon (and in this case, not tagged with @yard or @home).

Thanks,
ajk

(setq org-agenda-custom-commands
     '(("o" "Due at Office" agenda ""
        ((org-agenda-skip-function
          '(or (org-agenda-skip-entry-if '(notdeadline))
               (ajk/org-agenda-skip-if-not-due-soon)
               (ajk/org-agenda-skip-if-tagged-for-home)))))))

(defun ajk/org-skip-position ()
 (or (save-excursion
       (outline-next-heading)
       (point))
     (point-max)))

(defun ajk/org-agenda-skip-if-not-due-soon ()
 (unless (ajk/org-agenda-skip-if-due-soon)
   (ajk/org-skip-position)))

(defun ajk/org-agenda-skip-if-tagged-for-home ()
 (org-back-to-heading t)
 (let ((tags (org-get-tags)))
   (if (or (member "@home" tags)
           (member "@yard" tags))
       (ajk/org-skip-position))))

(defun ajk/org-agenda-skip-if-action ()
 (if (org-get-todo-state)
     (ajk/org-skip-position)))

org-agenda 1 2.017599 2.017599 org-let 1 1.33683 1.33683 org-agenda-list 1 1.336819 1.336819 org-agenda-get-day-entries 1 1.30812 1.30812 org-entry-get 422 0.9243140000 0.0021903175 org-entry-properties 416 0.9203020000 0.0022122644 org-get-tags-at 418 0.6899759999 0.0016506602 org-agenda-get-restriction-and-command 1 0.680728 0.680728 org-agenda-get-scheduled 1 0.663837 0.663837 org-up-heading-safe 1055 0.6547349999 0.0006206018 org-agenda-get-deadlines 1 0.545852 0.545852 org-agenda-skip-entry-if 416 0.1982539999 0.0004765721 org-agenda-skip-if 416 0.1969610000 0.0004734639 org-back-to-heading 2439 0.1005620000 4.123...e-05 org-agenda-get-timestamps 1 0.094435 0.094435 org-prepare-agenda 1 0.02532 0.02532 org-prepare-agenda-buffers 1 0.024896 0.024896 org-refresh-category-properties 1 0.012516 0.012516 org-outline-level 1696 0.0119610000 7.052...e-06 org-deadline-close 178 0.0085670000 4.812...e-05 org-agenda-skip 416 0.0071490000 1.718...e-05 org-get-tags-string 424 0.0054299999 1.280...e-05 org-days-to-time 178 0.0048369999 2.717...e-05 org-at-date-range-p 101 0.0044149999 4.371...e-05 org-time-string-to-time 178 0.0023639999 1.328...e-05 org-get-todo-state 116 0.0021619999 1.863...e-05 org-agenda-get-blocks 1 0.002077 0.002077 org-entry-is-done-p 113 0.0019640000 1.738...e-05 org-finalize-agenda 1 0.001947 0.001947 org-agenda-dim-blocked-tasks 1 0.001868 0.001868 org-agenda-get-sexps 1 0.001698 0.001698 org-split-string 633 0.0016380000 2.587...e-06 org-get-property-block 6 0.001411 0.0002351666 org-on-heading-p 424 0.0013999999 3.301...e-06 org-parse-time-string 183 0.0013529999 7.393...e-06 org-block-todo-from-children-or-siblings-or-parent 2 0.001044 0.000522 org-format-agenda-item 2 0.000966 0.000483 org-fit-window-to-buffer 1 0.000891 0.000891 org-get-effort 2 0.000815 0.0004075 org-remove-uniherited-tags 627 0.0007940000 1.266...e-06 org-get-wdays 180 0.0004619999 2.566...e-06 org-get-category 419 0.0004180000 9.976...e-07 org-trim 111 0.0003930000 3.540...e-06 org-agenda-files 3 0.000329 0.0001096666 org-add-prop-inherited 250 0.0003230000 1.292...e-06 org-switch-to-buffer-other-window 1 0.000287 0.000287 org-time-string-to-absolute 5 0.0002600000 5.200...e-05 org-agenda-mode 1 0.00025 0.00025 org-finalize-agenda-entries 1 0.000224 0.000224 org-get-priority 2 0.000195 9.75e-05 org-get-tags 8 0.000177 2.2125e-05 org-check-agenda-file 2 0.000159 7.95e-05 org-closest-date 4 0.000158 3.95e-05 org-agenda-highlight-todo 2 0.000152 7.6e-05 org-get-agenda-file-buffer 2 0.000144 7.2e-05 org-find-base-buffer-visiting 2 0.000133 6.65e-05 org-uniquify 5 0.000129 2.579...e-05 org-date-to-gregorian 8 8.199...e-05 1.024...e-05 org-days-to-iso-week 3 5.499...e-05 1.833...e-05 org-compile-prefix-format 1 5.2e-05 5.2e-05 org-agenda-format-date-aligned 1 4.6e-05 4.6e-05 org-add-props 9 3.999...e-05 4.444...e-06 org-agenda-new-marker 4 3.3e-05 8.25e-06 org-agenda-todayp 2 3.3e-05 1.65e-05 org-agenda-add-inherited-tags 2 2.8e-05 1.4e-05 org-agenda-align-tags 1 2.5e-05 2.5e-05 org-entries-lessp 1 2.3e-05 2.3e-05 org-agenda-fontify-priorities 1 1.5e-05 1.5e-05 org-activate-bracket-links 1 1e-05 1e-05 org-get-at-bol 4 9.999...e-06 2.499...e-06 org-agenda-mark-header-line 1 8e-06 8e-06 org-agenda-deadline-face 2 8e-06 4e-06 org-agenda-set-mode-name 1 7e-06 7e-06 org-agenda-add-time-grid-maybe 1 7e-06 7e-06 org-hh:mm-string-to-minutes 1 7e-06 7e-06 org-add-hook 2 7e-06 3.5e-06 org-region-active-p 1 6e-06 6e-06 org-overlays-in 3 5.999...e-06 2e-06 org-agenda-mark-clocking-task 1 5e-06 5e-06 org-downcase-keep-props 2 4e-06 2e-06 org-float-time 4 4e-06 1e-06 org-get-todo-face 2 4e-06 2e-06 org-before-change-function 1 4e-06 4e-06 org-agenda-reset-markers 1 3e-06 3e-06 org-agenda-post-command-hook 1 3e-06 3e-06 org-file-menu-entry 1 3e-06 3e-06 org-unhighlight 1 3e-06 3e-06 org-set-sorting-strategy 1 1e-06 1e-06 org-fit-agenda-window 1 1e-06 1e-06 org-agenda-ndays-to-span 1 1e-06 1e-06 org-font-lock-add-tag-faces 1 1e-06 1e-06



_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
address@hidden
http://lists.gnu.org/mailman/listinfo/emacs-orgmode

- Carsten







reply via email to

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