Dired 7.5 bug: once bombs; twice works

Terry Stroup (terry@cip.informatik.uni-erlangen.de)
Thu, 22 Sep 1994 22:16:59 +0200


Dear Debuggers,

The very first invocation of dired works fine; from then on the first
invocation on a given directory name yields the *Backtrace* appended
to the end of this message; the next invocation on the same file works
fine.

There seems to be something rather fundamental going on: while I'm
typing this message, I'm getting the following message in the
minibuffer:

	Autosaving error for *mail*

Perhaps I should mention that EFS 1.11 works well (enough) on this
platform; I've just installed 1.12, which fails as described.

Best regards,
Terry

Emacs  : GNU Emacs 19.19 of Tue Oct 26 1993 on faui45z (berkeley-unix)
Package: Dired

current state:
==============
(setq
 dired-version "7.5"
 dired-after-readin-hook nil
 dired-backup-if-overwrite nil
 dired-before-readin-hook '(efs-dired-before-readin)
 dired-bibtex-unclean-extensions '(".blg" ".bbl")
 dired-chown-program "/etc/chown"
 dired-cleanup-alist '(("tex" ".cp" ".cps" ".fn" ".fns" ".ky"
			".kys" ".pg" ".pgs" ".tp" ".tps" ".vr" ".vrs" ".toc" ".log" ".aux"
			".idx" ".lof" ".lot" ".glo" ".blg" ".bbl")
		       ("patch" ".rej" ".orig")
		       )
 dired-compression-method 'compress
 dired-compression-method-alist '((gzip ".gz" ("gzip") ("gzip" "-d") "-f")
				  (compress ".Z" ("compress" "-f") ("compress" "-d") "-f")
				  (pack ".z" ("pack" "-f") ("unpack"))
				  (compact ".C" ("compact") ("uncompact"))
				  )
 dired-copy-preserve-time t
 dired-dwim-target nil
 dired-failed-marker-shell 33
 dired-filename-re-ext "\\..+$"
 dired-find-subdir nil
 dired-gnutar-program nil
 dired-grep-load-hook '(#[nil "@ABC#" [efs-overwrite-fn "efs"
							    dired-grep-delete-local-temp-file efs-diff/grep-del-temp-file] 4]
			)
 dired-keep-marker-compress t
 dired-keep-marker-copy 67
 dired-keep-marker-hardlink 72
 dired-keep-marker-kill 75
 dired-keep-marker-rename t
 dired-keep-marker-symlink 89
 dired-keep-marker-uucode 85
 dired-kept-versions 2
 dired-latex-unclean-extensions '(".idx" ".lof" ".lot" ".glo")
 dired-listing-switches "-algF"
 dired-load-hook '(#[nil "@A!" [require efs-dired] 2])
 dired-local-variables-file ".dired"
 dired-ls-F-marks-symlinks nil
 dired-ls-program "ls"
 dired-mail-reader 'rmail
 dired-mode-hook 'dired-mode-hook-fun
 dired-mode-line-modified "-%s%s%s-"
 dired-no-confirm nil
 dired-omit-extensions '(".o"
			 ".elc"
			 "~"
			 ".bin"
			 ".lbin"
			 ".fasl"
			 ".dvi"
			 ".toc"
			 ".log"
			 ".aux"
			 ".a"
			 ".ln"
			 ".lof"
			 ".blg"
			 ".bbl"
			 ".glo"
			 ".idx"
			 ".lot"
			 ".fmt"
			 ".cp"
			 ".cps"
			 ".fn"
			 ".fns"
			 ".ky"
			 ".kys"
			 ".pg"
			 ".pgs"
			 ".tp"
			 ".tps"
			 ".vr"
			 ".vrs"
			 ".toc"
			 ".log"
			 ".aux"
			 ".idx"
			 ".lof"
			 ".lot"
			 ".glo"
			 ".blg"
			 ".bbl"
			 ".rej"
			 ".orig"
			 )
 dired-omit-files t
 dired-omit-files-regexp "^[#.]"
 dired-patch-unclean-extensions '(".rej" ".orig")
 dired-shell-load-hook nil
 dired-show-ls-switches nil
 dired-tex-unclean-extensions '(".toc" ".log" ".aux")
 dired-texinfo-unclean-extensions '(".cp"
				    ".cps"
				    ".fn"
				    ".fns"
				    ".ky"
				    ".kys"
				    ".pg"
				    ".pgs"
				    ".tp"
				    ".tps"
				    ".vr"
				    ".vrs"
				    )
 dired-trivial-filenames "^\\.\\.?$\\|^#"
 dired-unshar-program nil
 dired-use-file-transformers nil
 dired-verify-modtimes t
 reporter-version "2.12"
 )
