anchor.diff:  %%--------------------------------------------------------------------
   -spec delete_record(RsrcType :: binary(), Id :: binary()) ->
       ok | gui_error:error_result().
  -delete_record(_, FileId) ->
  -    SessionId = g_session:get_session_id(),
  -    case logical_file_manager:rm_recursive(SessionId, {guid, FileId}) of
  -        ok ->
  -            ok;
  -        {error, ?EACCES} ->
  -            gui_error:report_warning(
  -                <<"Cannot remove file or directory - access denied.">>)
  -    end.
  +delete_record(_, _Id) ->
  +    gui_error:report_error(<<"Not implemented">>).
   
   
   %%%===================================================================
  
positive.code:                 <<"dir">> ->
                      case logical_file_manager:ls(
                          SessionId, {guid, FileId}, 0, 1000) of
                          {ok, Chldrn} ->
                              Chldrn;
                          _ ->
                              []
                      end
  
negative.code: -spec update_record(RsrcType :: binary(), Id :: binary(),
      Data :: proplists:proplist()) ->
      ok | gui_error:error_result().
  update_record(_, _Id, _Data) ->
      gui_error:report_error(<<"Not implemented">>).
  
  
  %%--------------------------------------------------------------------
  