From b2164af4705e141662e3fbf22605fe842182e20d Mon Sep 17 00:00:00 2001 From: =?utf8?q?R=C3=BCdiger=20Sonderfeld?= Date: Fri, 8 Aug 2014 16:35:40 +0200 Subject: [PATCH] ibuffer.el (ibuffer-mode-map): Use toggle button for `ibuffer-auto-mode' menu entry. (ibuffer-mode-hook): Add `ibuffer-auto-mode' customization option. --- lisp/ChangeLog | 6 ++++++ lisp/ibuffer.el | 4 +++- 2 files changed, 9 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 9f537d84240..8fa631f5b75 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2014-08-08 Rüdiger Sonderfeld + + * 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 * progmodes/prog-mode.el (prog-mode-hook): Make customizable. diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el index 7bf0858aac0..833bce12c8e 100644 --- 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 -- 2.39.5