aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/progmodes/grep.el14
1 files changed, 6 insertions, 8 deletions
diff --git a/lisp/progmodes/grep.el b/lisp/progmodes/grep.el
index a0b7e7d1bf5..2b44b58f245 100644
--- a/lisp/progmodes/grep.el
+++ b/lisp/progmodes/grep.el
@@ -229,20 +229,18 @@ to determine whether cdr should not be excluded."
229 229
230(defcustom grep-save-buffers 'ask 230(defcustom grep-save-buffers 'ask
231 "If non-nil, save buffers before running the grep commands. 231 "If non-nil, save buffers before running the grep commands.
232If `ask', ask before saving. If the variable is a function, it 232If `ask', ask before saving. If a function, call it with no arguments
233will be used as a predicate that should say whether the buffer should 233with each buffer current, as a predicate to determine whether that
234be saved or not. 234buffer should be saved or not. E.g., one can set this to
235E.g., one can set this to
236 (lambda () 235 (lambda ()
237 (string-prefix-p my-grep-root (file-truename (buffer-file-name)))) 236 (string-prefix-p my-grep-root (file-truename (buffer-file-name))))
238to limit saving to files located under `my-grep-root'." 237to limit saving to files located under `my-grep-root'."
239 :version "25.2" 238 :version "25.2"
240 :type '(choice 239 :type '(choice
241 (const :tag "Default (ask before saving)" ask) 240 (const :tag "Ask before saving" ask)
242 (const :tag "Don't save buffers" nil) 241 (const :tag "Don't save buffers" nil)
243 (const :tag "Save all buffers" t) 242 function
244 function) 243 (other :tag "Save all buffers" t))
245 :type 'boolean
246 :group 'grep) 244 :group 'grep)
247 245
248(defcustom grep-error-screen-columns nil 246(defcustom grep-error-screen-columns nil