anchor.diff:  %%======================================================================
   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),
  +    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),
  +    DefSortOrder2 = proplists:get_value("sortOrderSec", WebSettings, ?descDef),
   
       StatusList = [?descDef, ?descPlanning, ?descInProgress,
                     ?descDone, ?descNA, ?descAll],
  
positive.code: sortETodos(User, ETodos) ->
      UserCfg  = eTodoDB:readUserCfg(User),
      Settings = default(UserCfg#userCfg.webSettings, []),
      Sorting  = proplists:get_value("sortOrder", Settings, ?descDef),
      ETodos2  = doSortETodos(?comment, ETodos), %% Secondary sort order
      doSortETodos(Sorting, ETodos2).
  
  %% Sorting alternatives
  %% ?descDef, ?status, ?prio, ?description, ?createTime
  
negative.code:                                      "sendSetting('listType')"}],
                                     createForm2(ListTypes, DefListType))])]),
                 trTag(
                   [tdTag("Sort order(Primary)"),
                    tdTag([selectTag([{id,      "sortOrder"},
                                      {name,    "sortOrder"},
                                      {class,   "selects"},
                                      {onchange,
                                       "sendSetting('sortOrder')"}],
                                     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"},
  