mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-05 20:43:08 +00:00
Code Issues Releases Activity

(dabbrev--select-buffers): Add a doc string.

Browse Source
This commit is contained in:
Eli Zaretskii 2001-04-26 07:40:14 +00:00
parent c46cabfaf9
commit d3111e5aa9
2 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/ChangeLog
View File

@ -1,3 +1,7 @@
2001-04-26 Eli Zaretskii <eliz@is.elta.co.il>
* dabbrev.el (dabbrev--select-buffers): Add a doc string.
2001-04-25 Gerd Moellmann <gerd@gnu.org> 2001-04-25 Gerd Moellmann <gerd@gnu.org>
* faces.el (tty-handle-reverse-video): Don't set inverse-video. * faces.el (tty-handle-reverse-video): Don't set inverse-video.

5
lisp/dabbrev.el
View File

@ -651,6 +651,11 @@ See also `dabbrev-abbrev-char-regexp' and \\[dabbrev-completion]."
;;; Find all buffers that are considered "friends" according to the ;;; Find all buffers that are considered "friends" according to the
;;; function pointed out by dabbrev-friend-buffer-function. ;;; function pointed out by dabbrev-friend-buffer-function.
(defun dabbrev--select-buffers () (defun dabbrev--select-buffers ()
"Return a list of all buffers that should be searched for a possible abbrev.
This function makes a list of all the buffers returned by `buffer-list', and
then filters out every buffer for which `dabbrev-friend-buffer-function',
if it is bound, returns nil. The resulting partial list is returned."
(save-excursion (save-excursion
(and (window-minibuffer-p (selected-window)) (and (window-minibuffer-p (selected-window))
(set-buffer (dabbrev--minibuffer-origin))) (set-buffer (dabbrev--minibuffer-origin)))