Dired 7.9 bug: dired-no-confirm invalid defcustom

Aki Vehtari (Aki.Vehtari@hut.fi)
Tue, 3 Mar 1998 20:41:52 +0200


Do I have old dired version, I thought this was already fixed?

M-x customize RET dired-behavior RET
Click to show the value of Dired No Confirm gives error:
 Symbol's function definition is void: nil
Here's patch.

--- dired.el.orig	Tue Feb 17 18:01:15 1998
+++ dired.el	Tue Mar  3 20:22:13 1998
@@ -437,12 +437,15 @@
 
 Note that this list also applies to remote files accessed with efs
 or ange-ftp."
-  :type '(set (byte-compile chgrp chmod chown compress copy
-			    delete hardlink load move print
-			    shell symlink uncompress recursive-delete
-			    kill-file-buffer kill-dired-buffer patch
-			    create-top-dir revert-subdirs))
-  :group 'dired-behavior)
+  :type '(set (const byte-compile) (const chgrp) (const chmod)
+	      (const chown) (const compress) (const copy)
+	      (const delete) (const hardlink) (const load)
+	      (const move) (const print) (const shell)
+	      (const symlink) (const uncompress)
+	      (const recursive-delete) (const kill-file-buffer)
+	      (const kill-dired-buffer) (const patch)
+	      (const create-top-dir) (const revert-subdirs))
+:group 'dired-behavior)
 		      
 ;;;###autoload
 (defcustom dired-backup-if-overwrite nil


Emacs  : XEmacs 20.5 "Loashan" [Lucid] (i686-pc-linux) of Mon Mar  2 1998 on chaos.lce.hut.fi
Package: Dired

current state:
==============
(setq
 dired-version "7.9"
 dired-backup-if-overwrite nil
 dired-chown-program "chown"
 dired-cleanup-alist '(("tex" ".toc" ".log" ".aux" ".dvi")
		       ("latex" ".toc" ".log" ".aux" ".idx" ".lof" ".lot"
			".glo" ".dvi")
		       ("bibtex" ".blg" ".bbl")
		       ("texinfo" ".cp" ".cps" ".fn" ".fns" ".ky" ".kys"
			".pg" ".pgs" ".tp" ".tps" ".vr" ".vrs")
		       ("patch" ".rej" ".orig") ("backups" "~")
		       ("completion-ignored-extensions" ".o" ".elc" "~"
			".bin" ".lbin" ".fasl" ".dvi" ".toc" ".log"
			".aux" ".a" ".ln" ".lof" ".blg" ".bbl" ".glo"
			".idx" ".lot" ".fmt" ".diff" ".oi" ".class")
		       )
 dired-compression-method 'gzip
 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 ?\!
 dired-filename-re-ext "\\..+\\'"
 dired-find-subdir nil
 dired-gnutar-program "tar"
 dired-keep-marker-compress t
 dired-keep-marker-copy ?C
 dired-keep-marker-hardlink ?H
 dired-keep-marker-kill ?K
 dired-keep-marker-rename t
 dired-keep-marker-symlink ?S
 dired-keep-marker-uucode ?U
 dired-kept-versions 2
 dired-listing-switches "-al"
 dired-local-variables-file ".dired"
 dired-ls-F-marks-symlinks nil
 dired-ls-program "ls"
 dired-mail-reader nil
 dired-mode-line-modified "-%s%s%s-"
 dired-no-confirm nil
 dired-omit-extensions '(".class" ".oi" ".diff" ".fmt" ".ln" ".a" ".fasl"
			 ".lbin" ".bin" ".elc" ".o" "~" ".orig" ".rej"
			 ".vrs" ".vr" ".tps" ".tp" ".pgs" ".pg" ".kys"
			 ".ky" ".fns" ".fn" ".cps" ".cp" ".bbl" ".blg"
			 ".glo" ".lot" ".lof" ".idx" ".dvi" ".aux" ".log"
			 ".toc")
 dired-omit-files nil
 dired-omit-regexps '("\\`#" "\\`\\.")
 dired-refresh-automatically t
 dired-show-ls-switches nil
 dired-trivial-filenames "\\`\\.\\.?\\'\\|\\`#"
 dired-unshar-program "unshar"
 dired-use-file-transformers t
 dired-verify-modtimes t
 reporter-version "3.2"
 )