From aab5bfd074e57d06a79e39d7c7c4760e1f385a06 Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Mon, 17 Oct 2022 21:41:28 -0500 Subject: Bankruptcy 9 --- lisp/+vertico.el | 24 ------------------------ 1 file changed, 24 deletions(-) delete mode 100644 lisp/+vertico.el (limited to 'lisp/+vertico.el') diff --git a/lisp/+vertico.el b/lisp/+vertico.el deleted file mode 100644 index d4fb3a3..0000000 --- a/lisp/+vertico.el +++ /dev/null @@ -1,24 +0,0 @@ -;;; +vertico.el -*- lexical-binding: t; -*- - -;;; Code: - -;; https://old.reddit.com/r/emacs/comments/rbmfwk/weekly_tips_tricks_c_thread/hof7rz7/ -;; Add this advice to `vertico-next'. -;; Takes care of `vertico-previous' as well, since it calls `vertico-next'. -(defun +vertico-ding-wrap (origin &rest args) - "ADVICE to wrap `vertico-next': ding when wrapping." - (let ((beg-index vertico--index)) - (apply origin args) - (unless (eq 1 (abs (- beg-index vertico--index))) - (ding)))) - -(defun +vertico-widen-or-complete () - (interactive) - (if (or vertico-unobtrusive-mode - vertico-flat-mode) - (progn (vertico-unobtrusive-mode -1) - (vertico-flat-mode -1)) - (call-interactively #'vertico-insert))) - -(provide '+vertico) -;;; +vertico.el ends here -- cgit 1.4.1-21-gabe81