[Emacs-diffs] /srv/bzr/emacs/trunk r102655: Remove some dired.el autoload cookies on defcustoms.

[Glenn Morris]

------------------------------------------------------------
revno: 102655
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Mon 2010-12-13 20:35:33 -0800
message:
  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.
modified:
  lisp/ChangeLog
  lisp/dired.el
  lisp/mail/sendmail.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2010-12-14 04:32:14 +0000
+++ b/lisp/ChangeLog    2010-12-14 04:35:33 +0000
@@ -1,5 +1,9 @@
 2010-12-14  Glenn Morris  <address@hidden>
 
+       * dired.el (dired-trivial-filenames, dired-chown-program)
+       (dired-auto-revert-buffer): Remove autoload cookies.
+       * mail/sendmail.el (mail-recover-1): Require 'dired.
+
        * dired.el (dired-subdir-switches, dired-chown-program)
        (dired-use-ls-dired, dired-chmod-program, dired-touch-program):
        Make into defcustoms.

=== modified file 'lisp/dired.el'
--- a/lisp/dired.el     2010-12-14 04:32:14 +0000
+++ b/lisp/dired.el     2010-12-14 04:35:33 +0000
@@ -69,7 +69,6 @@
    :type '(choice (const :tag "Use dired-listing-switches" nil)
                   (string :tag "Switches")))
 
-;;;###autoload
 (defcustom dired-chown-program
   (purecopy (cond ((executable-find "chown") "chown")
                   ((file-executable-p "/usr/sbin/chown") "/usr/sbin/chown")
@@ -115,7 +114,6 @@
   :type 'boolean
   :group 'dired-mark)
 
-;;;###autoload
 (defcustom dired-trivial-filenames (purecopy "^\\.\\.?$\\|^#")
   "Regexp of files to skip when finding first file of a directory.
 A value of nil means move to the subdir line.
@@ -763,7 +761,6 @@
         buffer-read-only
         (dired-directory-changed-p dirname))))
 
-;;;###autoload
 (defcustom dired-auto-revert-buffer nil
   "Automatically revert dired buffer on revisiting.
 If t, revisiting an existing dired buffer automatically reverts it.

=== modified file 'lisp/mail/sendmail.el'
--- a/lisp/mail/sendmail.el     2010-11-27 03:29:06 +0000
+++ b/lisp/mail/sendmail.el     2010-12-14 04:35:33 +0000
@@ -1817,6 +1817,9 @@
       ;; names are normally ``trivial'', so Dired will set point after
       ;; all the files, at buffer bottom.  We want it on the first
       ;; file instead.
+      ;; Require dired so that dired-trivial-filenames does not get
+      ;; unbound on exit from the let.
+      (require 'dired)
       (let ((dired-trivial-filenames t))
        (dired-other-window wildcard (concat dired-listing-switches "t")))
       (rename-buffer "*Auto-saved Drafts*" t)