------------------------------ cut here ------------------------------
Signalling: (wrong-number-of-arguments #<subr next-single-property-change> 4)
  next-single-property-change(1 dired-file-name nil 30)
  dired-move-to-filename(nil 1 30)
  efs-real-dired-get-filename(no-dir t)
  #[(&optional localp no-error-if-not-filep) "@	\n\"" [efs-real-dired-get-filename localp no-error-if-not-filep] 3](no-dir t)
  apply(#[(&optional localp no-error-if-not-filep) "@	\n\"" [efs-real-dired-get-filename localp no-error-if-not-filep] 3] (no-dir t))
  dired-get-filename(no-dir t)
  dired-mark-unmarked-files("^[#.]\\|.\\(\\.o\\|\\.elc\\|~\\|\\.bin\\|\\.lbin\\|\\.fasl\\|\\.dvi\\|\\.toc\\|\\.log\\|\\.aux\\|\\.a\\|\\.ln\\|\\.lof\\|\\.blg\\|\\.bbl\\|\\.glo\\|\\.idx\\|\\.lot\\|\\.fmt\\|\\.cp\\|\\.cps\\|\\.fn\\|\\.fns\\|\\.ky\\|\\.kys\\|\\.pg\\|\\.pgs\\|\\.tp\\|\\.tps\\|\\.vr\\|\\.vrs\\|\\.toc\\|\\.log\\|\\.aux\\|\\.idx\\|\\.lof\\|\\.lot\\|\\.glo\\|\\.blg\\|\\.bbl\\|\\.rej\\|\\.orig\\)$" nil nil no-dir)
  dired-omit-region(1 4511 "^[#.]\\|.\\(\\.o\\|\\.elc\\|~\\|\\.bin\\|\\.lbin\\|\\.fasl\\|\\.dvi\\|\\.toc\\|\\.log\\|\\.aux\\|\\.a\\|\\.ln\\|\\.lof\\|\\.blg\\|\\.bbl\\|\\.glo\\|\\.idx\\|\\.lot\\|\\.fmt\\|\\.cp\\|\\.cps\\|\\.fn\\|\\.fns\\|\\.ky\\|\\.kys\\|\\.pg\\|\\.pgs\\|\\.tp\\|\\.tps\\|\\.vr\\|\\.vrs\\|\\.toc\\|\\.log\\|\\.aux\\|\\.idx\\|\\.lof\\|\\.lot\\|\\.glo\\|\\.blg\\|\\.bbl\\|\\.rej\\|\\.orig\\)$")
  dired-omit-expunge(nil t)
  dired-internal-noselect("/home/faui79/inf7/terry/dc/" nil)
  dired-noselect("/home/faui79/inf7/terry/dc" nil)
  dired("/home/faui79/inf7/terry/dc")
  (let ((whereami ...) (logname ...)) (cond (... ... ...)) (dired (expand-file-name "~/dc")) (dired (concat cip-home "/Mail")) (dired immd-vii-home) (rename-buffer (concat logname " @ IMMD7"))))
  fn-handler-real-load("/home/faui79/inf7/terry/gnu/emacs/19/my/emacs.el" nil t t)
  efs-real-load("/home/faui79/inf7/terry/gnu/emacs/19/my/emacs.el" nil t t)
  load("emacs")
  (let ((version ...)) (setq my-load-path (list ... ...)) (setq dc-load-path (list ... ... ...)) (setq local-load-path load-path) (dcbe-set-load-path) (load "emacs")))
  fn-handler-real-load("/home/faui79/inf7/terry/dc/gnu/emacs/dc/be-emacs.el" nil t t)
  efs-real-load("/home/faui79/inf7/terry/dc/gnu/emacs/dc/be-emacs.el" nil t t)
  load("/home/faui79/inf7/terry/dc/gnu/emacs/dc/be-emacs")
  fn-handler-real-load("~/.emacs" nil t t)
  efs-real-load("~/.emacs" nil t t)
  load("~/.emacs" nil t t)
  apply(load ("~/.emacs" nil t t))
  dired-handler-fn(load "~/.emacs" nil t t)
  efs-real-load("~/.emacs" nil t t)
  load("~/.emacs")
  eval((load "~/.emacs"))
  eval-last-sexp(t)
  eval-print-last-sexp()
  call-interactively(eval-print-last-sexp)