Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

ivy-display-function-overlay does not work. #2048

Closed
AmaiKinono opened this issue May 2, 2019 · 6 comments
Closed

ivy-display-function-overlay does not work. #2048

AmaiKinono opened this issue May 2, 2019 · 6 comments

Comments

@AmaiKinono
Copy link
Contributor

@AmaiKinono AmaiKinono commented May 2, 2019

I put this in my init.el:

(setq ivy-display-function #'ivy-display-function-overlay)

After restarting emacs, ivy still displays the candidates in minibuffer. If I manually eval the above expression, then any command using ivy (e.g. counsel-M-x) throws:

Wrong type argument: integer-or-marker-p, nil

I assume this is a problem of ivy-display-function-overlay, since functions from the package ivy-posframe works well.

basil-conto added a commit to basil-conto/swiper that referenced this issue May 2, 2019
(ivy-display-function-overlay): Pad to current-column when
ivy-completion-beg is unset.

Fixes abo-abo#2048
@basil-conto
Copy link
Collaborator

@basil-conto basil-conto commented May 2, 2019

After restarting emacs, ivy still displays the candidates in minibuffer.

I cannot reproduce this.

If I manually eval the above expression, then any command using ivy (e.g. counsel-M-x) throws:

More precisely:

  1. make plain
  2. (setq debug-on-error t ivy-display-function #'ivy-display-function-overlay)
  3. C-j
  4. M-x
Debugger entered--Lisp error: (wrong-type-argument integer-or-marker-p nil)
  goto-char(nil)
  (save-excursion (goto-char ivy-completion-beg) (current-column))
  (+ (if (and (eq major-mode 'org-mode) (and (boundp 'org-indent-mode) org-indent-mode)) 1 0) (save-excursion (goto-char ivy-completion-beg) (current-column)))
  (ivy-left-pad (ivy--remove-prefix "\n" str) (+ (if (and (eq major-mode 'org-mode) (and (boundp 'org-indent-mode) org-indent-mode)) 1 0) (save-excursion (goto-char ivy-completion-beg) (current-column))))
  (list "\n" (ivy-left-pad (ivy--remove-prefix "\n" str) (+ (if (and (eq major-mode 'org-mode) (and (boundp 'org-indent-mode) org-indent-mode)) 1 0) (save-excursion (goto-char ivy-completion-beg) (current-column)))))
  (and (> (length str) 0) (list "\n" (ivy-left-pad (ivy--remove-prefix "\n" str) (+ (if (and (eq major-mode 'org-mode) (and (boundp ...) org-indent-mode)) 1 0) (save-excursion (goto-char ivy-completion-beg) (current-column))))))
  (apply #'concat (buffer-substring (max (point-min) (1- (point))) (point)) ivy-text (and (eolp) " ") (buffer-substring (point) (line-end-position)) (and (> (length str) 0) (list "\n" (ivy-left-pad (ivy--remove-prefix "\n" str) (+ (if (and (eq major-mode ...) (and ... org-indent-mode)) 1 0) (save-excursion (goto-char ivy-completion-beg) (current-column)))))))
  (let ((overlay-str (apply #'concat (buffer-substring (max (point-min) (1- (point))) (point)) ivy-text (and (eolp) " ") (buffer-substring (point) (line-end-position)) (and (> (length str) 0) (list "\n" (ivy-left-pad (ivy--remove-prefix "\n" str) (+ ... ...))))))) (let ((cursor-offset (1+ (length ivy-text)))) (ivy-add-face-text-property cursor-offset (1+ cursor-offset) 'ivy-cursor overlay-str t)) (ivy-overlay-show-after overlay-str))
  (progn (select-window (car save-selected-window--state) 'norecord) (if cursor-type (progn (setq ivy--old-cursor-type cursor-type))) (setq cursor-type nil) (let ((overlay-str (apply #'concat (buffer-substring (max (point-min) (1- ...)) (point)) ivy-text (and (eolp) " ") (buffer-substring (point) (line-end-position)) (and (> (length str) 0) (list "\n" (ivy-left-pad ... ...)))))) (let ((cursor-offset (1+ (length ivy-text)))) (ivy-add-face-text-property cursor-offset (1+ cursor-offset) 'ivy-cursor overlay-str t)) (ivy-overlay-show-after overlay-str)))
  (unwind-protect (progn (select-window (car save-selected-window--state) 'norecord) (if cursor-type (progn (setq ivy--old-cursor-type cursor-type))) (setq cursor-type nil) (let ((overlay-str (apply #'concat (buffer-substring (max ... ...) (point)) ivy-text (and (eolp) " ") (buffer-substring (point) (line-end-position)) (and (> ... 0) (list "\n" ...))))) (let ((cursor-offset (1+ (length ivy-text)))) (ivy-add-face-text-property cursor-offset (1+ cursor-offset) 'ivy-cursor overlay-str t)) (ivy-overlay-show-after overlay-str))) (internal--after-with-selected-window save-selected-window--state))
  (save-current-buffer (unwind-protect (progn (select-window (car save-selected-window--state) 'norecord) (if cursor-type (progn (setq ivy--old-cursor-type cursor-type))) (setq cursor-type nil) (let ((overlay-str (apply #'concat (buffer-substring ... ...) ivy-text (and ... " ") (buffer-substring ... ...) (and ... ...)))) (let ((cursor-offset (1+ ...))) (ivy-add-face-text-property cursor-offset (1+ cursor-offset) 'ivy-cursor overlay-str t)) (ivy-overlay-show-after overlay-str))) (internal--after-with-selected-window save-selected-window--state)))
  (let ((save-selected-window--state (internal--before-with-selected-window (ivy--get-window ivy-last)))) (save-current-buffer (unwind-protect (progn (select-window (car save-selected-window--state) 'norecord) (if cursor-type (progn (setq ivy--old-cursor-type cursor-type))) (setq cursor-type nil) (let ((overlay-str (apply ... ... ivy-text ... ... ...))) (let ((cursor-offset ...)) (ivy-add-face-text-property cursor-offset (1+ cursor-offset) 'ivy-cursor overlay-str t)) (ivy-overlay-show-after overlay-str))) (internal--after-with-selected-window save-selected-window--state))))
  (if (let ((save-selected-window--state (internal--before-save-selected-window))) (save-current-buffer (unwind-protect (progn (select-window (ivy-state-window ivy-last)) (ivy-overlay-impossible-p str)) (internal--after-save-selected-window save-selected-window--state)))) (let ((buffer-undo-list t)) (save-excursion (forward-line 1) (insert str))) (ivy-add-face-text-property (minibuffer-prompt-end) (point-max) '(:foreground "white")) (setq cursor-type nil) (let ((save-selected-window--state (internal--before-with-selected-window (ivy--get-window ivy-last)))) (save-current-buffer (unwind-protect (progn (select-window (car save-selected-window--state) 'norecord) (if cursor-type (progn (setq ivy--old-cursor-type cursor-type))) (setq cursor-type nil) (let ((overlay-str ...)) (let (...) (ivy-add-face-text-property cursor-offset ... ... overlay-str t)) (ivy-overlay-show-after overlay-str))) (internal--after-with-selected-window save-selected-window--state)))))
  ivy-display-function-overlay(#("\n2C-associate-buffer\n2C-command (<f2>)\n2C-split\n2C..." 0 1 (read-only nil) 1 20 (read-only nil face ((:foreground "white") ivy-current-match) help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) 20 21 (read-only nil) 21 33 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) 33 37 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight face counsel-key-binding) 37 38 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) 38 39 (read-only nil) 39 47 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) 47 48 (read-only nil) 48 62 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) 62 63 (read-only nil) 63 66 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) 66 67 (read-only nil) 67 76 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) 76 77 (read-only nil) 77 100 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) ...))
  funcall(ivy-display-function-overlay #("\n2C-associate-buffer\n2C-command (<f2>)\n2C-split\n2C..." 0 1 (read-only nil) 1 20 (read-only nil face ((:foreground "white") ivy-current-match) help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) 20 21 (read-only nil) 21 33 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) 33 37 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight face counsel-key-binding) 37 38 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) 38 39 (read-only nil) 39 47 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) 47 48 (read-only nil) 48 62 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) 62 63 (read-only nil) 63 66 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) 66 67 (read-only nil) 67 76 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) 76 77 (read-only nil) 77 100 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) ...))
  (if ivy-display-function (funcall ivy-display-function text) (ivy-display-function-fallback text))
  (progn (if ivy-display-function (funcall ivy-display-function text) (ivy-display-function-fallback text)))
  (if (stringp text) (progn (if ivy-display-function (funcall ivy-display-function text) (ivy-display-function-fallback text))))
  (progn (select-window (car save-selected-window--state) 'norecord) (ivy--cleanup) (if update-fn (progn (funcall update-fn))) (ivy--insert-prompt) (if (stringp text) (progn (if ivy-display-function (funcall ivy-display-function text) (ivy-display-function-fallback text)))) (ivy--resize-minibuffer-to-fit) (if (region-active-p) (progn (set-mark old-mark))))
  (unwind-protect (progn (select-window (car save-selected-window--state) 'norecord) (ivy--cleanup) (if update-fn (progn (funcall update-fn))) (ivy--insert-prompt) (if (stringp text) (progn (if ivy-display-function (funcall ivy-display-function text) (ivy-display-function-fallback text)))) (ivy--resize-minibuffer-to-fit) (if (region-active-p) (progn (set-mark old-mark)))) (internal--after-with-selected-window save-selected-window--state))
  (save-current-buffer (unwind-protect (progn (select-window (car save-selected-window--state) 'norecord) (ivy--cleanup) (if update-fn (progn (funcall update-fn))) (ivy--insert-prompt) (if (stringp text) (progn (if ivy-display-function (funcall ivy-display-function text) (ivy-display-function-fallback text)))) (ivy--resize-minibuffer-to-fit) (if (region-active-p) (progn (set-mark old-mark)))) (internal--after-with-selected-window save-selected-window--state)))
  (let ((save-selected-window--state (internal--before-with-selected-window win))) (save-current-buffer (unwind-protect (progn (select-window (car save-selected-window--state) 'norecord) (ivy--cleanup) (if update-fn (progn (funcall update-fn))) (ivy--insert-prompt) (if (stringp text) (progn (if ivy-display-function (funcall ivy-display-function text) (ivy-display-function-fallback text)))) (ivy--resize-minibuffer-to-fit) (if (region-active-p) (progn (set-mark old-mark)))) (internal--after-with-selected-window save-selected-window--state))))
  (progn (let ((save-selected-window--state (internal--before-with-selected-window win))) (save-current-buffer (unwind-protect (progn (select-window (car save-selected-window--state) 'norecord) (ivy--cleanup) (if update-fn (progn (funcall update-fn))) (ivy--insert-prompt) (if (stringp text) (progn (if ivy-display-function ... ...))) (ivy--resize-minibuffer-to-fit) (if (region-active-p) (progn (set-mark old-mark)))) (internal--after-with-selected-window save-selected-window--state)))))
  (if win (progn (let ((save-selected-window--state (internal--before-with-selected-window win))) (save-current-buffer (unwind-protect (progn (select-window (car save-selected-window--state) 'norecord) (ivy--cleanup) (if update-fn (progn ...)) (ivy--insert-prompt) (if (stringp text) (progn ...)) (ivy--resize-minibuffer-to-fit) (if (region-active-p) (progn ...))) (internal--after-with-selected-window save-selected-window--state))))))
  (let ((resize-mini-windows nil) (update-fn (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal 'wrong-type-argument (list 'ivy-state ivy-last))) (aref ivy-last 9))) (old-mark (marker-position (mark-marker))) (win (active-minibuffer-window)) deactivate-mark) (if win (progn (let ((save-selected-window--state (internal--before-with-selected-window win))) (save-current-buffer (unwind-protect (progn (select-window ... ...) (ivy--cleanup) (if update-fn ...) (ivy--insert-prompt) (if ... ...) (ivy--resize-minibuffer-to-fit) (if ... ...)) (internal--after-with-selected-window save-selected-window--state)))))))
  ivy--insert-minibuffer(#("\n2C-associate-buffer\n2C-command (<f2>)\n2C-split\n2C..." 0 1 (read-only nil) 1 20 (read-only nil face ((:foreground "white") ivy-current-match) help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) 20 21 (read-only nil) 21 33 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) 33 37 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight face counsel-key-binding) 37 38 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) 38 39 (read-only nil) 39 47 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) 47 48 (read-only nil) 48 62 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) 62 63 (read-only nil) 63 66 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) 66 67 (read-only nil) 67 76 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) 76 77 (read-only nil) 77 100 (read-only nil help-echo (format (if tooltip-mode "mouse-1: %s\nmouse-3: %s" "mouse-1: %s   mouse-3: %s") ivy-mouse-1-tooltip ivy-mouse-3-tooltip) mouse-face ivy-minibuffer-match-highlight) ...))
  (if (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal 'wrong-type-argument (list 'ivy-state ivy-last))) (aref ivy-last 19)) (let ((inhibit-message t)) (if (equal ivy--old-text ivy-text) nil (condition-case nil (let ((inhibit-quit nil)) (catch 'input (let (... val) (setq val ...) (cond ... ... ...)))) (quit (setq quit-flag t) (eval '(ignore nil))))) (if (or ivy--all-candidates (not (get-process " *counsel*"))) (progn (ivy--insert-minibuffer (ivy--format ivy--all-candidates))))) (cond (ivy--directory (cond ((or (string= "~/" ivy-text) (and (string= "~" ivy-text) ivy-magic-tilde)) (ivy--cd (expand-file-name "~/"))) ((string-match "/\\'" ivy-text) (ivy--magic-file-slash)))) ((eq (progn (or (and (memq ... cl-struct-ivy-state-tags) t) (signal 'wrong-type-argument (list ... ivy-last))) (aref ivy-last 2)) #'internal-complete-buffer) (if (or (and (string-match "\\` " ivy-text) (not (string-match "\\` " ivy--old-text))) (and (string-match "\\` " ivy--old-text) (not (string-match "\\` " ivy-text)))) (progn (setq ivy--all-candidates (if (= ... 32) (ivy--buffer-list " ") (ivy--buffer-list "" ivy-use-virtual-buffers))) (setq ivy--old-re nil))))) (ivy--insert-minibuffer (save-current-buffer (set-buffer (progn (or (and (memq ... cl-struct-ivy-state-tags) t) (signal 'wrong-type-argument (list ... ivy-last))) (aref ivy-last 13))) (ivy--format (ivy--filter ivy-text ivy--all-candidates)))) (setq ivy--old-text ivy-text))
  (progn (let ((inhibit-field-text-motion nil)) (constrain-to-field nil (point-max))) (setq ivy-text (ivy--input)) (if (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal 'wrong-type-argument (list 'ivy-state ivy-last))) (aref ivy-last 19)) (let ((inhibit-message t)) (if (equal ivy--old-text ivy-text) nil (condition-case nil (let ((inhibit-quit nil)) (catch 'input (let ... ... ...))) (quit (setq quit-flag t) (eval '...)))) (if (or ivy--all-candidates (not (get-process " *counsel*"))) (progn (ivy--insert-minibuffer (ivy--format ivy--all-candidates))))) (cond (ivy--directory (cond ((or (string= "~/" ivy-text) (and ... ivy-magic-tilde)) (ivy--cd (expand-file-name "~/"))) ((string-match "/\\'" ivy-text) (ivy--magic-file-slash)))) ((eq (progn (or (and ... t) (signal ... ...)) (aref ivy-last 2)) #'internal-complete-buffer) (if (or (and (string-match "\\` " ivy-text) (not ...)) (and (string-match "\\` " ivy--old-text) (not ...))) (progn (setq ivy--all-candidates (if ... ... ...)) (setq ivy--old-re nil))))) (ivy--insert-minibuffer (save-current-buffer (set-buffer (progn (or (and ... t) (signal ... ...)) (aref ivy-last 13))) (ivy--format (ivy--filter ivy-text ivy--all-candidates)))) (setq ivy--old-text ivy-text)))
  (if (memq 'ivy--queue-exhibit post-command-hook) (progn (let ((inhibit-field-text-motion nil)) (constrain-to-field nil (point-max))) (setq ivy-text (ivy--input)) (if (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal 'wrong-type-argument (list 'ivy-state ivy-last))) (aref ivy-last 19)) (let ((inhibit-message t)) (if (equal ivy--old-text ivy-text) nil (condition-case nil (let (...) (catch ... ...)) (quit (setq quit-flag t) (eval ...)))) (if (or ivy--all-candidates (not (get-process " *counsel*"))) (progn (ivy--insert-minibuffer (ivy--format ivy--all-candidates))))) (cond (ivy--directory (cond ((or ... ...) (ivy--cd ...)) ((string-match "/\\'" ivy-text) (ivy--magic-file-slash)))) ((eq (progn (or ... ...) (aref ivy-last 2)) #'internal-complete-buffer) (if (or (and ... ...) (and ... ...)) (progn (setq ivy--all-candidates ...) (setq ivy--old-re nil))))) (ivy--insert-minibuffer (save-current-buffer (set-buffer (progn (or ... ...) (aref ivy-last 13))) (ivy--format (ivy--filter ivy-text ivy--all-candidates)))) (setq ivy--old-text ivy-text))))
  ivy--exhibit()
  ivy--minibuffer-setup()
  funcall(ivy--minibuffer-setup)
  (closure ((setup-hook . #0) (fun . ivy--minibuffer-setup) (height . 10) (transformer-fn . counsel-M-x-transformer) (caller . counsel-M-x) (dynamic-collection) (matcher) (re-builder) (unwind) (action 1 ("o" (closure ((externs) (initial-input) smex-ido-cache smex-initialized-p amx-cache amx-initialized info-lookup-mode find-tag-marker-ring company-common company-point company-candidates t) (cmd) (setq cmd (intern cmd)) (cond ((and ... amx-initialized) (amx-rank cmd)) ((and ... smex-initialized-p) (smex-rank cmd))) (setq prefix-arg current-prefix-arg) (setq this-command cmd) (setq real-this-command cmd) (command-execute cmd 'record)) "default") ("i" (closure (bookmark-alist recentf-list Info-complete-menu-buffer avy-styles-alist avy-style avy-keys-alist avy-keys avy-action avy-all-windows cl-struct-ivy-state-tags t) (x) (insert (if (stringp x) x (car x)))) "insert") ("w" (closure (bookmark-alist recentf-list Info-complete-menu-buffer avy-styles-alist avy-style avy-keys-alist avy-keys avy-action avy-all-windows cl-struct-ivy-state-tags t) (x) (kill-new (if (stringp x) x (car x)))) "copy") ("d" counsel--find-symbol "definition") ("h" (closure (smex-ido-cache smex-initialized-p amx-cache amx-initialized info-lookup-mode find-tag-marker-ring company-common company-point company-candidates t) (x) (describe-function (intern x))) "help")) (sort . t) (update-fn) (keymap keymap (67108908 . counsel--info-lookup-symbol) (67108910 . counsel-find-symbol)) (def) (preselect) (history . counsel-M-x-history) (initial-input) (require-match . t) (predicate closure ((externs) (initial-input) smex-ido-cache smex-initialized-p amx-cache amx-initialized info-lookup-mode find-tag-marker-ring company-common company-point company-candidates t) (sym) (and (commandp sym) (not (get sym 'byte-obsolete-info)))) (--cl-rest-- :predicate (closure ((externs) (initial-input) smex-ido-cache smex-initialized-p amx-cache amx-initialized info-lookup-mode find-tag-marker-ring company-common company-point company-candidates t) (sym) (and (commandp sym) (not (get sym 'byte-obsolete-info)))) :require-match t :history counsel-M-x-history :action (closure ((externs) (initial-input) smex-ido-cache smex-initialized-p amx-cache amx-initialized info-lookup-mode find-tag-marker-ring company-common company-point company-candidates t) (cmd) (setq cmd (intern cmd)) (cond ((and (boundp ...) amx-initialized) (amx-rank cmd)) ((and (boundp ...) smex-initialized-p) (smex-rank cmd))) (setq prefix-arg current-prefix-arg) (setq this-command cmd) (setq real-this-command cmd) (command-execute cmd 'record)) :sort t :keymap (keymap (67108908 . counsel--info-lookup-symbol) (67108910 . counsel-find-symbol)) :initial-input nil :caller counsel-M-x) (collection . [0 0 ansi-color-apply-overlay-face isearch--state-pop-fun--cmacro locals 0 kinsoku xselect--int-to-cons input-method-verbose-flag url-setup-privacy-info counsel-alias-expand junet-dos help-variable 0 0 0 0 dired-backup-diff separator-prog defun-prompt-regexp _message 0 dired-at-point pulse-momentary-highlight-region cl-print--preprocess ivy-sort-file-function-default selinux-context byte-compile-function-warn memory-use-counts counsel-switch-buffer-other-window 0 0 xref-w-dedicated being 0 0 dired-before-readin-hook ibuffer-update cl--loop-initially \' 0 M-kp-down * + muletibetan-2 - 0 / cl-structure-object 0 ...]) (prompt . "M-x ") avy-styles-alist avy-style avy-keys-alist avy-keys avy-action avy-all-windows cl-struct-ivy-state-tags t) nil (remove-hook 'minibuffer-setup-hook setup-hook) (funcall fun))()
  read-from-minibuffer("M-x " "^" (keymap (keymap (67108908 . counsel--info-lookup-symbol) (67108910 . counsel-find-symbol)) keymap (36 . ivy-magic-read-file-env) (3 keymap (19 . ivy-rotate-sort) (1 . ivy-toggle-ignore) (15 . ivy-occur)) (67108903 . ivy-avy) (33554464 . ivy-restrict-to-matches) (15 . hydra-ivy/body) (22 . ivy-scroll-up-command) (prior . ivy-scroll-down-command) (next . ivy-scroll-up-command) (7 . minibuffer-keyboard-quit) (right . ivy-forward-char) (32 . self-insert-command) (18 . ivy-reverse-i-search) (19 . ivy-next-line-or-history) (remap keymap (describe-mode . ivy-help) (kill-ring-save . ivy-kill-ring-save) (kill-whole-line . ivy-kill-whole-line) (kill-line . ivy-kill-line) (scroll-down-command . ivy-scroll-down-command) (scroll-up-command . ivy-scroll-up-command) (end-of-buffer . ivy-end-of-buffer) (beginning-of-buffer . ivy-beginning-of-buffer) (kill-word . ivy-kill-word) (forward-char . ivy-forward-char) (delete-char . ivy-delete-char) (backward-kill-word . ivy-backward-kill-word) (backward-delete-char-untabify . ivy-backward-delete-char) (delete-backward-char . ivy-backward-delete-char) (previous-line . ivy-previous-line) (next-line . ivy-next-line)) (9 . ivy-partial-or-done) (10 . ivy-alt-done) (27 keymap (1 . ivy-read-action) (15 . ivy-dispatching-call) (111 . ivy-dispatching-done) (105 . ivy-insert-current) (106 . ivy-yank-word) (114 . ivy-toggle-regexp-quote) (16 . ivy-previous-line-and-call) (14 . ivy-next-line-and-call) (118 . ivy-scroll-down-command) (112 . ivy-previous-history-element) (110 . ivy-next-history-element) (10 . ivy-immediate-done) (13 . ivy-call)) (mouse-3 . ivy-mouse-dispatching-done) (mouse-1 . ivy-mouse-done) (down-mouse-1 . ignore) (13 . ivy-done)) nil counsel-M-x-history)
  (if (and ivy-auto-select-single-candidate ivy--all-candidates (null (cdr ivy--all-candidates))) (progn (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal 'wrong-type-argument (list 'ivy-state ivy-last))) (let* ((v ivy-last)) (aset v 23 (car ivy--all-candidates)))) (setq ivy-exit 'done)) (read-from-minibuffer prompt (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal 'wrong-type-argument (list 'ivy-state ivy-last))) (aref ivy-last 5)) (make-composed-keymap keymap ivy-minibuffer-map) nil hist))
  (let* ((hist (or history 'ivy-history)) (minibuffer-completion-table collection) (minibuffer-completion-predicate predicate) (ivy-height height) (resize-mini-windows (if (display-graphic-p) nil 'grow-only))) (if (and ivy-auto-select-single-candidate ivy--all-candidates (null (cdr ivy--all-candidates))) (progn (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal 'wrong-type-argument (list 'ivy-state ivy-last))) (let* ((v ivy-last)) (aset v 23 (car ivy--all-candidates)))) (setq ivy-exit 'done)) (read-from-minibuffer prompt (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal 'wrong-type-argument (list 'ivy-state ivy-last))) (aref ivy-last 5)) (make-composed-keymap keymap ivy-minibuffer-map) nil hist)) (if (eq ivy-exit 'done) (progn (let ((item (if ivy--directory (progn ... ...) ivy-text))) (if (equal item "") nil (set hist (cons (propertize item ... ivy--index) (delete item ...))))))) (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal 'wrong-type-argument (list 'ivy-state ivy-last))) (aref ivy-last 23)))
  (progn (add-hook 'minibuffer-setup-hook setup-hook) (let* ((hist (or history 'ivy-history)) (minibuffer-completion-table collection) (minibuffer-completion-predicate predicate) (ivy-height height) (resize-mini-windows (if (display-graphic-p) nil 'grow-only))) (if (and ivy-auto-select-single-candidate ivy--all-candidates (null (cdr ivy--all-candidates))) (progn (progn (or (and (memq ... cl-struct-ivy-state-tags) t) (signal 'wrong-type-argument (list ... ivy-last))) (let* ((v ivy-last)) (aset v 23 (car ivy--all-candidates)))) (setq ivy-exit 'done)) (read-from-minibuffer prompt (progn (or (and (memq ... cl-struct-ivy-state-tags) t) (signal 'wrong-type-argument (list ... ivy-last))) (aref ivy-last 5)) (make-composed-keymap keymap ivy-minibuffer-map) nil hist)) (if (eq ivy-exit 'done) (progn (let ((item (if ivy--directory ... ivy-text))) (if (equal item "") nil (set hist (cons ... ...)))))) (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal 'wrong-type-argument (list 'ivy-state ivy-last))) (aref ivy-last 23))))
  (unwind-protect (progn (add-hook 'minibuffer-setup-hook setup-hook) (let* ((hist (or history 'ivy-history)) (minibuffer-completion-table collection) (minibuffer-completion-predicate predicate) (ivy-height height) (resize-mini-windows (if (display-graphic-p) nil 'grow-only))) (if (and ivy-auto-select-single-candidate ivy--all-candidates (null (cdr ivy--all-candidates))) (progn (progn (or (and ... t) (signal ... ...)) (let* (...) (aset v 23 ...))) (setq ivy-exit 'done)) (read-from-minibuffer prompt (progn (or (and ... t) (signal ... ...)) (aref ivy-last 5)) (make-composed-keymap keymap ivy-minibuffer-map) nil hist)) (if (eq ivy-exit 'done) (progn (let ((item ...)) (if (equal item "") nil (set hist ...))))) (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal 'wrong-type-argument (list 'ivy-state ivy-last))) (aref ivy-last 23)))) (remove-hook 'minibuffer-setup-hook setup-hook))
  (let ((fun #'ivy--minibuffer-setup) setup-hook) (setq setup-hook #'(lambda nil (remove-hook 'minibuffer-setup-hook setup-hook) (funcall fun))) (unwind-protect (progn (add-hook 'minibuffer-setup-hook setup-hook) (let* ((hist (or history 'ivy-history)) (minibuffer-completion-table collection) (minibuffer-completion-predicate predicate) (ivy-height height) (resize-mini-windows (if (display-graphic-p) nil 'grow-only))) (if (and ivy-auto-select-single-candidate ivy--all-candidates (null (cdr ivy--all-candidates))) (progn (progn (or ... ...) (let* ... ...)) (setq ivy-exit 'done)) (read-from-minibuffer prompt (progn (or ... ...) (aref ivy-last 5)) (make-composed-keymap keymap ivy-minibuffer-map) nil hist)) (if (eq ivy-exit 'done) (progn (let (...) (if ... nil ...)))) (progn (or (and (memq ... cl-struct-ivy-state-tags) t) (signal 'wrong-type-argument (list ... ivy-last))) (aref ivy-last 23)))) (remove-hook 'minibuffer-setup-hook setup-hook)))
  (unwind-protect (let ((fun #'ivy--minibuffer-setup) setup-hook) (setq setup-hook #'(lambda nil (remove-hook 'minibuffer-setup-hook setup-hook) (funcall fun))) (unwind-protect (progn (add-hook 'minibuffer-setup-hook setup-hook) (let* ((hist (or history ...)) (minibuffer-completion-table collection) (minibuffer-completion-predicate predicate) (ivy-height height) (resize-mini-windows (if ... nil ...))) (if (and ivy-auto-select-single-candidate ivy--all-candidates (null ...)) (progn (progn ... ...) (setq ivy-exit ...)) (read-from-minibuffer prompt (progn ... ...) (make-composed-keymap keymap ivy-minibuffer-map) nil hist)) (if (eq ivy-exit 'done) (progn (let ... ...))) (progn (or (and ... t) (signal ... ...)) (aref ivy-last 23)))) (remove-hook 'minibuffer-setup-hook setup-hook))) (put 'post-command-hook 'permanent-local nil) (remove-hook 'post-command-hook #'ivy--queue-exhibit) (let ((cleanup (ivy--display-function-prop :cleanup))) (if (functionp cleanup) (progn (funcall cleanup)))) (if (setq unwind (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal 'wrong-type-argument (list 'ivy-state ivy-last))) (aref ivy-last 16))) (progn (funcall unwind))) (ivy--pulse-cleanup) (if (eq ivy-exit 'done) nil (ivy-recursive-restore)))
  (prog1 (unwind-protect (let ((fun #'ivy--minibuffer-setup) setup-hook) (setq setup-hook #'(lambda nil (remove-hook 'minibuffer-setup-hook setup-hook) (funcall fun))) (unwind-protect (progn (add-hook 'minibuffer-setup-hook setup-hook) (let* ((hist ...) (minibuffer-completion-table collection) (minibuffer-completion-predicate predicate) (ivy-height height) (resize-mini-windows ...)) (if (and ivy-auto-select-single-candidate ivy--all-candidates ...) (progn ... ...) (read-from-minibuffer prompt ... ... nil hist)) (if (eq ivy-exit ...) (progn ...)) (progn (or ... ...) (aref ivy-last 23)))) (remove-hook 'minibuffer-setup-hook setup-hook))) (put 'post-command-hook 'permanent-local nil) (remove-hook 'post-command-hook #'ivy--queue-exhibit) (let ((cleanup (ivy--display-function-prop :cleanup))) (if (functionp cleanup) (progn (funcall cleanup)))) (if (setq unwind (progn (or (and (memq ... cl-struct-ivy-state-tags) t) (signal 'wrong-type-argument (list ... ivy-last))) (aref ivy-last 16))) (progn (funcall unwind))) (ivy--pulse-cleanup) (if (eq ivy-exit 'done) nil (ivy-recursive-restore))) (ivy-call) (ivy--remove-props (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal 'wrong-type-argument (list 'ivy-state ivy-last))) (aref ivy-last 23)) 'idx))
  (let* ((ivy-recursive-last (and (active-minibuffer-window) ivy-last)) (transformer-fn (plist-get ivy--display-transformers-list (cond (caller) ((functionp collection) collection)))) (ivy-display-function (if (or ivy-recursive-last (not (window-minibuffer-p))) (progn (or ivy-display-function (ivy-alist-setting ivy-display-functions-alist caller))))) (height (ivy--height caller))) (setq ivy-last (record 'ivy-state prompt collection predicate require-match initial-input history preselect keymap (if (eq update-fn 'auto) #'(lambda nil (funcall (ivy--get-action ivy-last) (progn ... ...))) update-fn) sort (selected-frame) (selected-window) (current-buffer) nil action unwind re-builder matcher dynamic-collection transformer-fn default-directory caller nil def)) (ivy--reset-state ivy-last) (prog1 (unwind-protect (let ((fun #'ivy--minibuffer-setup) setup-hook) (setq setup-hook #'(lambda nil (remove-hook ... setup-hook) (funcall fun))) (unwind-protect (progn (add-hook 'minibuffer-setup-hook setup-hook) (let* (... ... ... ... ...) (if ... ... ...) (if ... ...) (progn ... ...))) (remove-hook 'minibuffer-setup-hook setup-hook))) (put 'post-command-hook 'permanent-local nil) (remove-hook 'post-command-hook #'ivy--queue-exhibit) (let ((cleanup (ivy--display-function-prop :cleanup))) (if (functionp cleanup) (progn (funcall cleanup)))) (if (setq unwind (progn (or (and ... t) (signal ... ...)) (aref ivy-last 16))) (progn (funcall unwind))) (ivy--pulse-cleanup) (if (eq ivy-exit 'done) nil (ivy-recursive-restore))) (ivy-call) (ivy--remove-props (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal 'wrong-type-argument (list 'ivy-state ivy-last))) (aref ivy-last 23)) 'idx)))
  (progn (let ((extra-actions (cl-delete-duplicates (append (plist-get ivy--actions-list t) (plist-get ivy--actions-list this-command) (plist-get ivy--actions-list caller)) :key #'car :test #'equal))) (if extra-actions (progn (setq action (cond ((functionp action) (cons 1 ...)) ((null action) (cons 1 ...)) (t (delete-dups ...))))))) (setq ivy-marked-candidates nil) (if caller nil (setq caller this-command)) (let ((extra-sources (plist-get ivy--sources-list caller))) (if extra-sources (progn (setq ivy--extra-candidates nil) (let ((--dolist-tail-- extra-sources)) (while --dolist-tail-- (let (...) (cond ... ...) (setq --dolist-tail-- ...))))) (setq ivy--extra-candidates '((original-source))))) (let* ((ivy-recursive-last (and (active-minibuffer-window) ivy-last)) (transformer-fn (plist-get ivy--display-transformers-list (cond (caller) ((functionp collection) collection)))) (ivy-display-function (if (or ivy-recursive-last (not (window-minibuffer-p))) (progn (or ivy-display-function (ivy-alist-setting ivy-display-functions-alist caller))))) (height (ivy--height caller))) (setq ivy-last (record 'ivy-state prompt collection predicate require-match initial-input history preselect keymap (if (eq update-fn 'auto) #'(lambda nil (funcall ... ...)) update-fn) sort (selected-frame) (selected-window) (current-buffer) nil action unwind re-builder matcher dynamic-collection transformer-fn default-directory caller nil def)) (ivy--reset-state ivy-last) (prog1 (unwind-protect (let ((fun #'ivy--minibuffer-setup) setup-hook) (setq setup-hook #'(lambda nil ... ...)) (unwind-protect (progn (add-hook ... setup-hook) (let* ... ... ... ...)) (remove-hook 'minibuffer-setup-hook setup-hook))) (put 'post-command-hook 'permanent-local nil) (remove-hook 'post-command-hook #'ivy--queue-exhibit) (let ((cleanup (ivy--display-function-prop :cleanup))) (if (functionp cleanup) (progn (funcall cleanup)))) (if (setq unwind (progn (or ... ...) (aref ivy-last 16))) (progn (funcall unwind))) (ivy--pulse-cleanup) (if (eq ivy-exit 'done) nil (ivy-recursive-restore))) (ivy-call) (ivy--remove-props (progn (or (and (memq ... cl-struct-ivy-state-tags) t) (signal 'wrong-type-argument (list ... ivy-last))) (aref ivy-last 23)) 'idx))))
  (progn (let ((--cl-keys-- --cl-rest--)) (while --cl-keys-- (cond ((memq (car --cl-keys--) '(:predicate :require-match :initial-input :history :preselect :def :keymap :update-fn :sort :action :unwind :re-builder :matcher :dynamic-collection :caller :allow-other-keys)) (setq --cl-keys-- (cdr (cdr --cl-keys--)))) ((car (cdr (memq ... --cl-rest--))) (setq --cl-keys-- nil)) (t (error "Keyword argument %s not one of (:predicate :requir..." (car --cl-keys--)))))) (progn (let ((extra-actions (cl-delete-duplicates (append (plist-get ivy--actions-list t) (plist-get ivy--actions-list this-command) (plist-get ivy--actions-list caller)) :key #'car :test #'equal))) (if extra-actions (progn (setq action (cond (... ...) (... ...) (t ...)))))) (setq ivy-marked-candidates nil) (if caller nil (setq caller this-command)) (let ((extra-sources (plist-get ivy--sources-list caller))) (if extra-sources (progn (setq ivy--extra-candidates nil) (let ((--dolist-tail-- extra-sources)) (while --dolist-tail-- (let ... ... ...)))) (setq ivy--extra-candidates '((original-source))))) (let* ((ivy-recursive-last (and (active-minibuffer-window) ivy-last)) (transformer-fn (plist-get ivy--display-transformers-list (cond (caller) (... collection)))) (ivy-display-function (if (or ivy-recursive-last (not ...)) (progn (or ivy-display-function ...)))) (height (ivy--height caller))) (setq ivy-last (record 'ivy-state prompt collection predicate require-match initial-input history preselect keymap (if (eq update-fn 'auto) #'(lambda nil ...) update-fn) sort (selected-frame) (selected-window) (current-buffer) nil action unwind re-builder matcher dynamic-collection transformer-fn default-directory caller nil def)) (ivy--reset-state ivy-last) (prog1 (unwind-protect (let ((fun ...) setup-hook) (setq setup-hook #'...) (unwind-protect (progn ... ...) (remove-hook ... setup-hook))) (put 'post-command-hook 'permanent-local nil) (remove-hook 'post-command-hook #'ivy--queue-exhibit) (let ((cleanup ...)) (if (functionp cleanup) (progn ...))) (if (setq unwind (progn ... ...)) (progn (funcall unwind))) (ivy--pulse-cleanup) (if (eq ivy-exit 'done) nil (ivy-recursive-restore))) (ivy-call) (ivy--remove-props (progn (or (and ... t) (signal ... ...)) (aref ivy-last 23)) 'idx)))))
  (let* ((predicate (car (cdr (plist-member --cl-rest-- ':predicate)))) (require-match (car (cdr (plist-member --cl-rest-- ':require-match)))) (initial-input (car (cdr (plist-member --cl-rest-- ':initial-input)))) (history (car (cdr (plist-member --cl-rest-- ':history)))) (preselect (car (cdr (plist-member --cl-rest-- ':preselect)))) (def (car (cdr (plist-member --cl-rest-- ':def)))) (keymap (car (cdr (plist-member --cl-rest-- ':keymap)))) (update-fn (car (cdr (plist-member --cl-rest-- ':update-fn)))) (sort (car (cdr (plist-member --cl-rest-- ':sort)))) (action (car (cdr (plist-member --cl-rest-- ':action)))) (unwind (car (cdr (plist-member --cl-rest-- ':unwind)))) (re-builder (car (cdr (plist-member --cl-rest-- ':re-builder)))) (matcher (car (cdr (plist-member --cl-rest-- ':matcher)))) (dynamic-collection (car (cdr (plist-member --cl-rest-- ':dynamic-collection)))) (caller (car (cdr (plist-member --cl-rest-- ':caller))))) (progn (let ((--cl-keys-- --cl-rest--)) (while --cl-keys-- (cond ((memq (car --cl-keys--) '...) (setq --cl-keys-- (cdr ...))) ((car (cdr ...)) (setq --cl-keys-- nil)) (t (error "Keyword argument %s not one of (:predicate :requir..." (car --cl-keys--)))))) (progn (let ((extra-actions (cl-delete-duplicates (append ... ... ...) :key #'car :test #'equal))) (if extra-actions (progn (setq action (cond ... ... ...))))) (setq ivy-marked-candidates nil) (if caller nil (setq caller this-command)) (let ((extra-sources (plist-get ivy--sources-list caller))) (if extra-sources (progn (setq ivy--extra-candidates nil) (let (...) (while --dolist-tail-- ...))) (setq ivy--extra-candidates '(...)))) (let* ((ivy-recursive-last (and (active-minibuffer-window) ivy-last)) (transformer-fn (plist-get ivy--display-transformers-list (cond ... ...))) (ivy-display-function (if (or ivy-recursive-last ...) (progn ...))) (height (ivy--height caller))) (setq ivy-last (record 'ivy-state prompt collection predicate require-match initial-input history preselect keymap (if (eq update-fn ...) #'... update-fn) sort (selected-frame) (selected-window) (current-buffer) nil action unwind re-builder matcher dynamic-collection transformer-fn default-directory caller nil def)) (ivy--reset-state ivy-last) (prog1 (unwind-protect (let (... setup-hook) (setq setup-hook ...) (unwind-protect ... ...)) (put 'post-command-hook 'permanent-local nil) (remove-hook 'post-command-hook #'ivy--queue-exhibit) (let (...) (if ... ...)) (if (setq unwind ...) (progn ...)) (ivy--pulse-cleanup) (if (eq ivy-exit ...) nil (ivy-recursive-restore))) (ivy-call) (ivy--remove-props (progn (or ... ...) (aref ivy-last 23)) 'idx))))))
  ivy-read("M-x " [0 0 ansi-color-apply-overlay-face isearch--state-pop-fun--cmacro locals 0 kinsoku xselect--int-to-cons input-method-verbose-flag url-setup-privacy-info counsel-alias-expand junet-dos help-variable 0 0 0 0 dired-backup-diff separator-prog defun-prompt-regexp _message 0 dired-at-point pulse-momentary-highlight-region cl-print--preprocess ivy-sort-file-function-default selinux-context byte-compile-function-warn memory-use-counts counsel-switch-buffer-other-window 0 0 xref-w-dedicated being 0 0 dired-before-readin-hook ibuffer-update cl--loop-initially \' 0 M-kp-down * + muletibetan-2 - 0 / cl-structure-object 0 ...] :predicate (closure ((externs) (initial-input) smex-ido-cache smex-initialized-p amx-cache amx-initialized info-lookup-mode find-tag-marker-ring company-common company-point company-candidates t) (sym) (and (commandp sym) (not (get sym 'byte-obsolete-info)))) :require-match t :history counsel-M-x-history :action (closure ((externs) (initial-input) smex-ido-cache smex-initialized-p amx-cache amx-initialized info-lookup-mode find-tag-marker-ring company-common company-point company-candidates t) (cmd) (setq cmd (intern cmd)) (cond ((and (boundp 'amx-initialized) amx-initialized) (amx-rank cmd)) ((and (boundp 'smex-initialized-p) smex-initialized-p) (smex-rank cmd))) (setq prefix-arg current-prefix-arg) (setq this-command cmd) (setq real-this-command cmd) (command-execute cmd 'record)) :sort t :keymap (keymap (67108908 . counsel--info-lookup-symbol) (67108910 . counsel-find-symbol)) :initial-input nil :caller counsel-M-x)
  (let ((externs (counsel--M-x-externs))) (ivy-read (counsel--M-x-prompt) (or externs obarray) :predicate (and (not externs) #'(lambda (sym) (and (commandp sym) (not (get sym ...))))) :require-match t :history 'counsel-M-x-history :action #'(lambda (cmd) (setq cmd (intern cmd)) (cond ((and (boundp ...) amx-initialized) (amx-rank cmd)) ((and (boundp ...) smex-initialized-p) (smex-rank cmd))) (setq prefix-arg current-prefix-arg) (setq this-command cmd) (setq real-this-command cmd) (command-execute cmd 'record)) :sort (not externs) :keymap counsel-describe-map :initial-input initial-input :caller 'counsel-M-x))
  counsel-M-x()
  funcall-interactively(counsel-M-x)
  call-interactively(counsel-M-x nil nil)
  command-execute(counsel-M-x)

I assume this is a problem of ivy-display-function-overlay

Seems so. Can you please check whether #2049 fixes the problem?

@AmaiKinono
Copy link
Contributor Author

@AmaiKinono AmaiKinono commented May 2, 2019

Yes, that fixes the Wrong type argument problem.

I cannot reproduce this.

I've found that if the point is at the beginning of the buffer, the candidates will be displayed in minibuffer. Other times it works perfectly.

@basil-conto
Copy link
Collaborator

@basil-conto basil-conto commented May 2, 2019

Yes, that fixes the Wrong type argument problem.

Thanks for testing.

I've found that if the point is at the beginning of the buffer, the candidates will be displayed in minibuffer. Other times it works perfectly.

That is a known limitation of ivy-overlay.el; see #1267.

@AmaiKinono
Copy link
Contributor Author

@AmaiKinono AmaiKinono commented May 2, 2019

Thanks for your work : )

That is a known limitation of ivy-overlay.el

I see. I will use overlay only for completion so that doesn't matter.

@basil-conto
Copy link
Collaborator

@basil-conto basil-conto commented May 2, 2019

Thanks for your work : )

Thanks for reporting!

@abo-abo abo-abo closed this in 6516265 May 6, 2019
@abo-abo
Copy link
Owner

@abo-abo abo-abo commented May 6, 2019

Thanks, all.

astoff added a commit to astoff/swiper that referenced this issue Jan 1, 2021
(ivy-display-function-overlay): Pad to current-column when
ivy-completion-beg is unset.

Fixes abo-abo#2048
Fixes abo-abo#2049
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Linked pull requests

Successfully merging a pull request may close this issue.

3 participants