[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/mct 08f806e 29/70: Do not set completions-detailed

From: ELPA Syncer
Subject: [elpa] externals/mct 08f806e 29/70: Do not set completions-detailed
Date: Thu, 11 Nov 2021 03:57:45 -0500 (EST)

branch: externals/mct
commit 08f806eaba9cb5f46e3bee9550d675bf5fbe020b
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Do not set completions-detailed
    Let the user handle that in their own configuration, because this is a
    stylistic matter that has nothing to do with the functionality of mct.
 README.org |  1 +
 mct.el     | 10 +++-------
 2 files changed, 4 insertions(+), 7 deletions(-)

diff --git a/README.org b/README.org
index f511691..bbfdfef 100644
--- a/README.org
+++ b/README.org
@@ -333,6 +333,7 @@ And with more options:
 Other useful extras from the Emacs source code (read their doc strings):
 #+begin_src emacs-lisp
+(setq completions-detailed t)
 (setq enable-recursive-minibuffers t)
 (setq minibuffer-eldef-shorten-default t)
diff --git a/mct.el b/mct.el
index 8da8ef2..921959d 100644
--- a/mct.el
+++ b/mct.el
@@ -755,7 +755,6 @@ To be assigned to `minibuffer-setup-hook'."
 (defvar mct--completion-show-help nil)
 (defvar mct--completion-auto-help nil)
 (defvar mct--completions-format nil)
-(defvar mct--completions-detailed nil)
 (define-minor-mode mct-mode
@@ -767,13 +766,11 @@ To be assigned to `minibuffer-setup-hook'."
         (setq mct--resize-mini-windows resize-mini-windows
               mct--completion-show-help completion-show-help
               mct--completion-auto-help completion-auto-help
-              mct--completions-format completions-format
-              mct--completions-detailed completions-detailed)
+              mct--completions-format completions-format)
         (setq resize-mini-windows t
               completion-show-help nil
               completion-auto-help t
-              completions-format mct-completions-format
-              completions-detailed t)
+              completions-format mct-completions-format)
         (let ((hook 'minibuffer-setup-hook))
           (add-hook hook #'mct--setup-completions)
           (add-hook hook #'mct--minibuffer-local-completion-map)
@@ -799,8 +796,7 @@ To be assigned to `minibuffer-setup-hook'."
     (setq resize-mini-windows mct--resize-mini-windows
           completion-show-help mct--completion-show-help
           completion-auto-help mct--completion-auto-help
-          completions-format mct--completions-format
-          completions-detailed mct--completions-detailed)
+          completions-format mct--completions-format)
     (let ((hook 'minibuffer-setup-hook))
       (remove-hook hook #'mct--setup-completions)
       (remove-hook hook #'mct--minibuffer-local-completion-map)

reply via email to

[Prev in Thread] Current Thread [Next in Thread]