Function: org-agenda-compare-effort

org-agenda-compare-effort is a byte-compiled function defined in org-agenda.el.gz.

Signature

(org-agenda-compare-effort OP VALUE)

Documentation

Compare the effort of the current line with VALUE, using OP.

If the line does not have an effort defined, return nil.

Source Code

;; Defined in /usr/src/emacs/lisp/org/org-agenda.el.gz
(defun org-agenda-compare-effort (op value)
  "Compare the effort of the current line with VALUE, using OP.
If the line does not have an effort defined, return nil."
  ;; `effort-minutes' property cannot be extracted directly from
  ;; current line but is stored as a property in `txt'.
  (let ((effort (get-text-property 0 'effort-minutes (org-get-at-bol 'txt))))
    (funcall op
	     (or effort (if org-agenda-sort-noeffort-is-high 32767 -1))
	     value)))