From: Jimmy Aguilar Mena Date: Wed, 26 Aug 2020 20:20:52 +0000 (+0200) Subject: Fix initial comment in completions-highlight file. X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d4d9f6a0adf9440dbc6141d834b8dabba53f5fef;p=emacs.git Fix initial comment in completions-highlight file. * lisp/completions-highlight.el : Remove and fix some comments. --- diff --git a/lisp/completions-highlight.el b/lisp/completions-highlight.el index d601f17703e..d6c7d5ab0e9 100644 --- a/lisp/completions-highlight.el +++ b/lisp/completions-highlight.el @@ -1,4 +1,4 @@ -;;; icomplete.el --- minibuffer completion incremental feedback -*- lexical-binding: t -*- +;;; completions-highlight.el --- highlight and natural move throw *Completions* buffer -*- lexical-binding: t -*- ;; Copyright (C) 2020 Free Software Foundation, Inc. @@ -28,20 +28,12 @@ ;; interacting with Zle from zsh shell. ;; The package intents to implement such functionalities without using -;; hacks or complex functions. And using the default Emacs Completion +;; hacks or complex functions. And using the default Emacs *Completions* ;; infrastructure. ;;; Code: -;; minibuffer part - -;; (defcustom minibuffer-tab-go-completion t -;; "If a second `TAB' jump to completion buffer." -;; :type 'boolean -;; :version "28.1" -;; :group 'completion) - (require 'simple) (require 'minibuffer) @@ -51,6 +43,8 @@ (defvar minibuffer-tab-through-completions-function-save nil "Saves the the original value of completion-in-minibuffer-scroll-window.") +;; *Completions* side commands + (defun completions-highlight-this-completion (&optional n) "Highlight the completion under point or near. N is set to 1 if not specified." @@ -59,8 +53,6 @@ N is set to 1 if not specified." (next-completion n) (completions-highlight-next-completion (* -1 n))) -;; *Completions* side commands - (defun completions-highlight-next-completion (n) "Move to and highlight the next item in the completion list. With prefix argument N, move N items (negative N means move backward).