aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2010-12-13 20:35:33 -0800
committerGlenn Morris2010-12-13 20:35:33 -0800
commitaae4b48c36b85f4af4fceaeb9091cf567065649e (patch)
tree7f83925613d47fa2af2edaa45222f43072a088ba
parentbff7c1adc372497c323aaafc281a26e1e3fc46c2 (diff)
downloademacs-aae4b48c36b85f4af4fceaeb9091cf567065649e.tar.gz
emacs-aae4b48c36b85f4af4fceaeb9091cf567065649e.zip
Remove some dired.el autoload cookies on defcustoms.
* lisp/dired.el (dired-trivial-filenames, dired-chown-program) (dired-auto-revert-buffer): Remove autoload cookies. * lisp/mail/sendmail.el (mail-recover-1): Require 'dired.
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/dired.el3
-rw-r--r--lisp/mail/sendmail.el3
3 files changed, 7 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 60e1cab148d..19cd1963cff 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,9 @@
12010-12-14 Glenn Morris <rgm@gnu.org> 12010-12-14 Glenn Morris <rgm@gnu.org>
2 2
3 * dired.el (dired-trivial-filenames, dired-chown-program)
4 (dired-auto-revert-buffer): Remove autoload cookies.
5 * mail/sendmail.el (mail-recover-1): Require 'dired.
6
3 * dired.el (dired-subdir-switches, dired-chown-program) 7 * dired.el (dired-subdir-switches, dired-chown-program)
4 (dired-use-ls-dired, dired-chmod-program, dired-touch-program): 8 (dired-use-ls-dired, dired-chmod-program, dired-touch-program):
5 Make into defcustoms. 9 Make into defcustoms.
diff --git a/lisp/dired.el b/lisp/dired.el
index bf45c508456..cec4ffa2f1c 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -69,7 +69,6 @@ If nil, `dired-listing-switches' is used."
69 :type '(choice (const :tag "Use dired-listing-switches" nil) 69 :type '(choice (const :tag "Use dired-listing-switches" nil)
70 (string :tag "Switches"))) 70 (string :tag "Switches")))
71 71
72;;;###autoload
73(defcustom dired-chown-program 72(defcustom dired-chown-program
74 (purecopy (cond ((executable-find "chown") "chown") 73 (purecopy (cond ((executable-find "chown") "chown")
75 ((file-executable-p "/usr/sbin/chown") "/usr/sbin/chown") 74 ((file-executable-p "/usr/sbin/chown") "/usr/sbin/chown")
@@ -115,7 +114,6 @@ always set this variable to t."
115 :type 'boolean 114 :type 'boolean
116 :group 'dired-mark) 115 :group 'dired-mark)
117 116
118;;;###autoload
119(defcustom dired-trivial-filenames (purecopy "^\\.\\.?$\\|^#") 117(defcustom dired-trivial-filenames (purecopy "^\\.\\.?$\\|^#")
120 "Regexp of files to skip when finding first file of a directory. 118 "Regexp of files to skip when finding first file of a directory.
121A value of nil means move to the subdir line. 119A value of nil means move to the subdir line.
@@ -763,7 +761,6 @@ for a remote directory. This feature is used by Auto Revert Mode."
763 buffer-read-only 761 buffer-read-only
764 (dired-directory-changed-p dirname)))) 762 (dired-directory-changed-p dirname))))
765 763
766;;;###autoload
767(defcustom dired-auto-revert-buffer nil 764(defcustom dired-auto-revert-buffer nil
768 "Automatically revert dired buffer on revisiting. 765 "Automatically revert dired buffer on revisiting.
769If t, revisiting an existing dired buffer automatically reverts it. 766If t, revisiting an existing dired buffer automatically reverts it.
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index 7a9ab601bcc..fb193544533 100644
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -1817,6 +1817,9 @@ The seventh argument ACTIONS is a list of actions to take
1817 ;; names are normally ``trivial'', so Dired will set point after 1817 ;; names are normally ``trivial'', so Dired will set point after
1818 ;; all the files, at buffer bottom. We want it on the first 1818 ;; all the files, at buffer bottom. We want it on the first
1819 ;; file instead. 1819 ;; file instead.
1820 ;; Require dired so that dired-trivial-filenames does not get
1821 ;; unbound on exit from the let.
1822 (require 'dired)
1820 (let ((dired-trivial-filenames t)) 1823 (let ((dired-trivial-filenames t))
1821 (dired-other-window wildcard (concat dired-listing-switches "t"))) 1824 (dired-other-window wildcard (concat dired-listing-switches "t")))
1822 (rename-buffer "*Auto-saved Drafts*" t) 1825 (rename-buffer "*Auto-saved Drafts*" t)