file visiting bug?

[Yuri Deshko]

Hi. I have the following problem occuring repeatedly:
when I try to open a file (C-x C-f) and autocompletion in minibuffer 
can not suggest anything, emacs sometimes crashes (right after 
pressing TAB). The same 
happens while using dired. Also, when I try to go into the 
directory for which I do not have read permission it crashes 
again. 
 1. GNU Emacs 23.0.60.2 (i686-pc-linux-gnu, GTK+ Version 2.12.9)
 of 2008-04-29 on foundation
 2. Configured with ./configure --prefix=$HOME --exec-prefix=$HOME
 3. Crash happens even with "emacs -q" and can be reproduced 
in the following manner: 
   3.1 at command promt: emacs -q
   3.2 C-x C-f /root/Mail/
   3.3 TAB
Here the output of the backtrace:
-----------------------------------------------------------------------------------------------------
Debugger entered--Lisp error: (file-error "Opening directory" "\x1e442\x043a\x0430\x0437\x0430\x043d\x043e \x0432 \x0434\x043e\x0441\x0442\x0443\x043f\x0435" "/root/Mail/")
  file-name-completion("" "/root/Mail/" file-exists-p)
  completion--file-name-table(#("/root/Mail/" 0 11 (auto-composed t)) nil nil)
  try-completion(#("/root/Mail/" 0 11 (auto-composed t)) completion--file-name-table nil)
  complete-with-action(nil completion--file-name-table #("/root/Mail/" 0 11 (auto-composed t)) nil)
  #[(table) "    \n$" [action table string pred complete-with-action] 5](completion--file-name-table)
  completion--some(#[(table) "    \n$" [action table string pred complete-with-action] 5] (completion--embedded-envvar-table completion--file-name-table))
  #[(G64910 string pred action) "J\"" [G64910 completion--some #[... "    \n$" [action table string pred complete-with-action] 5]] 3](--tables-- #("/root/Mail/" 0 11 (auto-composed t)) nil nil)
  apply(#[(G64910 string pred action) "J\"" [G64910 completion--some #[... "    \n$" [action table string pred complete-with-action] 5]] 3] --tables-- (#("/root/Mail/" 0 11 (auto-composed t)) nil nil))
  read-file-name-internal(#("/root/Mail/" 0 11 (auto-composed t)) nil nil)
  try-completion(#("/root/Mail/" 0 11 (auto-composed t)) read-file-name-internal nil)
  completion-basic-try-completion(#("/root/Mail/" 0 11 (auto-composed t)) read-file-name-internal nil 11)
  #[(style) "    address@hidden
$" [style completion-styles-alist string table pred point] 5](basic)
  completion--some(#[(style) "    address@hidden
$" [style completion-styles-alist string table pred point] 5] (basic partial-completion))
  completion-try-completion(#("/root/Mail/" 0 11 (auto-composed t)) read-file-name-internal nil 11)
  completion--do-completion()
  minibuffer-complete()
  call-interactively(minibuffer-complete nil nil)
  completing-read("Find file: " read-file-name-internal nil nil "~/" file-name-history "~/")
  read-file-name("Find file: " nil "~/" nil)
  find-file-read-args("Find file: " nil)
  byte-code(" [find-file-confirm-nonexistent-file find-file-read-args "Find file: " confirm-only] 3)
  call-interactively(find-file nil nil)