anchor.diff:           "name will keep being used for this session.~n",
            []).
   
  +show_invalid_chunk_warning(Name, Reason) ->
  +    show('$#erlang-history-invalid-chunk-warn',
  +         "Invalid chunk in the file ~ts.~n"
  +         "Some entries may have been lost.~nReason ~p.",
  +         [proplists:get_value(file,disk_log:info(Name)), Reason]).
  +
   show_invalid_file_warning(FileName) ->
       show('$#erlang-history-invalid-file',
            "Shell history expects to be able to use the file ~ts "
  
positive.code:     case disk_log:chunk(Name, Cont) of
          {error, no_such_log} ->
              show_unexpected_close_warning(),
              [];
          eof ->
              [];
  
negative.code:         {error, no_such_log} ->
              show_unexpected_close_warning(),
              [];
          {error, Reason} ->
              show_invalid_chunk_warning(Name, Reason),
              [];
          eof ->
              [];
          {Cont, Logs} ->
  