[O] [BUG] `org-agenda-sorting-strategy' does not work in `tags-todo'

[Sebastien Vauban]

Hello,

The following agenda view is supposed to display the tasks by ascending
_DEADLINE timestamp_.

#+begin_src emacs-lisp
  (add-to-list 'org-agenda-custom-commands
               '("B" "Today"
                 tags-todo "DEADLINE<=\"<today>\""
                 ((org-agenda-overriding-header "Today")
                  (org-agenda-sorting-strategy '(deadline-up)))) t)
#+end_src

However, as you can see with the following ECM:

#+begin_src org
* Health
  :PROPERTIES:
  :CATEGORY: Health
  :END:

** TODO 3Do jogging
   DEADLINE: <2013-09-09 Mon>

** TODO 2Check weekend hours at the gym
   DEADLINE: <2013-09-08 Sun>

* Personal
  :PROPERTIES:
  :CATEGORY: Personal
  :END:

** TODO 4Mail package to Susan
   DEADLINE: <2013-09-12 Thu>

* Shopping
  :PROPERTIES:
  :CATEGORY: Shopping
  :END:

** TODO 1Buy dog food
   DEADLINE: <2013-09-07 Sat>
#+end_src

it sorts the list by _category_, instead!

--8<---------------cut here---------------start------------->8---
Today (4)
   Health:     TODO 3Do jogging
   Health:     TODO 2Check weekend hours at the gym
   Personal:   TODO 4Mail package to Susan
   Shopping:   TODO 1Buy dog food
--8<---------------cut here---------------end--------------->8---

The same sorting criteria, applied on an `agenda' view, does work.

#+begin_src emacs-lisp
  (add-to-list 'org-agenda-custom-commands
               '("G" "Agenda deadline-up"
                 agenda ""
                 ((org-agenda-span 'day)
                  (org-agenda-time-grid nil)
                  (org-agenda-sorting-strategy '(deadline-up)))) t)
#+end_src

--8<---------------cut here---------------start------------->8---
Calendar for today
2013-09-12 Thu ________________________________________________
 5 d ago      TODO 1Buy dog food
 4 d ago      TODO 2Check weekend hours at the gym
 3 d ago      TODO 3Do jogging
 Deadline     TODO 4Mail package to Susan
--8<---------------cut here---------------end--------------->8---

Best regards,
  Seb

-- 
Sebastien Vauban