[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[O] [PATCH] Fix typo in agenda local variable
From: |
Bernt Hansen |
Subject: |
[O] [PATCH] Fix typo in agenda local variable |
Date: |
Wed, 13 Apr 2011 18:05:25 -0400 |
* lisp/org-agenda.el (org-agenda-filter-by-tag): Fix variable name typo
maybe-reftresh -> maybe-refresh
---
This patch is available at git://git.norang.ca/org-mode.git fix-agenda-var-typo
-Bernt
lisp/org-agenda.el | 10 +++++-----
1 files changed, 5 insertions(+), 5 deletions(-)
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 5571838..321221d 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -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))))
--
1.7.5.rc0.100.gcb35c0
- [O] [PATCH] Fix typo in agenda local variable,
Bernt Hansen <=