visiting "~/Application Data" gets "~" instead

[Eric Hanchrow]

In GNU Emacs 22.0.50.1 (i386-mingw-nt5.0.2195)
 of 2006-07-27 on SLOP
X server distributor `Microsoft Corp.', version 5.0.2195
configured using `configure --with-gcc (3.2)'

* Start emacs with "runemacs -Q"

* paste or type this into the *scratch* buffer, and hit C-x C-e

(progn
  (setenv "HOME" (getenv "USERPROFILE"))
  ;;(setq abbreviated-home-dir nil)
  (let ((home (find-file-noselect "~/"))
        (ad (find-file-noselect "~/Application Data/")))
    (when (eq home ad)
      (error "Aha.  We found the bug."))
    (message "I guess the bug is fixed or hidden.")))

I predict you'll see the error "Aha.  We found the bug."

I think this is a bug because I've changed the HOME variable to be
"c:/Documents and Settings/erich/", and yet appending "Application
Data" to that name, and visiting the result, gets the same buffer as
if I hadn't appended "Application Data".

For reasons I don't really understand, if you uncomment the line that
sets abbreviated-home-dir, the problem goes away.

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: ENU
  locale-coding-system: cp1252
  default-enable-multibyte-characters: t

Major mode: Emacs-Lisp

Minor modes in effect:
  encoded-kbd-mode: t
  tooltip-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
  blink-cursor-mode: t
  unify-8859-on-encoding-mode: t
  utf-translate-cjk-mode: t
  auto-compression-mode: t
  line-number-mode: t

Recent input:
C-f c : / b u <tab> <return> C-M-n C-x C-e q C-x C-e 
q C-p C-p C-p C-p M-m C-d C-d M-> C-x C-e C-p C-p C-M-n 
<return> <tab> M-( m e s s a g e SPC " " C-b I SPC 
g u e s s SPC t h e SPC b u g SPC i s SPC f i x e d 
SPC o r SPC h i d d e n . C-e C-x C-e C-x C-s M-x r 
e p o r t - e m a c s - b u <tab> <return>

Recent messages:
Loading help-mode...done
Back to top level.
Entering debugger...
Back to top level.
Mark set
nil
I guess the bug is fixed or hidden.
"I guess the bug is fixed or hidden."
Wrote c:/bug.el
Loading emacsbug...done

-- 
... democracy is the worst form of government except all those
other forms that have been tried from time to time.
        -- Winston Churchill, cited at http://en.wikipedia.org/wiki/Democracy