Remove third line in section headers

This is truly important stuff. We've saved many lives with this update.
This commit is contained in:
Henrik Lissner 2018-09-07 19:36:16 -04:00
parent 50fdaa0ed5
commit 7d3ffdff06
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
101 changed files with 64 additions and 283 deletions

View file

@ -9,8 +9,7 @@
;;
;; Plugins
;;
;; Packages
(def-package! calfw
:commands (cfw:open-calendar-buffer)

View file

@ -74,7 +74,6 @@ default/fallback account."
;;
;; Hooks
;;
(defun +email|init ()
(add-hook 'kill-buffer-hook #'+email|kill-mu4e nil t))

View file

@ -9,8 +9,7 @@
;;
;; Plugins
;;
;; Packages
(def-package! mu4e
:commands (mu4e mu4e-compose-new)
@ -134,6 +133,5 @@
;;
;; Sub-modules
;;
(if (featurep! +gmail) (load! "+gmail"))

View file

@ -44,8 +44,7 @@ playback.")
;;
;; Plugins
;;
;; Packages
(def-package! circe
:commands (circe circe-server-buffers)

View file

@ -21,7 +21,6 @@
;;
;; Commands
;;
;;;###autoload
(defun +notmuch/quit ()
@ -88,7 +87,6 @@
;;
;; Advice
;;
;;;###autoload
(defun +notmuch*dont-confirm-on-kill-process (orig-fn &rest args)

View file

@ -46,7 +46,6 @@
;;
;; Hooks
;;
;;;###autoload
(defun +rss|elfeed-wrap ()
@ -81,7 +80,6 @@
;;
;; Functions
;;
;;;###autoload
(defun +rss-dead-feeds (&optional years)

View file

@ -18,7 +18,6 @@ easier to scroll through.")
;;
;; Packages
;;
(def-package! elfeed
:commands elfeed

View file

@ -21,7 +21,6 @@ that works with the feature/popup module."
;;
;; Commands
;;
(defvar +twitter--old-wconf nil)
;;;###autoload

View file

@ -25,8 +25,7 @@
;;
;; Plugins
;;
;; Packages
(def-package! langtool
:when (featurep! +langtool)

View file

@ -56,7 +56,6 @@ To have BACKENDS apply to any mode that is a parent of MODES, set MODES to
;;
;; Library
;;
(defun +company--backends ()
(append (cl-loop for (mode . rest) in +company-backend-alist
@ -73,7 +72,6 @@ To have BACKENDS apply to any mode that is a parent of MODES, set MODES to
;;
;; Hooks
;;
;;;###autoload
(defun +company|init-backends ()
@ -87,7 +85,6 @@ To have BACKENDS apply to any mode that is a parent of MODES, set MODES to
;;
;; Commands
;;
;;;###autoload
(defun +company/toggle-auto-completion ()
@ -151,6 +148,7 @@ C-x C-l."
;;;###autoload
(defun +company/dabbrev-code-previous ()
"TODO"
(interactive)
(require 'company-dabbrev)
(let ((company-selection-wrap-around t))

View file

@ -40,6 +40,9 @@
[backtab] #'company-select-previous))
;;
;; Packages
(def-package! company-prescient
:hook (company-mode . company-prescient-mode)
:config

View file

@ -8,7 +8,8 @@
(helm-swoop :$query search :$multiline bang))
;; --- file searching ---------------------
;;
;; Project searching
;;;###autoload (autoload '+helm:pt "completion/helm/autoload/evil" nil t)
(evil-define-command +helm:pt (all-files-p query)

View file

@ -41,7 +41,6 @@ workspace."
;;
;; Project search
;;
(defun +helm-ag-search-args (all-files-p recursive-p)
(list (concat "ag " (if IS-WINDOWS "--vimgrep" "--nocolor --nogroup"))

View file

@ -35,7 +35,6 @@ be negative.")
;;
;; Packages
;;
(def-package! helm-mode
:defer 1

View file

@ -14,7 +14,8 @@
(+ivy/tasks bang))
;; --- file searching ---------------------
;;
;; Project searching
;;;###autoload (autoload '+ivy:pt "completion/ivy/autoload/evil" nil t)
(evil-define-command +ivy:pt (all-files-p query)

View file

@ -21,7 +21,6 @@
;;
;; Library
;;
;;;###autoload
(defun +ivy-projectile-find-file-transformer (str)
@ -206,7 +205,6 @@ search current file. See `+ivy-task-tags' to customize what this searches for."
;;
;; File searching
;;
;;;###autoload
(defun +ivy/projectile-find-file ()

View file

@ -31,7 +31,6 @@ immediately runs it on the current candidate (ending the ivy session)."
;;
;; Packages
;;
(def-package! ivy
:defer 1
@ -224,7 +223,6 @@ immediately runs it on the current candidate (ending the ivy session)."
;;
;; Evil key fixes
;;
(map! :when (featurep! :feature evil +everywhere)
:after ivy

View file

@ -488,7 +488,6 @@
[remap quit-window] #'kill-this-buffer))
;;
;; <leader>
;;
@ -785,7 +784,6 @@
;;
;; Keybinding fixes
;;
;; This section is dedicated to "fixing" certain keys so that they behave
;; sensibly (and consistently with similar contexts).

View file

@ -35,9 +35,8 @@ command from the current directory instead of the project root."
;;
;; Commands
;;
;;; Commands defined elsewhere
;;; these are defined in feature/evil
;;(ex! "al[ign]" #'+evil:align)
;;(ex! "g[lobal]" #'+evil:global)

View file

@ -4,8 +4,7 @@
;;
;; Plugins
;;
;; Packages
(def-package! emacs-snippets
:if (featurep! +snippets)
@ -14,7 +13,6 @@
;;
;; Config
;;
;; Don't store authinfo in non-encrypted files!
(defvar auth-sources

View file

@ -1,7 +1,5 @@
;;; config/literate/init.el -*- lexical-binding: t; -*-
;;; config/literate/config.el -*- lexical-binding: t; -*-
(defvar +literate-config-file
(expand-file-name "config.org" doom-private-dir)
"The file path of your literate config file.")

View file

@ -137,7 +137,6 @@ See `+format/buffer' for the interactive version of this function, and
;;
;; Commands
;;
;;;###autoload
(defun +format/buffer ()
@ -185,7 +184,6 @@ is selected)."
;;
;; Hooks
;;
;;;###autoload
(defun +format|enable-on-save ()

View file

@ -14,8 +14,7 @@ If nil, it is disabled in all modes, the same as if the +onsave flag wasn't
;;
;; Plugins
;;
;; Bootstrap
(defun +format|enable-on-save-maybe ()
"Enable formatting on save in certain major modes.

View file

@ -62,7 +62,6 @@
;;
;; Evil integration
;;
(map! :when (featurep! :feature evil +everywhere)
:after dired

View file

@ -11,7 +11,6 @@
;;
;; Helpers
;;
(defun +eshell--add-buffer (buf)
(ring-remove+insert+extend +eshell-buffers buf 'grow))
@ -77,7 +76,6 @@
;;
;; Commands
;;
;;;###autoload
(defun +eshell/open (arg &optional command)
@ -124,7 +122,6 @@ module to be loaded."
;;
;; Keybinds
;;
;;;###autoload
(defun +eshell/search-history ()
@ -245,7 +242,6 @@ delete."
;;
;; Hooks
;;
;;;###autoload
(defun +eshell|init ()

View file

@ -47,8 +47,7 @@ You should use `det-eshell-alias!' to change this.")
;;
;; Plugins
;;
;; Packages
(after! eshell ; built-in
(setq eshell-banner-message

View file

@ -35,7 +35,6 @@
;;
;; Indentation detection
;;
(defun +hideshow--empty-line-p ()
(string= "" (string-trim (thing-at-point 'line))))

View file

@ -38,12 +38,11 @@ otherwise in default state."
;;
;; `vc' (built-in)
;;
;; `vc-hooks'
(setq vc-make-backup-files nil)
;; `vc-annotate' (built-in)
;; `vc-annotate'
(after! vc-annotate
(set-popup-rules!
'(("^\\vc-d" :select nil) ; *vc-diff*
@ -52,7 +51,7 @@ otherwise in default state."
'(vc-annotate-mode vc-git-log-view-mode)
'normal))
;; `smerge-mode' (built-in)
;; `smerge-mode'
(after! smerge-mode
(unless EMACS26+
(with-no-warnings

View file

@ -2,7 +2,6 @@
;;
;; REPLs
;;
(defvar +eval-repls nil
"An alist mapping major modes to plists that describe REPLs. Used by
@ -29,8 +28,6 @@ command that will be called interactively."
;;
;; Evaluation
;;
(defvar +eval-runners nil
"Alist mapping major modes to interactive runner functions.")

View file

@ -6,8 +6,7 @@
;;
;; Plugin(s)
;;
;; Packages
(def-package! quickrun
:defer t

View file

@ -136,7 +136,6 @@ variable for an explanation of the defaults (in comments). See
;;
;; Bootstrap
;;
(after! eldoc
(eldoc-add-command-completions "evil-window-"))

View file

@ -20,7 +20,6 @@
;;
;; Commands
;;
;;;###autoload
(defun +evil/visual-indent ()
@ -104,7 +103,6 @@ evil-window-move-* (e.g. `evil-window-move-far-left')"
;;
;; Evil commands/operators
;;
;;;###autoload (autoload '+evil:apply-macro "feature/evil/autoload/evil" nil t)
(evil-define-operator +evil:apply-macro (beg end)

View file

@ -225,8 +225,7 @@ line with a linewise comment.")
;;
;; Plugins
;;
;; Packages
(def-package! evil-commentary
:commands (evil-commentary evil-commentary-yank evil-commentary-line)
@ -398,7 +397,6 @@ the new algorithm is confusing, like in python or ruby."
;;
;; Text object plugins
;;
(def-package! evil-args
:commands (evil-inner-arg evil-outer-arg

View file

@ -59,7 +59,6 @@ these properties:
;;
;; Library
;;
;;;###autoload
(cl-defun +file-templates--expand (pred &key project mode trigger ignore _when)
@ -113,7 +112,6 @@ evil is loaded and enabled)."
;;
;; Commands
;;
;;;###autoload
(defun +file-templates/insert-license ()

View file

@ -101,7 +101,6 @@ information.")
;;
;; Library
;;
(defun +file-templates-in-emacs-dirs-p (file)
"Returns t if FILE is in Doom or your private directory."
@ -122,7 +121,6 @@ must be non-read-only, empty, and there must be a rule in
;;
;; Bootstrap
;;
(after! yasnippet
(if (featurep! :feature snippets)

View file

@ -55,7 +55,6 @@ Used by `+lookup/in-docsets' and `+lookup/documentation'."
;;
;; Library
;;
;;;###autoload
(defun +lookup-docsets-for-buffer ()
@ -85,7 +84,6 @@ This list is built from `+lookup-docset-alist'."
;;
;; Commands
;;
;;;###autoload
(defalias '+lookup/install-docset #'helm-dash-install-docset)

View file

@ -65,7 +65,6 @@ properties:
;;
;; Library
;;
;; Helpers
(defun +lookup--online-provider (&optional force-p namespace)
@ -128,7 +127,6 @@ properties:
;;
;; Main commands
;;
;;;###autoload
(defun +lookup/definition (identifier &optional other-window)
@ -273,7 +271,6 @@ Otherwise, falls back on `find-file-at-point'."
;;
;; Source-specific commands
;;
(defvar counsel-dash-docsets)
(defvar helm-dash-docsets)

View file

@ -74,7 +74,6 @@ argument: the identifier at point.")
;;
;; dumb-jump
;;
(def-package! dumb-jump
:commands dumb-jump-result-follow
@ -89,7 +88,6 @@ argument: the identifier at point.")
;;
;; xref
;;
;; By default, `etags--xref-backend' is the default xref backend. No need. We'll
;; set these up ourselves in other modules.
@ -116,7 +114,6 @@ argument: the identifier at point.")
;;
;; Dash docset integration
;;
;; Both packages depend on helm-dash, for now
(def-package! helm-dash

View file

@ -92,7 +92,6 @@ buggy behavior when <delete> is pressed in an empty field."
;;
;; Hooks
;;
;;;###autoload
(defun +snippets|enable-project-modes (mode &rest _)

View file

@ -5,8 +5,7 @@
;;
;; Plugins
;;
;; Packages
(def-package! yasnippet
:commands (yas-minor-mode-on yas-expand yas-expand-snippet yas-lookup-snippet

View file

@ -16,7 +16,6 @@
;;
;; Library
;;
(defun +workspace--protected-p (name)
(equal name persp-nil-name))
@ -203,8 +202,7 @@ throws an error."
;;
;; Interactive commands
;;
;; Commands
;;;###autoload
(defun +workspace/load (name)
@ -446,7 +444,6 @@ the next."
;;
;; Tabs display in minibuffer
;;
(defun +workspace--tabline (&optional names)
(let ((names (or names (+workspace-list-names)))
@ -493,7 +490,6 @@ the next."
;;
;; Hooks
;;
;;;###autoload
(defun +workspaces|delete-associated-workspace (&optional frame)
@ -581,7 +577,6 @@ This be hooked to `projectile-after-switch-project-hook'."
;;
;; Advice
;;
;;;###autoload
(defun +workspaces*autosave-real-buffers (orig-fn &rest args)

View file

@ -33,8 +33,7 @@ stored in `persp-save-dir'.")
;;
;; Plugins
;;
;; Packages
(def-package! persp-mode
:defer t

View file

@ -6,7 +6,6 @@
;;
;; Library
;;
;;;###autoload
(defun +cc-sp-point-is-template-p (id action context)
@ -89,7 +88,6 @@ preceded by the opening brace or a comma (disregarding whitespace in between)."
;;
;; Commands
;;
;;;###autoload
(defun +cc/reload-compile-db ()
@ -125,7 +123,6 @@ preceded by the opening brace or a comma (disregarding whitespace in between)."
;;
;; Hooks
;;
;;;###autoload
(defun +cc|fontify-constants ()

View file

@ -20,8 +20,7 @@ compilation database is present in the project.")
;;
;; Plugins
;;
;; Packages
(def-package! cc-mode
:commands (c-mode c++-mode objc-mode java-mode)
@ -159,22 +158,18 @@ compilation database is present in the project.")
;;
;; Major modes
;;
;; `cmake-mode'
(def-package! company-cmake
(def-package! company-cmake ; for `cmake-mode'
:when (featurep! :completion company)
:after cmake-mode
:config (set-company-backend! 'cmake-mode 'company-cmake))
;; `demangle-mode'
(def-package! demangle-mode
:hook llvm-mode)
;; `glsl-mode'
(def-package! company-glsl
(def-package! company-glsl ; for `glsl-mode'
:when (featurep! :completion company)
:after glsl-mode
:config (set-company-backend! 'glsl-mode 'company-glsl))
@ -182,7 +177,6 @@ compilation database is present in the project.")
;;
;; Rtags Support
;;
(def-package! rtags
:when (featurep! +rtags)

View file

@ -21,6 +21,7 @@
cider-stacktrace-default-filters '(tooling dup)
cider-prompt-save-file-on-load nil
cider-repl-use-clojure-font-lock t)
(map! :map cider-mode-map
:localleader
:n "'" #'cider-jack-in

View file

@ -10,7 +10,6 @@
(set-company-backend! 'nxml-mode '(company-nxml company-yasnippet)))
;;
;; Third-party plugins
;;
@ -37,7 +36,6 @@
:mode "\\.?vimperatorrc\\'")
;;
;; Frameworks
;;

View file

@ -2,7 +2,6 @@
;;
;; Library
;;
;;;###autoload
(defun +emacs-lisp-eval (beg end)
@ -73,7 +72,6 @@ library/userland functions"
;;
;; Commands
;;
;;;###autoload
(defun +emacs-lisp/repl ()
@ -89,7 +87,6 @@ library/userland functions"
;;
;; Hooks
;;
;;;###autoload
(defun +emacs-lisp|extend-imenu ()

View file

@ -3,9 +3,9 @@
(defvar +emacs-lisp-enable-extra-fontification t
"If non-nil, highlight special forms, and defined functions and variables.")
;;
;; elisp-mode deferral hack
;;
;; `elisp-mode' is loaded at startup. In order to lazy load its config we need
;; to pretend it isn't loaded
@ -27,7 +27,6 @@
;;
;; Config
;;
(add-to-list 'auto-mode-alist '("\\.Cask\\'" . emacs-lisp-mode))
@ -77,8 +76,7 @@
;;
;; Plugins
;;
;; Packages
;; `auto-compile'
(setq auto-compile-display-buffer nil
@ -124,7 +122,6 @@
;;
;; Project modes
;;
(def-project-mode! +emacs-lisp-ert-mode
:modes (emacs-lisp-mode)

View file

@ -2,7 +2,6 @@
;;
;; Tests
;;
(defvar +go-test-last nil
"The last test run.")

View file

@ -1,8 +1,7 @@
;;; lang/go/config.el -*- lexical-binding: t; -*-
;;
;; Plugins
;;
;; Packages
(after! go-mode
(set-env! "GOPATH" "GOROOT")

View file

@ -4,8 +4,7 @@
((featurep! +dante) (load! "+dante")))
;;
;; Common plugins
;;
;; Common packages
(after! haskell-mode
(setq haskell-process-suggest-remove-import-lines t ; warnings for redundant imports etc

View file

@ -9,8 +9,7 @@
;;
;; Common plugins
;;
;; Common packages
(def-package! android-mode
:commands android-mode

View file

@ -34,7 +34,6 @@ ignore the cache."
;;
;; Commands
;;
;;;###autoload
(defun +javascript/repl ()
@ -82,7 +81,6 @@ Run this for any buffer you want to skewer."
;;
;; Hooks
;;
;;;###autoload
(defun +javascript|add-node-modules-path ()
@ -112,7 +110,6 @@ prioritize project-local packages over global ones."
;;
;; Advice
;;
;;;###autoload
(defun +javascript*tide-project-root ()

View file

@ -23,8 +23,7 @@ If no viewers are found, `latex-preview-pane' is used.")
;;
;; Plugins
;;
;; Packages
(def-package! tex
:mode ("\\.tex\\'" . TeX-latex-mode)

View file

@ -3,6 +3,7 @@
;; sp's default rules are obnoxious, so disable them
(provide 'smartparens-lua)
(after! lua-mode
(set-lookup-handlers! 'lua-mode :documentation 'lua-search-documentation)
(set-electric! 'lua-mode :words '("else" "end"))
@ -16,7 +17,6 @@
;;
;; Frameworks
;;
(def-project-mode! +lua-love-mode
:modes (lua-mode markdown-mode json-mode)

View file

@ -25,8 +25,7 @@
;;
;; Plugins
;;
;; Packages
(def-package! org-download
:commands (org-download-dnd org-download-dnd-base64)
@ -70,7 +69,6 @@
;;
;; Bootstrap
;;
(defun +org|init-attach ()
(setq org-attach-directory (expand-file-name +org-attach-dir org-directory))

View file

@ -53,8 +53,7 @@ string). Stops at the first function to return non-nil.")
;;
;; Plugins
;;
;; Packages
(def-package! ob-ipython
:when (featurep! +ipython)

View file

@ -7,8 +7,7 @@
;;
;; Plugins
;;
;; Packages
(def-package! ox-reveal
:defer t
@ -43,8 +42,6 @@
;;
;; Bootstrap
;;
(defun +org|init-present ()
(require 'ox-reveal))

View file

@ -113,7 +113,6 @@ the cursor."
;;
;; Advice
;;
;;;###autoload
(defun +org-attach*insert-link (_link filename)

View file

@ -22,7 +22,6 @@ current file). Only scans first 2048 bytes of the document."
;;
;; Modes
;;
;;;###autoload
(define-minor-mode +org-pretty-mode
@ -39,7 +38,6 @@ current file). Only scans first 2048 bytes of the document."
;;
;; Commands
;;
;;;###autoload
(defun +org/dwim-at-point ()
@ -314,7 +312,6 @@ another level of headings on each invocation."
;;
;; Hooks
;;
;;;###autoload
(defun +org|delete-backward-char-and-realign-table-maybe ()
@ -419,7 +416,6 @@ with `org-cycle')."
;;
;; Advice
;;
;;;###autoload
(defun +org*fix-newline-and-indent-in-src-blocks ()

View file

@ -15,8 +15,7 @@
;;
;; Plugins
;;
;; Packages
;; `toc-org'
(setq toc-org-hrefify-default "org")
@ -39,7 +38,6 @@
;;
;; Bootstrap
;;
(add-hook! 'org-load-hook
#'(org-crypt-use-before-save-magic
@ -68,7 +66,6 @@
;;
;; `org-mode' hooks
;;
(defun +org|unfold-to-2nd-level-or-point ()
"My version of the 'overview' #+STARTUP option: expand first-level headings.
@ -118,7 +115,6 @@ unfold to point on startup."
;;
;; `org-load' hooks
;;
(defun +org|setup-agenda ()
(setq-default
@ -404,7 +400,6 @@ conditions where a window's buffer hasn't changed at the time this hook is run."
;;
;; Built-in libraries
;;
(def-package! org-crypt ; built-in
:commands org-crypt-use-before-save-magic

View file

@ -102,7 +102,6 @@
;;
;; Projects
;;
(def-project-mode! +php-laravel-mode
:modes (php-mode yaml-mode web-mode nxml-mode js2-mode scss-mode)

View file

@ -9,8 +9,7 @@
;;
;; Plugins
;;
;; Packages
(def-package! python
:defer t
@ -126,7 +125,6 @@
;;
;; Environment management
;;
(def-package! pipenv
:commands pipenv-project-p

View file

@ -9,8 +9,7 @@
;;
;; Plugins
;;
;; Packages
(def-package! enh-ruby-mode
:mode "\\.rb\\'"
@ -114,7 +113,6 @@
;;
;; Version managers
;;
(def-package! rbenv
:when (featurep! +rbenv)

View file

@ -8,8 +8,7 @@
;;
;; Plugins
;;
;; Packages
(def-package! sh-script ; built-in
:mode ("\\.zunit\\'" . sh-mode)

View file

@ -1,8 +1,7 @@
;;; lang/solidity/config.el -*- lexical-binding: t; -*-
;;
;; Plugins
;;
;; Packages
;; `solidity-mode'
(setq solidity-comment-style 'slash)

View file

@ -20,8 +20,7 @@
;;
;; Frameworks
;;
;; Framework-based minor-modes
(def-project-mode! +web-jekyll-mode
:modes (web-mode js-mode coffee-mode css-mode haml-mode pug-mode)

View file

@ -9,7 +9,6 @@
;;
;; Library
;;
(defun +ein--collect-ein-buffer-links ()
(let ((end (window-end))

View file

@ -5,8 +5,7 @@
;;
;; Plugins
;;
;; Packages
(after! ein
(setq ein:notebook-modes

View file

@ -47,7 +47,6 @@
;;
;; Commands
;;
;;;###autoload
(defun +magit/quit (&optional _kill-buffer)
@ -102,7 +101,6 @@ format."
;;
;; Advice
;;
;;;###autoload
(defun +magit*hub-settings--format-magithub.enabled ()

View file

@ -12,8 +12,7 @@ available.")
;;
;; Plugins
;;
;; Packages
(def-package! magit
:commands magit-file-delete

View file

@ -30,7 +30,6 @@
;;
;; API
;;
;;;###autoload (autoload 'auth-source-pass-parse-entry "auth-source-pass")
;;;###autoload
@ -62,7 +61,6 @@ search of your username. May prompt for your gpg passphrase."
;;
;; Commands
;;
;;;###autoload (autoload 'password-store-dir "password-store")
;;;###autoload (autoload 'password-store-list "password-store")
@ -112,7 +110,6 @@ fields in `+pass-url-fields' is used to find the url field."
;;
;; Ivy interface
;;
;;;###autoload
(defun +pass/ivy (arg)
@ -136,7 +133,6 @@ fields in `+pass-url-fields' is used to find the url field."
;;
;; TODO Helm interface
;;
;; (defun +pass/helm ()
;; (interactive)

View file

@ -8,8 +8,7 @@
;;
;; Plugins
;;
;; Packages
;; `password-store'
(setq password-store-password-length 12)

View file

@ -13,7 +13,6 @@
;;
;; Commands
;;
;;;###autoload
(defun +tmux (command &rest args)
@ -87,7 +86,6 @@ but do not execute them."
;;
;; Data functions
;;
;;;###autoload
(defun +tmux-list-sessions ()

View file

@ -99,7 +99,6 @@ PLIST can have the following properties:
;;
;; Bootstrap
;;
(setq doom-fallback-buffer-name +doom-dashboard-name
initial-buffer-choice #'+doom-dashboard-initial-buffer)
@ -109,7 +108,6 @@ PLIST can have the following properties:
;;
;; Major mode
;;
(define-derived-mode +doom-dashboard-mode special-mode
(format "DOOM v%s" doom-version)
@ -168,7 +166,6 @@ PLIST can have the following properties:
;;
;; Hooks
;;
(defun +doom-dashboard|reposition-point ()
"Trap the point in the buttons."
@ -264,7 +261,6 @@ project (which may be different across perspective)."
;;
;; Library
;;
(defun +doom-dashboard-initial-buffer ()
"Returns buffer to display on startup. Designed for `initial-buffer-choice'."
@ -338,7 +334,6 @@ controlled by `+doom-dashboard-pwd-policy'."
;;
;; Widgets
;;
(defun doom-dashboard-widget-banner ()
(let ((point (point)))

View file

@ -2,7 +2,6 @@
;;
;; Modeline library
;;
(defvar doom--modeline-fn-alist ())
(defvar doom--modeline-var-alist ())
@ -89,7 +88,6 @@ DEFAULT is non-nil, set the default mode-line for all buffers."
;;
;; Custom faces
;;
(defgroup +doom-modeline nil
"TODO"
@ -157,8 +155,7 @@ active."
;;
;; Plugins
;;
;; Packages
;; anzu and evil-anzu expose current/total state that can be displayed in the
;; mode-line.
@ -229,7 +226,6 @@ active."
;;
;; Variables
;;
(defvar +doom-modeline-height 23
"How tall the mode-line should be (only respected in GUI emacs).")
@ -260,7 +256,6 @@ file-name => comint.el")
;;
;; Modeline helpers
;;
(defun active ()
(eq (selected-window) +doom-modeline-current-window))
@ -389,7 +384,6 @@ Example:
;;
;; buffer information
;;
(def-modeline-segment! buffer-default-directory
"Displays `default-directory'. This is for special buffers like the scratch
@ -479,7 +473,6 @@ directory, the file name, and its state (modified, read-only or non-existent)."
;;
;; major-mode
;;
(def-modeline-segment! major-mode
"The major mode, including process, environment and text-scale info."
@ -495,7 +488,6 @@ directory, the file name, and its state (modified, read-only or non-existent)."
;;
;; vcs
;;
(defvar-local +doom-modeline--vcs nil)
(defun +doom-modeline--update-vcs ()
@ -544,7 +536,6 @@ directory, the file name, and its state (modified, read-only or non-existent)."
;;
;; flycheck
;;
(defvar +doom-modeline-vspc
(propertize " " 'face 'variable-pitch)
@ -589,7 +580,6 @@ icons."
;;
;; selection-info
;;
(defsubst doom-column (pos)
(save-excursion (goto-char pos)
@ -629,7 +619,6 @@ lines are selected, or the NxM dimensions of a block selection."
;;
;; matches (anzu, evil-substitute, iedit, macro)
;;
(defun +doom-modeline--macro-recording ()
"Display current Emacs or evil macro being recorded."
@ -715,7 +704,6 @@ with `evil-ex-substitute', and/or 4. The number of active `iedit' regions."
;;
;; media-info
;;
(def-modeline-segment! media-info
"Metadata regarding the current file, such as dimensions for images."
@ -728,7 +716,6 @@ with `evil-ex-substitute', and/or 4. The number of active `iedit' regions."
;;
;; bar
;;
(defvar +doom-modeline--bar-active nil)
(defvar +doom-modeline--bar-inactive nil)
@ -759,7 +746,6 @@ Returns \"\" to not break --no-window-system."
;;
;; Mode lines
;;
(def-modeline! 'main
'(bar matches " " buffer-info " %l:%c %p " selection-info)
@ -784,7 +770,6 @@ Returns \"\" to not break --no-window-system."
;;
;; Hooks
;;
(defun +doom-modeline|refresh-bars (&optional width height)
(setq +doom-modeline--bar-active
@ -818,7 +803,6 @@ Returns \"\" to not break --no-window-system."
;;
;; Bootstrap
;;
(doom-set-modeline 'main t) ; set default modeline

View file

@ -19,8 +19,7 @@
;;
;; Plugins
;;
;; Packages
;; <https://github.com/hlissner/emacs-doom-theme>
(def-package! doom-themes

View file

@ -12,8 +12,7 @@ Changes to this variable do not take effect until `fci-mode' is restarted.")
;;
;; Plugins
;;
;; Packages
(def-package! fill-column-indicator
:hook ((text-mode prog-mode conf-mode) . turn-on-fci-mode)

View file

@ -68,7 +68,6 @@ Currently available functions:
;;
;; Custom faces
;;
(defgroup +modeline nil
"TODO"
@ -124,8 +123,7 @@ Currently available functions:
;;
;; Plugins
;;
;; Packages
(def-package! anzu
:after-call isearch-mode
@ -161,7 +159,6 @@ Currently available functions:
;;
;; Hacks
;;
;; Keep `+modeline-current-window' up-to-date
(defvar +modeline-current-window (frame-selected-window))
@ -225,7 +222,6 @@ Currently available functions:
;;
;; Helpers
;;
(defun +modeline--make-xpm (width height &optional color)
"Create an XPM bitmap. Inspired by `powerline''s `pl/make-xpm'."
@ -264,7 +260,6 @@ use `buffer-name'."
;;
;; Buffer file path styles
;;
(defun +modeline-file-path-with-project ()
"Returns the unaltered buffer file path relative to the project root's
@ -356,7 +351,6 @@ Meant for `+modeline-buffer-path-function'."
;;
;; Bars
;;
(defvar +modeline-bar-start nil "TODO")
(put '+modeline-bar-start 'risky-local-variable t)
@ -394,7 +388,6 @@ Meant for `+modeline-buffer-path-function'."
;;
;; Segments
;;
(defun +modeline|update-on-change ()
(+modeline--set-+modeline-buffer-state)
@ -666,7 +659,6 @@ icons."
;;
;; Preset modeline formats
;;
(def-modeline-format! :main
'(+modeline-matches " "
@ -696,9 +688,6 @@ icons."
;;
;;
;;
(def-modeline-segment! +modeline--rest
(let ((rhs-str (format-mode-line +modeline-format-right)))
(list (propertize

View file

@ -24,7 +24,6 @@
;;
;; Core functions
;;
;; Don't try to resize popup windows
(advice-add #'balance-windows :around #'+popup*save)
@ -32,7 +31,6 @@
;;
;; External functions
;;
;; `company'
(progn

View file

@ -129,7 +129,6 @@ and enables `+popup-buffer-mode'."
;;
;; Public library
;;
;;;###autoload
(defun +popup-buffer-p (&optional buffer)
@ -211,7 +210,6 @@ Uses `shrink-window-if-larger-than-buffer'."
;;
;; Hooks
;;
;;;###autoload
(defun +popup|adjust-fringes ()
@ -291,7 +289,6 @@ Any non-nil value besides the above will be used as the raw value for
;;
;; Commands
;;
;;;###autoload
(defalias 'other-popup #'+popup/other)
@ -397,7 +394,6 @@ the message buffer in a popup window."
;;
;; Advice
;;
;;;###autoload
(defun +popup*close (&rest _)
@ -555,7 +551,6 @@ Accepts the same arguments as `display-buffer-in-side-window'. You must set
;;
;; Emacs backwards compatibility
;;
(unless EMACS26+
(defvar window-sides-reversed nil)

View file

@ -199,7 +199,6 @@ Example:
;;
;; Obsolete settings
;;
;; FIXME obsolete :popup
;;;###autoload

View file

@ -35,7 +35,6 @@ adjustment.")
;;
;; Global modes
;;
(defvar +popup-mode-map (make-sparse-keymap)
"Active keymap in a session with the popup system enabled. See
@ -95,7 +94,6 @@ that window has been changed or closed."
;;
;; Macros
;;
(defmacro with-popup-rules! (rules &rest body)
"Evaluate BODY with popup RULES. RULES is a list of popup rules. Each rule
@ -128,7 +126,6 @@ prevent the popup(s) from messing up the UI (or vice versa)."
;;
;; Default popup rules & bootstrap
;;
(set-popup-rules!
(when (featurep! +all)
@ -175,6 +172,5 @@ prevent the popup(s) from messing up the UI (or vice versa)."
;;
;; Hacks
;;
(load! "+hacks")

View file

@ -17,8 +17,7 @@ to the right fringe.")
;;
;; Plugins
;;
;; Packages
(def-package! git-gutter-fringe
:commands (git-gutter:revert-hunk git-gutter:stage-hunk)