From 51553db66b4eb8bc7a0d1a1c3206e097e0cc94fa Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Sat, 1 Oct 2011 20:25:27 -0400 Subject: [PATCH] * src/minibuf.c (Finternal_complete_buffer): Only show internal buffers if they've been requested explicitly. Fixes: debbugs:9591 --- lisp/ChangeLog | 2 +- src/ChangeLog | 5 +++++ src/minibuf.c | 4 ++-- 3 files changed, 8 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 3b177ac07bf..4fcca274b06 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -582,7 +582,7 @@ * help.el (describe-key-briefly): Copy previous standard-output change. -2011-09-13 PJ Weisberg (tiny change) +2011-09-13 PJ Weisberg * help.el (where-is): Respect non-standard standard-output. (Bug#9030) diff --git a/src/ChangeLog b/src/ChangeLog index f9283730ebf..fc9a839a25b 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,8 @@ +2011-10-02 Stefan Monnier + + * minibuf.c (Finternal_complete_buffer): Only show internal buffers if + they've been requested explicitly (bug#9591). + 2011-10-01 Andreas Schwab * keymap.c (Fsingle_key_description): Use make_specified_string diff --git a/src/minibuf.c b/src/minibuf.c index 341d544ef51..f082cc01d97 100644 --- a/src/minibuf.c +++ b/src/minibuf.c @@ -1859,8 +1859,8 @@ The arguments STRING and PREDICATE are as in `try-completion', /* First, look for a non-internal buffer in `res'. */ while (CONSP (bufs) && SREF (XCAR (bufs), 0) == ' ') bufs = XCDR (bufs); - if (NILP (bufs)) - /* All bufs in `res' are internal, so don't trip them out. */ + if (NILP (bufs) && EQ (Flength (res), Flength (Vbuffer_alist))) + /* All bufs are internal, so don't trip them out. */ return res; res = bufs; while (CONSP (XCDR (bufs))) -- 2.39.2