ibuffer.el (ibuffer-mode-map): Use toggle button for

`ibuffer-auto-mode' menu entry.
(ibuffer-mode-hook): Add `ibuffer-auto-mode' customization option.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9f537d84240b9d2ea2fc14dbbfbfbca2e30ac197..8fa631f5b75323585b9f817f07d71b218e1c9ba9 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2014-08-08  Rüdiger Sonderfeld  <ruediger@c-plusplus.de>
+
+       * ibuffer.el (ibuffer-mode-map): Use toggle button for
+       `ibuffer-auto-mode' menu entry.
+       (ibuffer-mode-hook): Add `ibuffer-auto-mode' customization option.
+
 2014-08-08  Matthias Meulien  <orontee@gmail.com>
 
        * progmodes/prog-mode.el (prog-mode-hook): Make customizable.

diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el
index 7bf0858aac0d3738fce8776681e7bae7f4f92e95..833bce12c8e38abc118e1c5df32f24f9e3601c6f 100644 (file)
--- a/lisp/ibuffer.el
+++ b/lisp/ibuffer.el
@@ -350,6 +350,7 @@ directory, like `default-directory'."
 (defcustom ibuffer-mode-hook nil
   "Hook run upon entry into `ibuffer-mode'."
   :type 'hook
+  :options '(ibuffer-auto-mode)
   :group 'ibuffer)
 
 (defcustom ibuffer-load-hook nil
@@ -706,7 +707,8 @@ directory, like `default-directory'."
       '(menu-item "Diff with file" ibuffer-diff-with-file
         :help "View the differences between this buffer and its file"))
     (define-key-after map [menu-bar view auto-mode]
-      '(menu-item "Toggle Auto Mode" ibuffer-auto-mode
+      '(menu-item "Auto Mode" ibuffer-auto-mode
+        :button (:toggle . ibuffer-auto-mode)
         :help "Attempt to automatically update the Ibuffer buffer"))
     (define-key-after map [menu-bar view customize]
       '(menu-item "Customize Ibuffer" ibuffer-customize