anchor.diff:      end,
       _ = disk_log:close(Name),
       load().
  +
  +open_new_log(Name) ->
  +    case open_log() of
  +        {error, Reason} ->
  +            handle_open_error(Reason),
  +            disable_history();
  +        _ ->
  +            _ = disk_log:close(Name),
  +            load()
  +    end.
   
   %% Return whether the shell history is enabled or not
   -spec history_status() -> enabled | disabled | module().
  
positive.code:     wait_for_kernel_safe_sup(),
      case history_status() of
          enabled ->
              try open_log() of
                  {ok, ?LOG_NAME} ->
                      read_full_log(?LOG_NAME);
                  {repaired, ?LOG_NAME, {recovered, Good}, {badbytes, Bad}} ->
                      report_repairs(?LOG_NAME, Good, Bad),
                      read_full_log(?LOG_NAME);
  
negative.code: 
  disable_history() ->
      show('$#erlang-history-disable', "Disabling shell history logging.~n", []),
      application:set_env(kernel, shell_history, disabled).
  
  find_path() ->
      case application:get_env(kernel, shell_history_path) of
  