Make sure that mew-home exists

Make sure that mew-home exists. let bound default-directory instead of using cd function.

mew-send から呼ばれる mew-draft-mode が (cd mew-home) を実行しており、これは mew-home が存在していないとエラーになります。

また、(この cd がなぜ必要なのかまで読んでませんが、)Elispで cd と default-directory を任意のパスに束縛するのはほぼ同じ意味で、後者の方が良く使われています。これら2点の修正を行いました。

backtrace

Debugger entered--Lisp error: (error "No such directory found via CDPATH environment var...")
  signal(error ("No such directory found via CDPATH environment var..."))
  error("No such directory found via CDPATH environment var...")
  cd("/home/conao/.mew")
  mew-draft-mode()
  mew-summary-send(nil nil nil)
  mew-send()
  funcall-interactively(mew-send)
  call-interactively(mew-send record nil)
  command-execute(mew-send record)
  counsel-M-x-action("mew-send")
  #f(compiled-function (x) #<bytecode 0x15906023a9ed>)("mew-send")
  ivy-call()
  #f(compiled-function (arg1 arg2 &rest rest) "Read a string in the minibuffer, with completion
  apply(#f(compiled-function (arg1 arg2 &rest rest) "Read a string in the minibuffer, with comp
  ivy-read("M-x " [## localp ansi-color-apply-overlay-face epg-context-signers locals tex-chkte
  counsel-M-x()
  funcall-interactively(counsel-M-x)
  call-interactively(counsel-M-x nil nil)
  command-execute(counsel-M-x)

kazu-yamamoto / Mew

Make sure that mew-home exists #150

backtrace