Index: lisp/ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.9661
diff -c -r1.9661 ChangeLog
*** lisp/ChangeLog	1 Jun 2006 06:42:07 -0000	1.9661
--- lisp/ChangeLog	5 Jun 2006 23:51:00 -0000
***************
*** 1,3 ****
--- 1,8 ----
+ 2006-06-06  Michaël Cadilhac  <micha@mahaena.lrde>
+ 
+ 	* complete.el (PC-expand-many-files): Go to the home directory
+ 	before `shell-command' if the default one is not executable.
+ 
  2006-06-01  Jan Djärv  <jan.h.d@swipnet.se>
  
  	* term/x-win.el: Change x-menu-bar-start to menu-bar-open.
Index: lisp/complete.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/complete.el,v
retrieving revision 1.53
diff -c -r1.53 complete.el
*** lisp/complete.el	22 May 2006 18:09:40 -0000	1.53
--- lisp/complete.el	5 Jun 2006 23:51:00 -0000
***************
*** 778,783 ****
--- 778,785 ----
  (defun PC-expand-many-files (name)
    (with-current-buffer (generate-new-buffer " *Glob Output*")
      (erase-buffer)
+     (unless (file-executable-p default-directory)
+       (setq default-directory "~/"))
      (shell-command (concat "echo " name) t)
      (goto-char (point-min))
      ;; CSH-style shells were known to output "No match", whereas