default mode for email drafts

[Stephen Berman]

This is more a minor annoyance than a bug, but all the same maybe it's
easy enough to avoid.

I visited with C-x C-f a file whose file-name is an integer and whose
immediate directory is named "drafts", and to my surprise I found
myself in mh-letter-mode.  I was surprised because I not only don't
use mh-e but I don't even have MH installed on my system.  I use Gnus
to read and send email messages, and Gnus has a special group for
drafts, and of course visiting a draft within Gnus DTRT. The problem
is that Gnus uses a file structure for drafts that matches the regexp
which auto-mode-alist associates exclusively with mh-letter-mode,
which takes effect when visiting drafts outside of Gnus.  I would
guess that mh-e also a mechanism for visiting drafts in the
appropriate mode.  So does this association really have to forced for
C-x C-f?


In GNU Emacs 22.0.50.5 (i686-pc-linux-gnu, GTK+ Version 2.8.3)
 of 2005-11-24 on escher
X server distributor `The X.Org Foundation', version 11.0.60802000
configured using `configure '--with-x-toolkit=gtk''

Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: en_US.UTF-8
  locale-coding-system: utf-8
  default-enable-multibyte-characters: t

Major mode: MH-Letter

Minor modes in effect:
  auto-fill-function: do-auto-fill
  tabbar-mwheel-mode: t
  tabbar-mode: t
  recentf-mode: t
  show-paren-mode: t
  display-time-mode: t
  tooltip-mode: t
  auto-compression-mode: t
  tool-bar-mode: t
  mouse-wheel-mode: t
  menu-bar-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  unify-8859-on-encoding-mode: t
  utf-translate-cjk-mode: t
  column-number-mode: t
  line-number-mode: t

Recent input:
<down> <down> <down> <down> <down> <down> <down> <down> 
<down> <down> <down> <down> <down> <down> <down> <down> 
<up> <return> <help-echo> <help-echo> <menu-bar> <index> 
"Defuns" "From: (gnus-article-highlight-citation)" 
"(mh-file-command-p)" <down-mouse-5> <mouse-5> <down-mouse-5> 
<mouse-5> <down-mouse-5> <mouse-5> <help-echo> <help-echo> 
<help-echo> <help-echo> <help-echo> <tool-bar> <kill-buffer> 
<help-echo> <down-mouse-1> <mouse-1> <help-echo> <home> 
<help-echo> <tool-bar> <kill-buffer> <help-echo> <help-echo> 
<down-mouse-1> <mouse-1> <down-mouse-1> <mouse-1> <help-echo> 
<down-mouse-1> <mouse-2> <help-echo> <help-echo> <help-echo> 
<help-echo> <help-echo> <down-mouse-3> <mouse-3> <down-mouse-5> 
<mouse-5> <down-mouse-5> <mouse-5> <double-down-mouse-5> 
<double-mouse-5> <down-mouse-5> <mouse-5> <down-mouse-5> 
<mouse-5> <down-mouse-5> <mouse-5> <down-mouse-5> <mouse-5> 
<switch-frame> <switch-frame> <down-mouse-5> <mouse-5> 
<down-mouse-5> <mouse-5> <double-down-mouse-5> <double-mouse-5> 
<help-echo> <help-echo> <tool-bar> <kill-buffer> <down-mouse-1> 
<mouse-1> <down-mouse-1> <mouse-1> M-x r e p o r <tab> 
<return>

Recent messages:
Generating summary...done
Type C-x 4 b RET to restore the other window.  C-M-v to scroll the help.
Auto-saving...
Type C-x 1 to remove help window.  C-M-v to scroll the help.
Making completion list... [3 times]
call-interactively: End of buffer
uncompressing mh-utils.el.gz...done [2 times]
Mark set [2 times]
uncompressing mh-e.el.gz...done [2 times]
Loading emacsbug...done