(Emacs)~minor edits

This commit is contained in:
2021-03-25 09:28:43 +00:00
parent 44de2b1580
commit 192de39199

View File

@@ -1111,9 +1111,11 @@ window can provide some nicer chords for higher management of windows
[remap evil-window-next] #'ace-window)) [remap evil-window-next] #'ace-window))
#+end_src #+end_src
** Helpful ** Helpful
Basic setup, will be fully integrated in counsel. Basic setup that replaces commands and configures
=display-buffer-alist= for helpful.
#+begin_src emacs-lisp #+begin_src emacs-lisp
(use-package helpful (use-package helpful
:commands (helpful-callable helpful-variable)
:general :general
(general-def (general-def
[remap describe-function] #'helpful-callable [remap describe-function] #'helpful-callable
@@ -1224,13 +1226,17 @@ Dashboard creates a custom dashboard for Emacs that replaces the
initial startup screen in default Emacs. initial startup screen in default Emacs.
#+begin_src emacs-lisp #+begin_src emacs-lisp
(use-package dashboard (use-package dashboard
:defer 1
:straight t :straight t
:general :general
(leader (leader
"ab" (proc (interactive) (switch-to-buffer "*dashboard*"))) "ab" #'dashboard-refresh-buffer)
(general-def
:states '(normal motion emacs)
:keymaps 'dashboard-mode-map
"q" (proc (interactive) (kill-this-buffer)))
:init :init
(setq initial-buffer-choice (lambda () (get-buffer "*dashboard*")) (setq dashboard-banner-logo-title "Oreomacs"
dashboard-banner-logo-title "Oreomacs"
dashboard-center-content nil dashboard-center-content nil
dashboard-set-init-info t dashboard-set-init-info t
dashboard-startup-banner (no-littering-expand-etc-file-name "dashboard/logo2.png") dashboard-startup-banner (no-littering-expand-etc-file-name "dashboard/logo2.png")
@@ -1240,6 +1246,7 @@ initial startup screen in default Emacs.
(recents . 5))) (recents . 5)))
:config :config
(dashboard-setup-startup-hook) (dashboard-setup-startup-hook)
(setq initial-buffer-choice (lambda () (get-buffer "*dashboard*")))
(general-def (general-def
:states '(normal motion) :states '(normal motion)
@@ -1350,7 +1357,7 @@ are some corners I'd like to adjust).
:straight nil :straight nil
:hook (dired-mode-hook . dired-hide-details-mode) :hook (dired-mode-hook . dired-hide-details-mode)
:init :init
(setq-default dired-listing-switches "-AFBl --group-directories-first --color") (setq-default dired-listing-switches "-AFBl --group-directories-first")
:general :general
(leader (leader
:infix "d" :infix "d"