comparison lisp/dabbrev.el @ 35921:d74e2e8f6c1f

(dabbrev-ignored-buffer-regexps): Renamed from dabbrev-ignored-regexps.

35920:2be00a14630b

  :type 'boolean
  :group 'dabbrev)

(defcustom dabbrev-ignored-buffer-names '("*Messages*" "*Buffer List*")
  "*List of buffer names that dabbrev should not check.
See also `dabbrev-ignored-regexps'."
  :type '(repeat (string :tag "Buffer name"))
  :group 'dabbrev
  :version "20.3")

(defcustom dabbrev-ignored-regexps nil
  "*List of regexps matching names of buffers that dabbrev should not check.
See also `dabbrev-ignored-buffer-names'."
  :type '(repeat regexp)
  :group 'dabbrev
  :version "21.1")

			 buffer (buffer-list)
			 (let ((bn (buffer-name buffer)))
			   (and (not (member bn dabbrev-ignored-buffer-names))
				(not (memq buffer dabbrev--friend-buffer-list))
				(not
				 (let ((tail dabbrev-ignored-regexps)
				       (match nil))
				   (while (and tail (not match))
				     (setq match (string-match (car tail) bn)
					   tail (cdr tail)))
				   match)))))

35921:d74e2e8f6c1f

  :type 'boolean
  :group 'dabbrev)

(defcustom dabbrev-ignored-buffer-names '("*Messages*" "*Buffer List*")
  "*List of buffer names that dabbrev should not check.
See also `dabbrev-ignored-buffer-regexps'."
  :type '(repeat (string :tag "Buffer name"))
  :group 'dabbrev
  :version "20.3")

(defcustom dabbrev-ignored-buffer-regexps nil
  "*List of regexps matching names of buffers that dabbrev should not check.
See also `dabbrev-ignored-buffer-names'."
  :type '(repeat regexp)
  :group 'dabbrev
  :version "21.1")

			 buffer (buffer-list)
			 (let ((bn (buffer-name buffer)))
			   (and (not (member bn dabbrev-ignored-buffer-names))
				(not (memq buffer dabbrev--friend-buffer-list))
				(not
				 (let ((tail dabbrev-ignored-buffer-regexps)
				       (match nil))
				   (while (and tail (not match))
				     (setq match (string-match (car tail) bn)
					   tail (cdr tail)))
				   match)))))