diff options
author | David Arroyo Menendez <davidam9@riseup.net> | 2013-11-16 20:16:03 +0100 |
---|---|---|
committer | David Arroyo Menendez <davidam9@riseup.net> | 2013-11-16 20:16:03 +0100 |
commit | d8e149eb76219ea45114cac796db851e452152a3 (patch) | |
tree | ae6d84725c9aa2e48e20079cc04e27b1438b33a8 | |
parent | 2de63285fedd9f5d64cfc3b4a369216fc297a3fe (diff) | |
download | org-mode-d8e149eb76219ea45114cac796db851e452152a3.tar.gz |
All functions must start by org-effectiveness
-rw-r--r-- | contrib/lisp/org-effectiveness.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/contrib/lisp/org-effectiveness.el b/contrib/lisp/org-effectiveness.el index c42925d..a872cb2 100644 --- a/contrib/lisp/org-effectiveness.el +++ b/contrib/lisp/org-effectiveness.el @@ -73,22 +73,22 @@ (setq effectiveness (* 100 (/ done (+ done canc))))) (message "Effectiveness: %f" effectiveness)))) -(defun org-keywords-in-date(keyword date) +(defun org-effectiveness-keywords-in-date(keyword date) (interactive "sKeyword: \nsDate: " keyword date) (setq count (count-matches (concat keyword ".*\n.*" date))) (message (concat "%sS: %d" keyword count))) -(defun org-dones-in-date(date) +(defun org-effectiveness-dones-in-date(date) (interactive "sGive me a date: " date) (setq count (count-matches (concat "DONE.*\n.*" date))) (message "DONES: %d" count)) -(defun org-todos-in-date(date) +(defun org-effectivenes-todos-in-date(date) (interactive "sGive me a date: " date) (setq count (count-matches (concat "TODO.*\n.*" date))) (message "TODOS: %d" count)) -(defun org-canceled-in-date(date) +(defun org-effectiveness-canceled-in-date(date) (interactive "sGive me a date: " date) (setq count (count-matches (concat "CANCEL+ED.*\n.*" date))) (message "CANCELEDS: %d" count)) |