From: Gregory Heytings Date: Mon, 28 Nov 2022 12:17:30 +0000 (+0000) Subject: Fix display of long completions. X-Git-Tag: emacs-29.0.90~1438 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6deeda411c0d2e25eab68ec4c2dccb626937e375;p=emacs.git Fix display of long completions. * lisp/minibuffer.el (completion--insert-strings): Do not assume "at least 2 columns", which is not possible when completion strings are long, e.g. with completions-detailed set. --- diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el index 6bb0fa3ae98..5faa3c8d4e8 100644 --- a/lisp/minibuffer.el +++ b/lisp/minibuffer.el @@ -2025,8 +2025,8 @@ Runs of equal candidate strings are eliminated. GROUP-FUN is a (window (get-buffer-window (current-buffer) 0)) (wwidth (if window (1- (window-width window)) 79)) (columns (min - ;; At least 2 columns; at least 2 spaces between columns. - (max 2 (/ wwidth (+ 2 length))) + ;; At least 2 spaces between columns. + (max 1 (/ wwidth (+ 2 length))) ;; Don't allocate more columns than we can fill. ;; Windows can't show less than 3 lines anyway. (max 1 (/ (length strings) 2))))