anchor.diff:  %% @end
   %%--------------------------------------------------------------------
   filter(_ETodo, []) -> true;
  +filter(undefined, _Filter) ->
  +    %% Corrupt database.
  +    false;
   filter(#etodo{status = Status, priority = Prio}, Filter) ->
       case filterStatus(Status, Filter) of
           true ->
  
positive.code:     {SumHours2,  SumMinutes2};
  totInt([#logWork{hours = Hours, minutes = Min}|Rest], {SumHours, SumMin}) ->
      totInt(Rest, {SumHours + Hours, SumMin + Min}).
  
  
negative.code:     {reply, Result#workDesc.shortDesc, State};
  handle_call({getTime, Uid}, _From, State) ->
      Result = default(matchOne(#logTime{uid = Uid, _ = '_'}), #logTime{}),
      {reply, {default(Result#logTime.timeEstimate, 0),
               default(Result#logTime.timeRemaining, 0)}, State};
  handle_call({saveWorkDesc, Uid, WorkDesc}, _From, State) ->
      TS = fun() ->
              mnesia:write(#workDesc{uid = Uid, shortDesc = WorkDesc})
  