显示大量内容的时候,翻页键要按很久,有没有办法让minibuffer多显示几行到屏幕半高,这样少按几次翻页键:
看你用的啥补全工具了
刚入门一个月,很多还不是太懂,这是我的配置文件:
(menu-bar-mode -1)
(tool-bar-mode -1)
;;(scroll-bar-mode -1)
(xterm-mouse-mode 1)
(mouse-wheel-mode 1)
(setq menu-bar-open-mouse t)
;;(setq mouse-wheel-progressive-speed t)
;;(setq mouse-wheel-scroll-amount 3)
(setq blink-cursor-mode nil)
(setq initial-major-mode 'text-mode)
(setq auto-save-default nil)
(setq make-backup-files nil)
(setq backup-directory-alist (quote ((".*" . "~/.emacs_backups/"))))
;;(setq max-mini-window-height 10)
;;(add-to-list 'default-frame-alist '(width . 120))
;;(add-to-list 'default-frame-alist '(height . 40))
;;(setq completion-category-overrides '((file (styles basic partial-completion))))
;;(add-to-list 'default-frame-alist '(fullscreen . maximized))
;;(use-package gruvbox-theme
;; :ensure t
;; :init (load-theme 'gruvbox-dark-hard t))
(load-theme 'modus-operandi t)
;;(modify-syntax-entry ?_ "w")
;;(setq dictionary-server "localhost")
;;(global-set-key (kbd "<F1>") 'sr-speedbar-toggle)
(setq package-archives '(("gnu" . "http://mirrors.tuna.tsinghua.edu.cn/elpa/gnu/")
("melpa" . "http://mirrors.tuna.tsinghua.edu.cn/elpa/melpa/")
("nongnu" . "http://mirrors.tuna.tsinghua.edu.cn/elpa/nongnu/")
("org" . "http://mirrors.tuna.tsinghua.edu.cn/elpa/org/")))
(package-initialize)
(setq package-check-signature nil)
(require 'package)
(unless (bound-and-true-p package--initialized)
(package-initialize))
(unless package-archive-contents
(package-refresh-contents))
(unless (package-installed-p 'use-package)
(package-refresh-contents)
(package-install 'use-package))
(setq make-backup-files nil)
(setq inhibit-startup-screen t)
(setq-default cursor-type 'bar)
(setq initial-scratch-message "")
(setq use-package-always-ensure t)
(setq use-package-always-defer t)
(setq use-package-always-demand nil)
(setq use-package-expand-minimally t)
;;(setq use-package-verbose t))
;;custom-file
(setq custom-file (expand-file-name "custom.el" user-emacs-directory))
(when (file-exists-p custom-file)
(load-file custom-file))
;;system font and ...
(defconst *is-mac* (eq system-type 'darwin))
(defconst *is-linux* (eq system-type 'gnu/linux))
(defconst *is-windows* (or (eq system-type 'ms-dos) (eq system-type 'windows-nt)))
(defun s-font()
(interactive)
;; font config for org table showing.
(set-frame-font "Consolas-12" nil t)
(dolist (charset '(kana han symbol cjk-misc bopomofo))
(set-fontset-font (frame-parameter nil 'font)
charset (font-spec :family "FZLanTingHei-M-GBK" :size 15)))
;; tune rescale so that Chinese character width = 2 * English character width
;;(setq face-font-rescale-alist '(("Consolas" . 1.0) ("FZLanTingHei-M-GBK" . 1.23)))
)
(use-package emacs
:if (display-graphic-p)
:config
(if *is-windows*
(progn
(set-face-attribute 'default nil :font "Ubuntu 10")
(dolist (charset '(kana han symbol cjk-misc bopomofo))
(set-fontset-font (frame-parameter nil 'font)
charset (font-spec :family "FZLanTingHei-M-GBK" :size 15)))))
(if *is-linux*
(progn
(add-to-list 'after-make-frame-functions
(lambda (new-frame)
(select-frame new-frame)
(if window-system
(s-font))))
(if window-system
(s-font))))
)
;;coding
(prefer-coding-system 'utf-8)
(set-default-coding-systems 'utf-8)
(set-terminal-coding-system 'utf-8)
(set-keyboard-coding-system 'utf-8)
(setq default-buffer-file-coding-system 'utf-8)
;;garbage collection
(setq gc-cons-threshold most-positive-fixnum)
;;use y/n instead of yes/no
(defalias 'yes-or-no-p 'y-or-n-p)
;;line-number relative/visual/t
(setq display-line-numbers-type 'relative)
;(unless *is-windows* (global-display-line-numbers-mode t))
(global-display-line-numbers-mode t)
;;packages
(require 'use-package)
(use-package restart-emacs)
(use-package smart-mode-line
:init
(setq sml/no-confirm-load-theme t)
(setq sml/theme 'automatic)
;(setq sml/shorten-directory t)
;(setq sml/shorten-modes t)
;(setq sml/name-width 40)
;(setq sml/mode-width 'full)
;;(setq sml/theme 'light)
(sml/setup))
(use-package benchmark-init
:init (benchmark-init/activate)
:hook (after-init . benchmark-init/deactivate))
(use-package drag-stuff
:bind (("<M-up>" . drag-stuff-up)
("<M-down>" . drag-stuff-down)))
(use-package ivy
:defer 1
:demand
:hook (after-init . ivy-mode)
:config
(ivy-mode 1)
(setq ivy-use-virtual-buffers t
ivy-initial-inputs-alist nil
ivy-count-format "%d%d "
enable-recursive-minibuffers t
ivy-re-builders-alist '((t . ivy--regex-ignore-order)))
;; (ivy-posframe-mode 1)
)
;;(use-package ivy-posframe
;; :init
;; (setq ivy-posframe-display-functions-alist '((t . ivy-posframe-display-at-frame-center)))
;; (setq ivy-posframe-height-alist '((t . 25)))
;; (setq ivy-posframe-parameters
;; '((left-fringe . 8)
;; (right-fringe . 8))))
(use-package counsel
:after (ivy)
:bind (("M-x" . counsel-M-x)
("C-x C-f" . counsel-find-file)
("C-c f" . counsel-recentf)
("C-c g" . counsel-git)))
(use-package swiper
:after ivy
:bind (("C-s" . swiper)
("C-r" . swiper-isearch-backward))
:config (setq swiper-action-recenter t
swiper-include-line-number-in-search t))
(use-package company
:config
(setq company-dabbrev-code-everywhere t
company-dabbrev-code-modes t
company-dabbrev-code-other-buffers 'all
company-dabbrev-downcase nil
company-dabbrev-ignore-case t
company-dabbrev-other-buffers 'all
company-require-match nil
company-minimum-prefix-length 2
company-show-numbers t
company-tooltip-limit 20
company-idle-delay 0
company-echo-delay 0
company-tooltip-offset-display 'scrollbar
company-begin-commands '(self-insert-command))
(push '(company-semantic :with company-yasnippet) company-backends)
:hook ((after-init . global-company-mode)))
;;(use-package flycheck
;; :hook (after-init . global-flycheck-mode))
(use-package crux
:bind (("C-a" . crux-move-beginning-of-line)
("C-c ^" . crux-top-join-line)
("C-x ," . crux-find-user-init-file)
("C-S-d" . crux-duplicate-current-line-or-region)
("C-S-k" . crux-smart-kill-line)))
(use-package which-key
:defer nil
:config (which-key-mode))
(use-package rainbow-delimiters
:init (add-hook 'prog-mode-hook 'rainbow-delimiters-mode))
(use-package highlight-parentheses
:init (add-hook 'prog-mode-hook 'highlight-parentheses-mode))
(use-package ace-window
:bind (("C-o" . 'ace-window)))
(use-package lsp-mode
:init
;; set prefix for lsp-command-keymap (few alternatives - "C-l", "C-c l")
(setq lsp-keymap-prefix "C-c l")
;; :hook ((prog-mode . (lsp-deferred)))
:hook (;; replace XXX-mode with concrete major-mode(e. g. python-mode)
(c-mode . lsp-deferred)
;;(java-mode . lsp-deferred)
;; if you want which-key integration
(lsp-mode . lsp-enable-which-key-integration))
:commands (lsp lsp-deferred))
(use-package lsp-ui :commands lsp-ui-mode)
(use-package lsp-ivy :commands lsp-ivy-workspace-symbol)
(use-package lsp-treemacs :commands lsp-treemacs-errors-list)
(use-package projectile
:ensure t
:init (projectile-mode +1)
:bind (("C-c p" . projectile-command-map)
("C-c r" . projectile-ripgrep)
("C-2" . projectile-ripgrep)
("C-c o" . projectile-find-file)
("C-3" . projectile-find-file))
:config
(setq projectile-sort-order 'recently-active)
(setq projectile-mode-line "Projectile")
(setq projectile-track-known-projects-automatically nil))
(use-package counsel-projectile
:ensure t
:after (projectile)
:init (counsel-projectile-mode))
(unless *is-windows* (use-package magit
:ensure t))
;; format all, formatter for almost languages
;; great for programmers
(use-package format-all
:diminish
:hook (prog-mode . format-all-ensure-formatter)
:bind ("C-c F" . #'format-all-buffer))
(use-package projectile-ripgrep
:ensure t)
(use-package ag
:ensure t)
(use-package fzf
:ensure t)
(use-package sr-speedbar
:ensure t
:init (setq sr-speedbar-right-side nil
sr-speedbar-auto-refresh nil)
:bind (("C-c d" . sr-speedbar-toggle)
("C-1" . sr-speedbar-toggle))
:config (setq speedbar-use-images nil))
(use-package highlight-symbol
:ensure t
:init (highlight-symbol-mode)
:bind ("C-c m" . highlight-symbol))
(use-package marginalia
:ensure t
:init (marginalia-mode)
:bind (:map minibuffer-local-map
("M-A" . marginalia-cycle)))
(use-package yasnippet
:ensure t)
(use-package youdao-dictionary
:ensure t
:bind (("C-4" . youdao-dictionary-search-at-point-posframe)))
(use-package expand-region
:ensure t
:init (global-set-key (kbd "C-q") 'er/expand-region))
(use-package projectile-speedbar
:ensure t)
你用的补全名叫 ivy
(setq ivy-height 20)
哈哈我也刚找到了,那三件套各是干什么的,我现在还是懵的,谢谢大佬!