anchor.diff:                                       "sendSetting('listType')"}],
                                      createForm2(ListTypes, DefListType))])]),
                  trTag(
  -                 [tdTag("Task sort order"),
  +                 [tdTag("Sort order(Primary)"),
                     tdTag([selectTag([{id,      "sortOrder"},
                                       {name,    "sortOrder"},
                                       {class,   "selects"},
                                       {onchange,
                                        "sendSetting('sortOrder')"}],
  -                                   createForm2(SortOrders, DefSortOrder))])])
  +                                   createForm2(SortOrders, DefSortOrder))])]),
  +               trTag(
  +                 [tdTag("Sort order(Secondary)"),
  +                  tdTag([selectTag([{id,      "sortOrderSec"},
  +                                    {name,    "sortOrderSec"},
  +                                    {class,   "selects"},
  +                                    {onchange,
  +                                     "sendSetting('sortOrderSec')"}],
  +                                   createForm2(SortOrders, DefSortOrder2))])])
                 ]),
        inputTag([{type,  "button"},
                  {id,    "doneBtn"},
  
positive.code: %%======================================================================
  settingsPage(User, List) ->
      %% Get web settings.
      UserCfg      = eTodoDB:readUserCfg(User),
      WebSettings  = default(UserCfg#userCfg.webSettings, []),
      DefStatus    = proplists:get_value("filterStatus", WebSettings, ?descDef),
      DefPrio      = proplists:get_value("filterPrio",   WebSettings, ?descDef),
      DefListType  = proplists:get_value("listType",     WebSettings, ?descDef),
      DefSortOrder = proplists:get_value("sortOrder",     WebSettings, ?descDef),
  
      StatusList = [?descDef, ?descPlanning, ?descInProgress,
                    ?descDone, ?descNA, ?descAll],
  
negative.code: sortETodos(User, ETodos) ->
      UserCfg  = eTodoDB:readUserCfg(User),
      Settings = default(UserCfg#userCfg.webSettings, []),
      Sorting1 = proplists:get_value("sortOrder",    Settings, ?descDef),
      Sorting2 = proplists:get_value("sortOrderSec", Settings, ?descDef),
      ETodos2  = doSortETodos(Sorting2, ETodos), %% Secondary sort order
      doSortETodos(Sorting1, ETodos2).
  
  %% Sorting alternatives
  %% ?descDef, ?status, ?prio, ?description, ?createTime
  