Function: org-agenda-filter-effort-form

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

Signature

(org-agenda-filter-effort-form E)

Documentation

Return the form to compare the effort of the current line with what E says.

E looks like "+<2:25".

Source Code

;; Defined in /usr/src/emacs/lisp/org/org-agenda.el.gz
(defun org-agenda-filter-effort-form (e)
  "Return the form to compare the effort of the current line with what E says.
E looks like \"+<2:25\"."
  (let (op)
    (setq e (substring e 1))
    (setq op (string-to-char e) e (substring e 1))
    (setq op (cond ((equal op ?<) '<=)
		   ((equal op ?>) '>=)
		   ((equal op ??) op)
		   (t '=)))
    (list 'org-agenda-compare-effort (list 'quote op)
	  (org-duration-to-minutes e))))