anchor.diff:          {error, no_such_log} ->
               show_unexpected_close_warning(),
               [];
  +        {error, Reason} ->
  +            show_invalid_chunk_warning(Name, Reason),
  +            [];
           eof ->
               [];
           {Cont, Logs} ->
  
positive.code:     case disk_log:chunk(Name, Cont) of
          {error, no_such_log} ->
              show_unexpected_close_warning(),
              [];
          eof ->
              [];
  
negative.code:          "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 "
  