org-agenda.el: small stylish fix: always use equal.

2011-02-12 14:03:08 +01:00 · 2011-02-12 14:03:08 +01:00 · 6132405d05
parent 905d2f7489
commit 6132405d05
1 changed files with 1 additions and 1 deletions
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@ -8016,7 +8016,7 @@ The prefix arg is passed through to the command if possible."
 			   (fset 'read-string old)
 			 (fmakunbound 'read-string)))))))

-     ((eq action '?S)
+     ((equal action ?S)
      (let ((days (read-number
 		   (format "Scatter tasks across how many %sdays: "
 			   (if arg "week" "")) 7)))