 ;;; init.el --- -*- lexical-binding: t; outline-minor-mode: t; -*-
+
 ;; 5-3-2020
 
 ;;; Commentary:
 
 ;; A personal Emacs config.
 
-;; The config is split into multiple sections.
-;; Use outline-minor-mode bindings (C-c @) to move between these headings.
+;; The config is split into multiple sections.  Use outline-minor-mode bindings
+;; (C-c @) to move between these headings.  C-u 6 C-c @ C-q will only display
+;; major headings.
 
 ;;; Code:
 


;;;;; Completion

(use-package vertico
  :straight t
  :config
  (setq completion-in-region-function   ; C-M-i to complete
        (lambda (&rest args)
          (apply (if vertico-mode
                     #'consult-completion-in-region
                   #'completion--in-region)
                 args)))
  (setq vertico-scroll-margin 2
        vertico-count 20
        vertico-resize nil
        vertico-cycle nil)
  (vertico-mode))

(use-package orderless
  :straight t
  :config
  (setq completion-styles '(orderless))
  (savehist-mode))

(use-package marginalia
  :straight t
  :config
  (marginalia-mode))

(use-package consult
  :straight t
  :bind
  (;; C-c bindings (mode-specific-map)
   ;;("C-c h" . consult-history)
   ;;("C-c m" . consult-mode-command)
   ;; ("C-c b" . consult-bookmark)
   ;; ("C-c k" . consult-kmacro)
   ;; C-x bindings (ctl-x-map)
   ("C-x M-:" . consult-complex-command)     ;; orig. repeat-complex-command
   ("C-x b" . consult-buffer)                ;; orig. switch-to-buffer
   ("C-x 4 b" . consult-buffer-other-window) ;; orig. switch-to-buffer-other-window

(use-package uniquify
  :defer 2
  :config
  (setq uniquify-buffer-name-style 'forward
        uniquify-strip-common-suffix t
        uniquify-after-kill-buffer-p t))

;; ~M-o~ to change window
(use-package ace-window
