tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

Fix typo in agenda local variable 

* lisp/org-agenda.el (org-agenda-filter-by-tag): Fix variable name typo

maybe-reftresh -> maybe-refresh
This commit is contained in:
Bernt Hansen 2011-04-14 03:05:25 +00:00 committed by Carsten Dominik
parent 383cb5dcaa
commit 4262dc1cbc
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lisp/org-agenda.el
View File

@ -5905,7 +5905,7 @@ to switch to narrowing."
(effort-prompt "")
(inhibit-read-only t)
(current org-agenda-filter)
maybe-reftresh a n tag)
maybe-refresh a n tag)
(unless char
(message
"%s by tag [%s ], [TAB], %s[/]:off, [+-]:narrow, [>=<?]:effort: "
@ -5952,12 +5952,12 @@ to switch to narrowing."
(push modifier org-agenda-filter))))
(if (not (null org-agenda-filter))
(org-agenda-filter-apply org-agenda-filter)))
(setq maybe-reftresh t))
(setq maybe-refresh t))
((equal char ?/)
(org-agenda-filter-by-tag-show-all)
(when (get 'org-agenda-filter :preset-filter)
(org-agenda-filter-apply org-agenda-filter))
(setq maybe-reftresh t))
(setq maybe-refresh t))
((or (equal char ?\ )
(setq a (rassoc char alist))
(and (>= char ?0) (<= char ?9)
@ -5974,9 +5974,9 @@ to switch to narrowing."
(cons (concat (if strip "-" "+") tag)
(if narrow current nil)))
(org-agenda-filter-apply org-agenda-filter)
(setq maybe-reftresh t))
(setq maybe-refresh t))
(t (error "Invalid tag selection character %c" char)))
(when (and maybe-reftresh
(when (and maybe-refresh
(eq org-agenda-clockreport-mode 'with-filter))
(org-agenda-redo))))