Re: PC-complete broken is CVS HEAD

[Manoj Srivastava <srivasta@ieee.org>]

Hi,

        A better trace back after loading all the .el files:
--8<---------------cut here---------------start------------->8---
Debugger entered--Lisp error: (wrong-type-argument listp 2)
  car(2)
  (delete (car tail) (cdr tail))
  (setcdr tail (delete (car tail) (cdr tail)))
  (while tail (setcdr tail (delete ... ...)) (setq tail (cdr tail)))
  (let ((tail list)) (while tail (setcdr tail ...) (setq tail ...)))
  delete-dups(("etc/" "e-QIP_Investigation_Request_3112480_Archival_Copy.pdf" "e-QIP_Timelines.doc" "extra_sources.sql" "e-QIP_Investigation_Request_3112480_Signature_Forms.pdf" "example.txt" "eve_000066_all.deb" "examples/" "example.txt~" . 2))
  PC-do-completion(nil)
  PC-complete()
  call-interactively(PC-complete nil nil)
  read-file-name("Find file: " nil "~/" nil)
  (progn (add-hook (quote minibuffer-setup-hook) setup-hook) (read-file-name prompt nil default-directory mustmatch))
  (unwind-protect (progn (add-hook ... setup-hook) (read-file-name prompt nil default-directory mustmatch)) (remove-hook (quote minibuffer-setup-hook) setup-hook))
  (let (setup-hook) (setq setup-hook (lambda nil ... ...)) (unwind-protect (progn ... ...) (remove-hook ... setup-hook)))
  (minibuffer-with-setup-hook (lambda nil (setq minibuffer-default find-file-default)) (read-file-name prompt nil default-directory mustmatch))
  (let ((find-file-default ...)) (minibuffer-with-setup-hook (lambda nil ...) (read-file-name prompt nil default-directory mustmatch)))
  (list (let (...) (minibuffer-with-setup-hook ... ...)) t)
  find-file-read-args("Find file: " nil)
  call-interactively(find-file nil nil)
--8<---------------cut here---------------end--------------->8---

        manoj
-- 
If God had intended Man to Smoke, He would have set him on Fire.
Manoj Srivastava <srivasta@acm.org> <http://www.golden-gryphon.com/>  
1024D/BF24424C print 4966 F272 D093 B493 410B  924B 21BA DABB BF24 424C