Remove third line in section headers
This is truly important stuff. We've saved many lives with this update.
This commit is contained in:
parent
50fdaa0ed5
commit
7d3ffdff06
101 changed files with 64 additions and 283 deletions
|
@ -42,7 +42,6 @@ leftover buffers and processes.")
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Functions
|
;; Functions
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun doom-buffer-frame-predicate (buf)
|
(defun doom-buffer-frame-predicate (buf)
|
||||||
|
@ -197,7 +196,6 @@ regex PATTERN. Returns the number of killed buffers."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Hooks
|
;; Hooks
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun doom|mark-buffer-as-real ()
|
(defun doom|mark-buffer-as-real ()
|
||||||
|
@ -207,7 +205,6 @@ regex PATTERN. Returns the number of killed buffers."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Advice
|
;; Advice
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun doom*switch-to-fallback-buffer-maybe (orig-fn)
|
(defun doom*switch-to-fallback-buffer-maybe (orig-fn)
|
||||||
|
@ -241,7 +238,6 @@ windows, switch to `doom-fallback-buffer'. Otherwise, delegate to original
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Interactive commands
|
;; Interactive commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun doom/kill-this-buffer-in-all-windows (buffer &optional dont-save)
|
(defun doom/kill-this-buffer-in-all-windows (buffer &optional dont-save)
|
||||||
|
|
|
@ -34,7 +34,6 @@ listed in `doom-cache-alists' to files."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Library
|
;; Library
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defmacro with-cache! (location &rest body)
|
(defmacro with-cache! (location &rest body)
|
||||||
|
|
|
@ -71,7 +71,6 @@ ready to be pasted in a bug report on github."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Commands
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun doom/info ()
|
(defun doom/info ()
|
||||||
|
@ -135,9 +134,7 @@ pasting into a bug report or discord."
|
||||||
(user-error "No backtrace buffer detected")))
|
(user-error "No backtrace buffer detected")))
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;; Vanilla sandbox
|
||||||
;; Vanilla sandbox
|
|
||||||
;;
|
|
||||||
|
|
||||||
(defvar doom--sandbox-init-doom-p nil)
|
(defvar doom--sandbox-init-doom-p nil)
|
||||||
|
|
||||||
|
@ -204,9 +201,7 @@ standing in the way, and without sacrificing access to installed packages."
|
||||||
(pop-to-buffer buf)))
|
(pop-to-buffer buf)))
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;; Reporting bugs
|
||||||
;; Reporting bugs
|
|
||||||
;;
|
|
||||||
|
|
||||||
(defun doom--open-bug-report ()
|
(defun doom--open-bug-report ()
|
||||||
"TODO"
|
"TODO"
|
||||||
|
@ -276,9 +271,7 @@ will be automatically appended to the result."
|
||||||
(pop-to-buffer buf))))
|
(pop-to-buffer buf))))
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;; Profiling
|
||||||
;; Profiling
|
|
||||||
;;
|
|
||||||
|
|
||||||
(defvar doom--profiler nil)
|
(defvar doom--profiler nil)
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
|
|
|
@ -28,7 +28,6 @@ lines, above and below, with only whitespace in between."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Commands
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun doom/backward-to-bol-or-indent ()
|
(defun doom/backward-to-bol-or-indent ()
|
||||||
|
@ -273,7 +272,6 @@ Respects `require-final-newline'."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Advice
|
;; Advice
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun doom*newline-and-indent (_orig-fn)
|
(defun doom*newline-and-indent (_orig-fn)
|
||||||
|
@ -293,7 +291,6 @@ with weak native support."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Hooks
|
;; Hooks
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun doom|enable-delete-trailing-whitespace ()
|
(defun doom|enable-delete-trailing-whitespace ()
|
||||||
|
|
|
@ -67,6 +67,10 @@
|
||||||
short-new-name)
|
short-new-name)
|
||||||
(short-new-name))))
|
(short-new-name))))
|
||||||
|
|
||||||
|
|
||||||
|
;;
|
||||||
|
;; Commands
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun doom/delete-this-file (&optional path force-p)
|
(defun doom/delete-this-file (&optional path force-p)
|
||||||
"Delete FILENAME (defaults to the file associated with current buffer) and
|
"Delete FILENAME (defaults to the file associated with current buffer) and
|
||||||
|
|
|
@ -44,7 +44,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Helpers
|
;; Helpers
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun doom-active-minor-modes ()
|
(defun doom-active-minor-modes ()
|
||||||
|
@ -57,7 +56,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Commands
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(define-obsolete-function-alias 'doom/describe-setting 'doom/describe-setters "2.1.0")
|
(define-obsolete-function-alias 'doom/describe-setting 'doom/describe-setters "2.1.0")
|
||||||
|
|
|
@ -34,7 +34,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Library
|
;; Library
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun doom-refresh-packages-maybe (&optional force-p)
|
(defun doom-refresh-packages-maybe (&optional force-p)
|
||||||
|
@ -314,7 +313,6 @@ Used by `doom-packages-install'."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Main functions
|
;; Main functions
|
||||||
;;
|
|
||||||
|
|
||||||
(defun doom--delete-package-files (name-or-desc)
|
(defun doom--delete-package-files (name-or-desc)
|
||||||
(let ((pkg-build-dir
|
(let ((pkg-build-dir
|
||||||
|
@ -404,7 +402,6 @@ package.el as appropriate."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Interactive commands
|
;; Interactive commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun doom/update-package (pkg)
|
(defun doom/update-package (pkg)
|
||||||
|
@ -436,7 +433,6 @@ calls."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Advice
|
;; Advice
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun doom*package-delete (desc &rest _)
|
(defun doom*package-delete (desc &rest _)
|
||||||
|
|
|
@ -2,7 +2,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Macros
|
;; Macros
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defmacro without-project-cache! (&rest body)
|
(defmacro without-project-cache! (&rest body)
|
||||||
|
@ -25,7 +24,6 @@ they are absolute."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Commands
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun doom/reload-project ()
|
(defun doom/reload-project ()
|
||||||
|
@ -39,7 +37,6 @@ they are absolute."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Library
|
;; Library
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun doom-project-p (&optional nocache)
|
(defun doom-project-p (&optional nocache)
|
||||||
|
|
|
@ -22,7 +22,6 @@ following:
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Library
|
;; Library
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun doom-scratch-buffer (&optional file mode text)
|
(defun doom-scratch-buffer (&optional file mode text)
|
||||||
|
|
|
@ -10,7 +10,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Dispatcher API
|
;; Dispatcher API
|
||||||
;;
|
|
||||||
|
|
||||||
(defvar doom-auto-accept (getenv "YES")
|
(defvar doom-auto-accept (getenv "YES")
|
||||||
"If non-nil, Doom will auto-accept any confirmation prompts during batch
|
"If non-nil, Doom will auto-accept any confirmation prompts during batch
|
||||||
|
@ -85,10 +84,8 @@ BODY will be run when this dispatcher is called."
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Dispatch commands
|
;; Dummy dispatch commands (no-op because they're handled especially)
|
||||||
;;
|
|
||||||
|
|
||||||
;; Dummy dispatchers (no-op because they're handled especially)
|
|
||||||
(dispatcher! run :noop
|
(dispatcher! run :noop
|
||||||
"Run Doom Emacs from bin/doom's parent directory.
|
"Run Doom Emacs from bin/doom's parent directory.
|
||||||
|
|
||||||
|
|
|
@ -73,7 +73,6 @@ fundamental-mode) for performance sake."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Built-in plugins
|
;; Built-in plugins
|
||||||
;;
|
|
||||||
|
|
||||||
(push '("/LICENSE\\'" . text-mode) auto-mode-alist)
|
(push '("/LICENSE\\'" . text-mode) auto-mode-alist)
|
||||||
|
|
||||||
|
@ -151,8 +150,7 @@ savehist file."
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Core Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
;; Auto-close delimiters and blocks as you type. It's more powerful than that,
|
;; Auto-close delimiters and blocks as you type. It's more powerful than that,
|
||||||
;; but that is all Doom uses it for.
|
;; but that is all Doom uses it for.
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
;;; core-lib.el -*- lexical-binding: t; -*-
|
;;; core-lib.el -*- lexical-binding: t; -*-
|
||||||
|
|
||||||
;; Built in packages we use a lot of
|
;; Built-in packages we use a lot of
|
||||||
(require 'subr-x)
|
(require 'subr-x)
|
||||||
(require 'cl-lib)
|
(require 'cl-lib)
|
||||||
|
|
||||||
|
@ -31,7 +31,6 @@ means to remove KEY from ALIST if the new value is `eql' to DEFAULT."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Helpers
|
;; Helpers
|
||||||
;;
|
|
||||||
|
|
||||||
(defun doom--resolve-path-forms (spec &optional directory)
|
(defun doom--resolve-path-forms (spec &optional directory)
|
||||||
"Converts a simple nested series of or/and forms into a series of
|
"Converts a simple nested series of or/and forms into a series of
|
||||||
|
@ -93,8 +92,7 @@ This is used by `associate!', `file-exists-p!' and `project-file-exists-p!'."
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Functions
|
;; Public library
|
||||||
;;
|
|
||||||
|
|
||||||
(defun doom-unquote (exp)
|
(defun doom-unquote (exp)
|
||||||
"Return EXP unquoted."
|
"Return EXP unquoted."
|
||||||
|
|
|
@ -30,7 +30,6 @@ A warning will be put out if these deprecated modules are used.")
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Bootstrap API
|
;; Bootstrap API
|
||||||
;;
|
|
||||||
|
|
||||||
(defun doom-initialize-modules (&optional force-p)
|
(defun doom-initialize-modules (&optional force-p)
|
||||||
"Loads the init.el in `doom-private-dir' and sets up hooks for a healthy
|
"Loads the init.el in `doom-private-dir' and sets up hooks for a healthy
|
||||||
|
@ -65,7 +64,6 @@ non-nil."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Module API
|
;; Module API
|
||||||
;;
|
|
||||||
|
|
||||||
(defun doom-module-p (category module)
|
(defun doom-module-p (category module)
|
||||||
"Returns t if CATEGORY MODULE is enabled (ie. present in `doom-modules')."
|
"Returns t if CATEGORY MODULE is enabled (ie. present in `doom-modules')."
|
||||||
|
@ -188,7 +186,6 @@ non-nil, return paths of possible modules, activated or otherwise."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Use-package modifications
|
;; Use-package modifications
|
||||||
;;
|
|
||||||
|
|
||||||
(autoload 'use-package "use-package-core" nil nil t)
|
(autoload 'use-package "use-package-core" nil nil t)
|
||||||
|
|
||||||
|
@ -246,7 +243,6 @@ non-nil, return paths of possible modules, activated or otherwise."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Module config macros
|
;; Module config macros
|
||||||
;;
|
|
||||||
|
|
||||||
(defmacro doom! (&rest modules)
|
(defmacro doom! (&rest modules)
|
||||||
"Bootstraps DOOM Emacs and its modules.
|
"Bootstraps DOOM Emacs and its modules.
|
||||||
|
@ -382,7 +378,6 @@ omitted. eg. (featurep! +flag1)"
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; FIXME Cross-module configuration (deprecated)
|
;; FIXME Cross-module configuration (deprecated)
|
||||||
;;
|
|
||||||
|
|
||||||
;; I needed a way to reliably cross-configure modules without littering my
|
;; I needed a way to reliably cross-configure modules without littering my
|
||||||
;; modules with `after!' blocks or testing whether they were enabled, so I wrote
|
;; modules with `after!' blocks or testing whether they were enabled, so I wrote
|
||||||
|
|
|
@ -75,7 +75,6 @@ missing) and shouldn't be deleted.")
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Bootstrapper
|
;; Bootstrapper
|
||||||
;;
|
|
||||||
|
|
||||||
(defun doom-initialize-packages (&optional force-p)
|
(defun doom-initialize-packages (&optional force-p)
|
||||||
"Ensures that Doom's package management system, package.el and quelpa are
|
"Ensures that Doom's package management system, package.el and quelpa are
|
||||||
|
@ -137,7 +136,6 @@ them."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Package API
|
;; Package API
|
||||||
;;
|
|
||||||
|
|
||||||
(defun doom-ensure-packages-initialized (&optional force-p)
|
(defun doom-ensure-packages-initialized (&optional force-p)
|
||||||
"Make sure package.el is initialized."
|
"Make sure package.el is initialized."
|
||||||
|
@ -169,7 +167,6 @@ them."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Module package macros
|
;; Module package macros
|
||||||
;;
|
|
||||||
|
|
||||||
(cl-defmacro package! (name &rest plist &key recipe pin disable _ignore _freeze)
|
(cl-defmacro package! (name &rest plist &key recipe pin disable _ignore _freeze)
|
||||||
"Declares a package and how to install it (if applicable).
|
"Declares a package and how to install it (if applicable).
|
||||||
|
|
|
@ -63,8 +63,7 @@
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Projects
|
;; Project-based minor modes
|
||||||
;;
|
|
||||||
|
|
||||||
(defvar-local doom-project nil
|
(defvar-local doom-project nil
|
||||||
"Either the symbol or a list of project modes you want to enable. Available
|
"Either the symbol or a list of project modes you want to enable. Available
|
||||||
|
|
|
@ -75,8 +75,7 @@ shorter major mode name in the mode-line. See `doom|set-mode-name'.")
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Third party packages
|
||||||
;;
|
|
||||||
|
|
||||||
;; `avy'
|
;; `avy'
|
||||||
(setq avy-all-windows nil
|
(setq avy-all-windows nil
|
||||||
|
@ -136,7 +135,6 @@ shorter major mode name in the mode-line. See `doom|set-mode-name'.")
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Built-in packages
|
;; Built-in packages
|
||||||
;;
|
|
||||||
|
|
||||||
;; show typed keystrokes in minibuffer
|
;; show typed keystrokes in minibuffer
|
||||||
(defun doom|enable-ui-keystrokes () (setq echo-keystrokes 0.02))
|
(defun doom|enable-ui-keystrokes () (setq echo-keystrokes 0.02))
|
||||||
|
@ -326,7 +324,6 @@ character that looks like a space that `whitespace-mode' won't affect.")
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Theme & font
|
;; Theme & font
|
||||||
;;
|
|
||||||
|
|
||||||
(defvar doom-last-window-system
|
(defvar doom-last-window-system
|
||||||
(if (daemonp) 'daemon initial-window-system)
|
(if (daemonp) 'daemon initial-window-system)
|
||||||
|
@ -393,7 +390,6 @@ frame's window-system, the theme will be reloaded.")
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Bootstrap
|
;; Bootstrap
|
||||||
;;
|
|
||||||
|
|
||||||
;; simple name in frame title
|
;; simple name in frame title
|
||||||
(setq frame-title-format '("%b – Doom Emacs"))
|
(setq frame-title-format '("%b – Doom Emacs"))
|
||||||
|
@ -454,7 +450,6 @@ instead). Meant for `kill-buffer-query-functions'."
|
||||||
(add-hook 'emacs-startup-hook #'doom|init-ui)
|
(add-hook 'emacs-startup-hook #'doom|init-ui)
|
||||||
|
|
||||||
|
|
||||||
;;
|
|
||||||
;; Fixes/hacks
|
;; Fixes/hacks
|
||||||
;;
|
;;
|
||||||
|
|
||||||
|
|
|
@ -12,7 +12,6 @@ line or use --debug-init to enable this.")
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Constants
|
;; Constants
|
||||||
;;
|
|
||||||
|
|
||||||
(defconst doom-version "2.0.9"
|
(defconst doom-version "2.0.9"
|
||||||
"Current version of DOOM emacs.")
|
"Current version of DOOM emacs.")
|
||||||
|
@ -82,7 +81,6 @@ file.")
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Doom core variables
|
;; Doom core variables
|
||||||
;;
|
|
||||||
|
|
||||||
(defvar doom-init-p nil
|
(defvar doom-init-p nil
|
||||||
"Non-nil if `doom-initialize' has run.")
|
"Non-nil if `doom-initialize' has run.")
|
||||||
|
@ -105,7 +103,6 @@ Doom was setup, which can cause problems.")
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Custom error types
|
;; Custom error types
|
||||||
;;
|
|
||||||
|
|
||||||
(define-error 'doom-error "Error in Doom Emacs core")
|
(define-error 'doom-error "Error in Doom Emacs core")
|
||||||
(define-error 'doom-hook-error "Error in a Doom startup hook" 'doom-error)
|
(define-error 'doom-hook-error "Error in a Doom startup hook" 'doom-error)
|
||||||
|
@ -117,7 +114,6 @@ Doom was setup, which can cause problems.")
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Custom hooks
|
;; Custom hooks
|
||||||
;;
|
|
||||||
|
|
||||||
(defvar doom-init-hook nil
|
(defvar doom-init-hook nil
|
||||||
"Hooks run after all init.el files are loaded, including your private and all
|
"Hooks run after all init.el files are loaded, including your private and all
|
||||||
|
@ -206,7 +202,6 @@ and `doom-exit-window-hook'."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Emacs core configuration
|
;; Emacs core configuration
|
||||||
;;
|
|
||||||
|
|
||||||
;; UTF-8 as the default coding system
|
;; UTF-8 as the default coding system
|
||||||
(when (fboundp 'set-charset-priority)
|
(when (fboundp 'set-charset-priority)
|
||||||
|
@ -309,7 +304,6 @@ original value of `symbol-file'."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Bootstrap helpers
|
;; Bootstrap helpers
|
||||||
;;
|
|
||||||
|
|
||||||
(defun doom-try-run-hook (hook)
|
(defun doom-try-run-hook (hook)
|
||||||
"Run HOOK (a hook function), but marks thrown errors to make it a little
|
"Run HOOK (a hook function), but marks thrown errors to make it a little
|
||||||
|
@ -382,7 +376,6 @@ If RETURN-P, return the message as a string instead of displaying it."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Bootstrap functions
|
;; Bootstrap functions
|
||||||
;;
|
|
||||||
|
|
||||||
(defun doom-initialize (&optional force-p force-load-core-p)
|
(defun doom-initialize (&optional force-p force-load-core-p)
|
||||||
"Bootstrap Doom, if it hasn't already (or if FORCE-P is non-nil).
|
"Bootstrap Doom, if it hasn't already (or if FORCE-P is non-nil).
|
||||||
|
@ -463,7 +456,6 @@ in interactive sessions, nil otherwise (but logs a warning)."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Bootstrap Doom
|
;; Bootstrap Doom
|
||||||
;;
|
|
||||||
|
|
||||||
(add-to-list 'load-path doom-core-dir)
|
(add-to-list 'load-path doom-core-dir)
|
||||||
|
|
||||||
|
|
|
@ -9,8 +9,7 @@
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! calfw
|
(def-package! calfw
|
||||||
:commands (cfw:open-calendar-buffer)
|
:commands (cfw:open-calendar-buffer)
|
||||||
|
|
|
@ -74,7 +74,6 @@ default/fallback account."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Hooks
|
;; Hooks
|
||||||
;;
|
|
||||||
|
|
||||||
(defun +email|init ()
|
(defun +email|init ()
|
||||||
(add-hook 'kill-buffer-hook #'+email|kill-mu4e nil t))
|
(add-hook 'kill-buffer-hook #'+email|kill-mu4e nil t))
|
||||||
|
|
|
@ -9,8 +9,7 @@
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! mu4e
|
(def-package! mu4e
|
||||||
:commands (mu4e mu4e-compose-new)
|
:commands (mu4e mu4e-compose-new)
|
||||||
|
@ -134,6 +133,5 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Sub-modules
|
;; Sub-modules
|
||||||
;;
|
|
||||||
|
|
||||||
(if (featurep! +gmail) (load! "+gmail"))
|
(if (featurep! +gmail) (load! "+gmail"))
|
||||||
|
|
|
@ -44,8 +44,7 @@ playback.")
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! circe
|
(def-package! circe
|
||||||
:commands (circe circe-server-buffers)
|
:commands (circe circe-server-buffers)
|
||||||
|
|
|
@ -21,7 +21,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Commands
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +notmuch/quit ()
|
(defun +notmuch/quit ()
|
||||||
|
@ -88,7 +87,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Advice
|
;; Advice
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +notmuch*dont-confirm-on-kill-process (orig-fn &rest args)
|
(defun +notmuch*dont-confirm-on-kill-process (orig-fn &rest args)
|
||||||
|
|
|
@ -46,7 +46,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Hooks
|
;; Hooks
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +rss|elfeed-wrap ()
|
(defun +rss|elfeed-wrap ()
|
||||||
|
@ -81,7 +80,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Functions
|
;; Functions
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +rss-dead-feeds (&optional years)
|
(defun +rss-dead-feeds (&optional years)
|
||||||
|
|
|
@ -18,7 +18,6 @@ easier to scroll through.")
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Packages
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! elfeed
|
(def-package! elfeed
|
||||||
:commands elfeed
|
:commands elfeed
|
||||||
|
|
|
@ -21,7 +21,6 @@ that works with the feature/popup module."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Commands
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
(defvar +twitter--old-wconf nil)
|
(defvar +twitter--old-wconf nil)
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
|
|
|
@ -25,8 +25,7 @@
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! langtool
|
(def-package! langtool
|
||||||
:when (featurep! +langtool)
|
:when (featurep! +langtool)
|
||||||
|
|
|
@ -56,7 +56,6 @@ To have BACKENDS apply to any mode that is a parent of MODES, set MODES to
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Library
|
;; Library
|
||||||
;;
|
|
||||||
|
|
||||||
(defun +company--backends ()
|
(defun +company--backends ()
|
||||||
(append (cl-loop for (mode . rest) in +company-backend-alist
|
(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
|
;; Hooks
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +company|init-backends ()
|
(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
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +company/toggle-auto-completion ()
|
(defun +company/toggle-auto-completion ()
|
||||||
|
@ -151,6 +148,7 @@ C-x C-l."
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +company/dabbrev-code-previous ()
|
(defun +company/dabbrev-code-previous ()
|
||||||
|
"TODO"
|
||||||
(interactive)
|
(interactive)
|
||||||
(require 'company-dabbrev)
|
(require 'company-dabbrev)
|
||||||
(let ((company-selection-wrap-around t))
|
(let ((company-selection-wrap-around t))
|
||||||
|
|
|
@ -40,6 +40,9 @@
|
||||||
[backtab] #'company-select-previous))
|
[backtab] #'company-select-previous))
|
||||||
|
|
||||||
|
|
||||||
|
;;
|
||||||
|
;; Packages
|
||||||
|
|
||||||
(def-package! company-prescient
|
(def-package! company-prescient
|
||||||
:hook (company-mode . company-prescient-mode)
|
:hook (company-mode . company-prescient-mode)
|
||||||
:config
|
:config
|
||||||
|
|
|
@ -8,7 +8,8 @@
|
||||||
(helm-swoop :$query search :$multiline bang))
|
(helm-swoop :$query search :$multiline bang))
|
||||||
|
|
||||||
|
|
||||||
;; --- file searching ---------------------
|
;;
|
||||||
|
;; Project searching
|
||||||
|
|
||||||
;;;###autoload (autoload '+helm:pt "completion/helm/autoload/evil" nil t)
|
;;;###autoload (autoload '+helm:pt "completion/helm/autoload/evil" nil t)
|
||||||
(evil-define-command +helm:pt (all-files-p query)
|
(evil-define-command +helm:pt (all-files-p query)
|
||||||
|
|
|
@ -41,7 +41,6 @@ workspace."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Project search
|
;; Project search
|
||||||
;;
|
|
||||||
|
|
||||||
(defun +helm-ag-search-args (all-files-p recursive-p)
|
(defun +helm-ag-search-args (all-files-p recursive-p)
|
||||||
(list (concat "ag " (if IS-WINDOWS "--vimgrep" "--nocolor --nogroup"))
|
(list (concat "ag " (if IS-WINDOWS "--vimgrep" "--nocolor --nogroup"))
|
||||||
|
|
|
@ -35,7 +35,6 @@ be negative.")
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Packages
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! helm-mode
|
(def-package! helm-mode
|
||||||
:defer 1
|
:defer 1
|
||||||
|
|
|
@ -14,7 +14,8 @@
|
||||||
(+ivy/tasks bang))
|
(+ivy/tasks bang))
|
||||||
|
|
||||||
|
|
||||||
;; --- file searching ---------------------
|
;;
|
||||||
|
;; Project searching
|
||||||
|
|
||||||
;;;###autoload (autoload '+ivy:pt "completion/ivy/autoload/evil" nil t)
|
;;;###autoload (autoload '+ivy:pt "completion/ivy/autoload/evil" nil t)
|
||||||
(evil-define-command +ivy:pt (all-files-p query)
|
(evil-define-command +ivy:pt (all-files-p query)
|
||||||
|
|
|
@ -21,7 +21,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Library
|
;; Library
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +ivy-projectile-find-file-transformer (str)
|
(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
|
;; File searching
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +ivy/projectile-find-file ()
|
(defun +ivy/projectile-find-file ()
|
||||||
|
|
|
@ -31,7 +31,6 @@ immediately runs it on the current candidate (ending the ivy session)."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Packages
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! ivy
|
(def-package! ivy
|
||||||
:defer 1
|
:defer 1
|
||||||
|
@ -224,7 +223,6 @@ immediately runs it on the current candidate (ending the ivy session)."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Evil key fixes
|
;; Evil key fixes
|
||||||
;;
|
|
||||||
|
|
||||||
(map! :when (featurep! :feature evil +everywhere)
|
(map! :when (featurep! :feature evil +everywhere)
|
||||||
:after ivy
|
:after ivy
|
||||||
|
|
|
@ -488,7 +488,6 @@
|
||||||
[remap quit-window] #'kill-this-buffer))
|
[remap quit-window] #'kill-this-buffer))
|
||||||
|
|
||||||
|
|
||||||
;;
|
|
||||||
;; <leader>
|
;; <leader>
|
||||||
;;
|
;;
|
||||||
|
|
||||||
|
@ -785,7 +784,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Keybinding fixes
|
;; Keybinding fixes
|
||||||
;;
|
|
||||||
|
|
||||||
;; This section is dedicated to "fixing" certain keys so that they behave
|
;; This section is dedicated to "fixing" certain keys so that they behave
|
||||||
;; sensibly (and consistently with similar contexts).
|
;; sensibly (and consistently with similar contexts).
|
||||||
|
|
|
@ -35,9 +35,8 @@ command from the current directory instead of the project root."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Commands
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;; Commands defined elsewhere
|
;;; these are defined in feature/evil
|
||||||
;;(ex! "al[ign]" #'+evil:align)
|
;;(ex! "al[ign]" #'+evil:align)
|
||||||
;;(ex! "g[lobal]" #'+evil:global)
|
;;(ex! "g[lobal]" #'+evil:global)
|
||||||
|
|
||||||
|
|
|
@ -4,8 +4,7 @@
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! emacs-snippets
|
(def-package! emacs-snippets
|
||||||
:if (featurep! +snippets)
|
:if (featurep! +snippets)
|
||||||
|
@ -14,7 +13,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Config
|
;; Config
|
||||||
;;
|
|
||||||
|
|
||||||
;; Don't store authinfo in non-encrypted files!
|
;; Don't store authinfo in non-encrypted files!
|
||||||
(defvar auth-sources
|
(defvar auth-sources
|
||||||
|
|
|
@ -1,7 +1,5 @@
|
||||||
;;; config/literate/init.el -*- lexical-binding: t; -*-
|
;;; config/literate/init.el -*- lexical-binding: t; -*-
|
||||||
|
|
||||||
;;; config/literate/config.el -*- lexical-binding: t; -*-
|
|
||||||
|
|
||||||
(defvar +literate-config-file
|
(defvar +literate-config-file
|
||||||
(expand-file-name "config.org" doom-private-dir)
|
(expand-file-name "config.org" doom-private-dir)
|
||||||
"The file path of your literate config file.")
|
"The file path of your literate config file.")
|
||||||
|
|
|
@ -137,7 +137,6 @@ See `+format/buffer' for the interactive version of this function, and
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Commands
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +format/buffer ()
|
(defun +format/buffer ()
|
||||||
|
@ -185,7 +184,6 @@ is selected)."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Hooks
|
;; Hooks
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +format|enable-on-save ()
|
(defun +format|enable-on-save ()
|
||||||
|
|
|
@ -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 ()
|
(defun +format|enable-on-save-maybe ()
|
||||||
"Enable formatting on save in certain major modes.
|
"Enable formatting on save in certain major modes.
|
||||||
|
|
|
@ -62,7 +62,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Evil integration
|
;; Evil integration
|
||||||
;;
|
|
||||||
|
|
||||||
(map! :when (featurep! :feature evil +everywhere)
|
(map! :when (featurep! :feature evil +everywhere)
|
||||||
:after dired
|
:after dired
|
||||||
|
|
|
@ -11,7 +11,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Helpers
|
;; Helpers
|
||||||
;;
|
|
||||||
|
|
||||||
(defun +eshell--add-buffer (buf)
|
(defun +eshell--add-buffer (buf)
|
||||||
(ring-remove+insert+extend +eshell-buffers buf 'grow))
|
(ring-remove+insert+extend +eshell-buffers buf 'grow))
|
||||||
|
@ -77,7 +76,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Commands
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +eshell/open (arg &optional command)
|
(defun +eshell/open (arg &optional command)
|
||||||
|
@ -124,7 +122,6 @@ module to be loaded."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Keybinds
|
;; Keybinds
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +eshell/search-history ()
|
(defun +eshell/search-history ()
|
||||||
|
@ -245,7 +242,6 @@ delete."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Hooks
|
;; Hooks
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +eshell|init ()
|
(defun +eshell|init ()
|
||||||
|
|
|
@ -47,8 +47,7 @@ You should use `det-eshell-alias!' to change this.")
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(after! eshell ; built-in
|
(after! eshell ; built-in
|
||||||
(setq eshell-banner-message
|
(setq eshell-banner-message
|
||||||
|
|
|
@ -35,7 +35,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Indentation detection
|
;; Indentation detection
|
||||||
;;
|
|
||||||
|
|
||||||
(defun +hideshow--empty-line-p ()
|
(defun +hideshow--empty-line-p ()
|
||||||
(string= "" (string-trim (thing-at-point 'line))))
|
(string= "" (string-trim (thing-at-point 'line))))
|
||||||
|
|
|
@ -38,12 +38,11 @@ otherwise in default state."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; `vc' (built-in)
|
;; `vc' (built-in)
|
||||||
;;
|
|
||||||
|
|
||||||
;; `vc-hooks'
|
;; `vc-hooks'
|
||||||
(setq vc-make-backup-files nil)
|
(setq vc-make-backup-files nil)
|
||||||
|
|
||||||
;; `vc-annotate' (built-in)
|
;; `vc-annotate'
|
||||||
(after! vc-annotate
|
(after! vc-annotate
|
||||||
(set-popup-rules!
|
(set-popup-rules!
|
||||||
'(("^\\vc-d" :select nil) ; *vc-diff*
|
'(("^\\vc-d" :select nil) ; *vc-diff*
|
||||||
|
@ -52,7 +51,7 @@ otherwise in default state."
|
||||||
'(vc-annotate-mode vc-git-log-view-mode)
|
'(vc-annotate-mode vc-git-log-view-mode)
|
||||||
'normal))
|
'normal))
|
||||||
|
|
||||||
;; `smerge-mode' (built-in)
|
;; `smerge-mode'
|
||||||
(after! smerge-mode
|
(after! smerge-mode
|
||||||
(unless EMACS26+
|
(unless EMACS26+
|
||||||
(with-no-warnings
|
(with-no-warnings
|
||||||
|
|
|
@ -2,7 +2,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; REPLs
|
;; REPLs
|
||||||
;;
|
|
||||||
|
|
||||||
(defvar +eval-repls nil
|
(defvar +eval-repls nil
|
||||||
"An alist mapping major modes to plists that describe REPLs. Used by
|
"An alist mapping major modes to plists that describe REPLs. Used by
|
||||||
|
@ -29,8 +28,6 @@ command that will be called interactively."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Evaluation
|
;; Evaluation
|
||||||
;;
|
|
||||||
|
|
||||||
|
|
||||||
(defvar +eval-runners nil
|
(defvar +eval-runners nil
|
||||||
"Alist mapping major modes to interactive runner functions.")
|
"Alist mapping major modes to interactive runner functions.")
|
||||||
|
|
|
@ -6,8 +6,7 @@
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugin(s)
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! quickrun
|
(def-package! quickrun
|
||||||
:defer t
|
:defer t
|
||||||
|
|
|
@ -136,7 +136,6 @@ variable for an explanation of the defaults (in comments). See
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Bootstrap
|
;; Bootstrap
|
||||||
;;
|
|
||||||
|
|
||||||
(after! eldoc
|
(after! eldoc
|
||||||
(eldoc-add-command-completions "evil-window-"))
|
(eldoc-add-command-completions "evil-window-"))
|
||||||
|
|
|
@ -20,7 +20,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Commands
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +evil/visual-indent ()
|
(defun +evil/visual-indent ()
|
||||||
|
@ -104,7 +103,6 @@ evil-window-move-* (e.g. `evil-window-move-far-left')"
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Evil commands/operators
|
;; Evil commands/operators
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload (autoload '+evil:apply-macro "feature/evil/autoload/evil" nil t)
|
;;;###autoload (autoload '+evil:apply-macro "feature/evil/autoload/evil" nil t)
|
||||||
(evil-define-operator +evil:apply-macro (beg end)
|
(evil-define-operator +evil:apply-macro (beg end)
|
||||||
|
|
|
@ -225,8 +225,7 @@ line with a linewise comment.")
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! evil-commentary
|
(def-package! evil-commentary
|
||||||
:commands (evil-commentary evil-commentary-yank evil-commentary-line)
|
: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
|
;; Text object plugins
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! evil-args
|
(def-package! evil-args
|
||||||
:commands (evil-inner-arg evil-outer-arg
|
:commands (evil-inner-arg evil-outer-arg
|
||||||
|
|
|
@ -59,7 +59,6 @@ these properties:
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Library
|
;; Library
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(cl-defun +file-templates--expand (pred &key project mode trigger ignore _when)
|
(cl-defun +file-templates--expand (pred &key project mode trigger ignore _when)
|
||||||
|
@ -113,7 +112,6 @@ evil is loaded and enabled)."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Commands
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +file-templates/insert-license ()
|
(defun +file-templates/insert-license ()
|
||||||
|
|
|
@ -101,7 +101,6 @@ information.")
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Library
|
;; Library
|
||||||
;;
|
|
||||||
|
|
||||||
(defun +file-templates-in-emacs-dirs-p (file)
|
(defun +file-templates-in-emacs-dirs-p (file)
|
||||||
"Returns t if FILE is in Doom or your private directory."
|
"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
|
;; Bootstrap
|
||||||
;;
|
|
||||||
|
|
||||||
(after! yasnippet
|
(after! yasnippet
|
||||||
(if (featurep! :feature snippets)
|
(if (featurep! :feature snippets)
|
||||||
|
|
|
@ -55,7 +55,6 @@ Used by `+lookup/in-docsets' and `+lookup/documentation'."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Library
|
;; Library
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +lookup-docsets-for-buffer ()
|
(defun +lookup-docsets-for-buffer ()
|
||||||
|
@ -85,7 +84,6 @@ This list is built from `+lookup-docset-alist'."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Commands
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defalias '+lookup/install-docset #'helm-dash-install-docset)
|
(defalias '+lookup/install-docset #'helm-dash-install-docset)
|
||||||
|
|
|
@ -65,7 +65,6 @@ properties:
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Library
|
;; Library
|
||||||
;;
|
|
||||||
|
|
||||||
;; Helpers
|
;; Helpers
|
||||||
(defun +lookup--online-provider (&optional force-p namespace)
|
(defun +lookup--online-provider (&optional force-p namespace)
|
||||||
|
@ -128,7 +127,6 @@ properties:
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Main commands
|
;; Main commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +lookup/definition (identifier &optional other-window)
|
(defun +lookup/definition (identifier &optional other-window)
|
||||||
|
@ -273,7 +271,6 @@ Otherwise, falls back on `find-file-at-point'."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Source-specific commands
|
;; Source-specific commands
|
||||||
;;
|
|
||||||
|
|
||||||
(defvar counsel-dash-docsets)
|
(defvar counsel-dash-docsets)
|
||||||
(defvar helm-dash-docsets)
|
(defvar helm-dash-docsets)
|
||||||
|
|
|
@ -74,7 +74,6 @@ argument: the identifier at point.")
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; dumb-jump
|
;; dumb-jump
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! dumb-jump
|
(def-package! dumb-jump
|
||||||
:commands dumb-jump-result-follow
|
:commands dumb-jump-result-follow
|
||||||
|
@ -89,7 +88,6 @@ argument: the identifier at point.")
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; xref
|
;; xref
|
||||||
;;
|
|
||||||
|
|
||||||
;; By default, `etags--xref-backend' is the default xref backend. No need. We'll
|
;; By default, `etags--xref-backend' is the default xref backend. No need. We'll
|
||||||
;; set these up ourselves in other modules.
|
;; set these up ourselves in other modules.
|
||||||
|
@ -116,7 +114,6 @@ argument: the identifier at point.")
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Dash docset integration
|
;; Dash docset integration
|
||||||
;;
|
|
||||||
|
|
||||||
;; Both packages depend on helm-dash, for now
|
;; Both packages depend on helm-dash, for now
|
||||||
(def-package! helm-dash
|
(def-package! helm-dash
|
||||||
|
|
|
@ -92,7 +92,6 @@ buggy behavior when <delete> is pressed in an empty field."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Hooks
|
;; Hooks
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +snippets|enable-project-modes (mode &rest _)
|
(defun +snippets|enable-project-modes (mode &rest _)
|
||||||
|
|
|
@ -5,8 +5,7 @@
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! yasnippet
|
(def-package! yasnippet
|
||||||
:commands (yas-minor-mode-on yas-expand yas-expand-snippet yas-lookup-snippet
|
:commands (yas-minor-mode-on yas-expand yas-expand-snippet yas-lookup-snippet
|
||||||
|
|
|
@ -16,7 +16,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Library
|
;; Library
|
||||||
;;
|
|
||||||
|
|
||||||
(defun +workspace--protected-p (name)
|
(defun +workspace--protected-p (name)
|
||||||
(equal name persp-nil-name))
|
(equal name persp-nil-name))
|
||||||
|
@ -203,8 +202,7 @@ throws an error."
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Interactive commands
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +workspace/load (name)
|
(defun +workspace/load (name)
|
||||||
|
@ -446,7 +444,6 @@ the next."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Tabs display in minibuffer
|
;; Tabs display in minibuffer
|
||||||
;;
|
|
||||||
|
|
||||||
(defun +workspace--tabline (&optional names)
|
(defun +workspace--tabline (&optional names)
|
||||||
(let ((names (or names (+workspace-list-names)))
|
(let ((names (or names (+workspace-list-names)))
|
||||||
|
@ -493,7 +490,6 @@ the next."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Hooks
|
;; Hooks
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +workspaces|delete-associated-workspace (&optional frame)
|
(defun +workspaces|delete-associated-workspace (&optional frame)
|
||||||
|
@ -581,7 +577,6 @@ This be hooked to `projectile-after-switch-project-hook'."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Advice
|
;; Advice
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +workspaces*autosave-real-buffers (orig-fn &rest args)
|
(defun +workspaces*autosave-real-buffers (orig-fn &rest args)
|
||||||
|
|
|
@ -33,8 +33,7 @@ stored in `persp-save-dir'.")
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! persp-mode
|
(def-package! persp-mode
|
||||||
:defer t
|
:defer t
|
||||||
|
|
|
@ -6,7 +6,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Library
|
;; Library
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +cc-sp-point-is-template-p (id action context)
|
(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
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +cc/reload-compile-db ()
|
(defun +cc/reload-compile-db ()
|
||||||
|
@ -125,7 +123,6 @@ preceded by the opening brace or a comma (disregarding whitespace in between)."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Hooks
|
;; Hooks
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +cc|fontify-constants ()
|
(defun +cc|fontify-constants ()
|
||||||
|
|
|
@ -20,8 +20,7 @@ compilation database is present in the project.")
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! cc-mode
|
(def-package! cc-mode
|
||||||
:commands (c-mode c++-mode objc-mode java-mode)
|
:commands (c-mode c++-mode objc-mode java-mode)
|
||||||
|
@ -159,22 +158,18 @@ compilation database is present in the project.")
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Major modes
|
;; Major modes
|
||||||
;;
|
|
||||||
|
|
||||||
;; `cmake-mode'
|
(def-package! company-cmake ; for `cmake-mode'
|
||||||
(def-package! company-cmake
|
|
||||||
:when (featurep! :completion company)
|
:when (featurep! :completion company)
|
||||||
:after cmake-mode
|
:after cmake-mode
|
||||||
:config (set-company-backend! 'cmake-mode 'company-cmake))
|
:config (set-company-backend! 'cmake-mode 'company-cmake))
|
||||||
|
|
||||||
|
|
||||||
;; `demangle-mode'
|
|
||||||
(def-package! demangle-mode
|
(def-package! demangle-mode
|
||||||
:hook llvm-mode)
|
:hook llvm-mode)
|
||||||
|
|
||||||
|
|
||||||
;; `glsl-mode'
|
(def-package! company-glsl ; for `glsl-mode'
|
||||||
(def-package! company-glsl
|
|
||||||
:when (featurep! :completion company)
|
:when (featurep! :completion company)
|
||||||
:after glsl-mode
|
:after glsl-mode
|
||||||
:config (set-company-backend! 'glsl-mode 'company-glsl))
|
:config (set-company-backend! 'glsl-mode 'company-glsl))
|
||||||
|
@ -182,7 +177,6 @@ compilation database is present in the project.")
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Rtags Support
|
;; Rtags Support
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! rtags
|
(def-package! rtags
|
||||||
:when (featurep! +rtags)
|
:when (featurep! +rtags)
|
||||||
|
|
|
@ -21,6 +21,7 @@
|
||||||
cider-stacktrace-default-filters '(tooling dup)
|
cider-stacktrace-default-filters '(tooling dup)
|
||||||
cider-prompt-save-file-on-load nil
|
cider-prompt-save-file-on-load nil
|
||||||
cider-repl-use-clojure-font-lock t)
|
cider-repl-use-clojure-font-lock t)
|
||||||
|
|
||||||
(map! :map cider-mode-map
|
(map! :map cider-mode-map
|
||||||
:localleader
|
:localleader
|
||||||
:n "'" #'cider-jack-in
|
:n "'" #'cider-jack-in
|
||||||
|
|
|
@ -10,7 +10,6 @@
|
||||||
(set-company-backend! 'nxml-mode '(company-nxml company-yasnippet)))
|
(set-company-backend! 'nxml-mode '(company-nxml company-yasnippet)))
|
||||||
|
|
||||||
|
|
||||||
;;
|
|
||||||
;; Third-party plugins
|
;; Third-party plugins
|
||||||
;;
|
;;
|
||||||
|
|
||||||
|
@ -37,7 +36,6 @@
|
||||||
:mode "\\.?vimperatorrc\\'")
|
:mode "\\.?vimperatorrc\\'")
|
||||||
|
|
||||||
|
|
||||||
;;
|
|
||||||
;; Frameworks
|
;; Frameworks
|
||||||
;;
|
;;
|
||||||
|
|
||||||
|
|
|
@ -2,7 +2,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Library
|
;; Library
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +emacs-lisp-eval (beg end)
|
(defun +emacs-lisp-eval (beg end)
|
||||||
|
@ -73,7 +72,6 @@ library/userland functions"
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Commands
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +emacs-lisp/repl ()
|
(defun +emacs-lisp/repl ()
|
||||||
|
@ -89,7 +87,6 @@ library/userland functions"
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Hooks
|
;; Hooks
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +emacs-lisp|extend-imenu ()
|
(defun +emacs-lisp|extend-imenu ()
|
||||||
|
|
|
@ -3,9 +3,9 @@
|
||||||
(defvar +emacs-lisp-enable-extra-fontification t
|
(defvar +emacs-lisp-enable-extra-fontification t
|
||||||
"If non-nil, highlight special forms, and defined functions and variables.")
|
"If non-nil, highlight special forms, and defined functions and variables.")
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; elisp-mode deferral hack
|
;; elisp-mode deferral hack
|
||||||
;;
|
|
||||||
|
|
||||||
;; `elisp-mode' is loaded at startup. In order to lazy load its config we need
|
;; `elisp-mode' is loaded at startup. In order to lazy load its config we need
|
||||||
;; to pretend it isn't loaded
|
;; to pretend it isn't loaded
|
||||||
|
@ -27,7 +27,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Config
|
;; Config
|
||||||
;;
|
|
||||||
|
|
||||||
(add-to-list 'auto-mode-alist '("\\.Cask\\'" . emacs-lisp-mode))
|
(add-to-list 'auto-mode-alist '("\\.Cask\\'" . emacs-lisp-mode))
|
||||||
|
|
||||||
|
@ -77,8 +76,7 @@
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
;; `auto-compile'
|
;; `auto-compile'
|
||||||
(setq auto-compile-display-buffer nil
|
(setq auto-compile-display-buffer nil
|
||||||
|
@ -124,7 +122,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Project modes
|
;; Project modes
|
||||||
;;
|
|
||||||
|
|
||||||
(def-project-mode! +emacs-lisp-ert-mode
|
(def-project-mode! +emacs-lisp-ert-mode
|
||||||
:modes (emacs-lisp-mode)
|
:modes (emacs-lisp-mode)
|
||||||
|
|
|
@ -2,7 +2,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Tests
|
;; Tests
|
||||||
;;
|
|
||||||
|
|
||||||
(defvar +go-test-last nil
|
(defvar +go-test-last nil
|
||||||
"The last test run.")
|
"The last test run.")
|
||||||
|
|
|
@ -1,8 +1,7 @@
|
||||||
;;; lang/go/config.el -*- lexical-binding: t; -*-
|
;;; lang/go/config.el -*- lexical-binding: t; -*-
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(after! go-mode
|
(after! go-mode
|
||||||
(set-env! "GOPATH" "GOROOT")
|
(set-env! "GOPATH" "GOROOT")
|
||||||
|
|
|
@ -4,8 +4,7 @@
|
||||||
((featurep! +dante) (load! "+dante")))
|
((featurep! +dante) (load! "+dante")))
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Common plugins
|
;; Common packages
|
||||||
;;
|
|
||||||
|
|
||||||
(after! haskell-mode
|
(after! haskell-mode
|
||||||
(setq haskell-process-suggest-remove-import-lines t ; warnings for redundant imports etc
|
(setq haskell-process-suggest-remove-import-lines t ; warnings for redundant imports etc
|
||||||
|
|
|
@ -9,8 +9,7 @@
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Common plugins
|
;; Common packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! android-mode
|
(def-package! android-mode
|
||||||
:commands android-mode
|
:commands android-mode
|
||||||
|
|
|
@ -34,7 +34,6 @@ ignore the cache."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Commands
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +javascript/repl ()
|
(defun +javascript/repl ()
|
||||||
|
@ -82,7 +81,6 @@ Run this for any buffer you want to skewer."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Hooks
|
;; Hooks
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +javascript|add-node-modules-path ()
|
(defun +javascript|add-node-modules-path ()
|
||||||
|
@ -112,7 +110,6 @@ prioritize project-local packages over global ones."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Advice
|
;; Advice
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +javascript*tide-project-root ()
|
(defun +javascript*tide-project-root ()
|
||||||
|
|
|
@ -23,8 +23,7 @@ If no viewers are found, `latex-preview-pane' is used.")
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! tex
|
(def-package! tex
|
||||||
:mode ("\\.tex\\'" . TeX-latex-mode)
|
:mode ("\\.tex\\'" . TeX-latex-mode)
|
||||||
|
|
|
@ -3,6 +3,7 @@
|
||||||
;; sp's default rules are obnoxious, so disable them
|
;; sp's default rules are obnoxious, so disable them
|
||||||
(provide 'smartparens-lua)
|
(provide 'smartparens-lua)
|
||||||
|
|
||||||
|
|
||||||
(after! lua-mode
|
(after! lua-mode
|
||||||
(set-lookup-handlers! 'lua-mode :documentation 'lua-search-documentation)
|
(set-lookup-handlers! 'lua-mode :documentation 'lua-search-documentation)
|
||||||
(set-electric! 'lua-mode :words '("else" "end"))
|
(set-electric! 'lua-mode :words '("else" "end"))
|
||||||
|
@ -16,7 +17,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Frameworks
|
;; Frameworks
|
||||||
;;
|
|
||||||
|
|
||||||
(def-project-mode! +lua-love-mode
|
(def-project-mode! +lua-love-mode
|
||||||
:modes (lua-mode markdown-mode json-mode)
|
:modes (lua-mode markdown-mode json-mode)
|
||||||
|
|
|
@ -25,8 +25,7 @@
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! org-download
|
(def-package! org-download
|
||||||
:commands (org-download-dnd org-download-dnd-base64)
|
:commands (org-download-dnd org-download-dnd-base64)
|
||||||
|
@ -70,7 +69,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Bootstrap
|
;; Bootstrap
|
||||||
;;
|
|
||||||
|
|
||||||
(defun +org|init-attach ()
|
(defun +org|init-attach ()
|
||||||
(setq org-attach-directory (expand-file-name +org-attach-dir org-directory))
|
(setq org-attach-directory (expand-file-name +org-attach-dir org-directory))
|
||||||
|
|
|
@ -53,8 +53,7 @@ string). Stops at the first function to return non-nil.")
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! ob-ipython
|
(def-package! ob-ipython
|
||||||
:when (featurep! +ipython)
|
:when (featurep! +ipython)
|
||||||
|
|
|
@ -7,8 +7,7 @@
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! ox-reveal
|
(def-package! ox-reveal
|
||||||
:defer t
|
:defer t
|
||||||
|
@ -43,8 +42,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Bootstrap
|
;; Bootstrap
|
||||||
;;
|
|
||||||
|
|
||||||
(defun +org|init-present ()
|
(defun +org|init-present ()
|
||||||
(require 'ox-reveal))
|
(require 'ox-reveal))
|
||||||
|
|
||||||
|
|
|
@ -113,7 +113,6 @@ the cursor."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Advice
|
;; Advice
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +org-attach*insert-link (_link filename)
|
(defun +org-attach*insert-link (_link filename)
|
||||||
|
|
|
@ -22,7 +22,6 @@ current file). Only scans first 2048 bytes of the document."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Modes
|
;; Modes
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(define-minor-mode +org-pretty-mode
|
(define-minor-mode +org-pretty-mode
|
||||||
|
@ -39,7 +38,6 @@ current file). Only scans first 2048 bytes of the document."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Commands
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +org/dwim-at-point ()
|
(defun +org/dwim-at-point ()
|
||||||
|
@ -314,7 +312,6 @@ another level of headings on each invocation."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Hooks
|
;; Hooks
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +org|delete-backward-char-and-realign-table-maybe ()
|
(defun +org|delete-backward-char-and-realign-table-maybe ()
|
||||||
|
@ -419,7 +416,6 @@ with `org-cycle')."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Advice
|
;; Advice
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +org*fix-newline-and-indent-in-src-blocks ()
|
(defun +org*fix-newline-and-indent-in-src-blocks ()
|
||||||
|
|
|
@ -15,8 +15,7 @@
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
;; `toc-org'
|
;; `toc-org'
|
||||||
(setq toc-org-hrefify-default "org")
|
(setq toc-org-hrefify-default "org")
|
||||||
|
@ -39,7 +38,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Bootstrap
|
;; Bootstrap
|
||||||
;;
|
|
||||||
|
|
||||||
(add-hook! 'org-load-hook
|
(add-hook! 'org-load-hook
|
||||||
#'(org-crypt-use-before-save-magic
|
#'(org-crypt-use-before-save-magic
|
||||||
|
@ -68,7 +66,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; `org-mode' hooks
|
;; `org-mode' hooks
|
||||||
;;
|
|
||||||
|
|
||||||
(defun +org|unfold-to-2nd-level-or-point ()
|
(defun +org|unfold-to-2nd-level-or-point ()
|
||||||
"My version of the 'overview' #+STARTUP option: expand first-level headings.
|
"My version of the 'overview' #+STARTUP option: expand first-level headings.
|
||||||
|
@ -118,7 +115,6 @@ unfold to point on startup."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; `org-load' hooks
|
;; `org-load' hooks
|
||||||
;;
|
|
||||||
|
|
||||||
(defun +org|setup-agenda ()
|
(defun +org|setup-agenda ()
|
||||||
(setq-default
|
(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
|
;; Built-in libraries
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! org-crypt ; built-in
|
(def-package! org-crypt ; built-in
|
||||||
:commands org-crypt-use-before-save-magic
|
:commands org-crypt-use-before-save-magic
|
||||||
|
|
|
@ -102,7 +102,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Projects
|
;; Projects
|
||||||
;;
|
|
||||||
|
|
||||||
(def-project-mode! +php-laravel-mode
|
(def-project-mode! +php-laravel-mode
|
||||||
:modes (php-mode yaml-mode web-mode nxml-mode js2-mode scss-mode)
|
:modes (php-mode yaml-mode web-mode nxml-mode js2-mode scss-mode)
|
||||||
|
|
|
@ -9,8 +9,7 @@
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! python
|
(def-package! python
|
||||||
:defer t
|
:defer t
|
||||||
|
@ -126,7 +125,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Environment management
|
;; Environment management
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! pipenv
|
(def-package! pipenv
|
||||||
:commands pipenv-project-p
|
:commands pipenv-project-p
|
||||||
|
|
|
@ -9,8 +9,7 @@
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! enh-ruby-mode
|
(def-package! enh-ruby-mode
|
||||||
:mode "\\.rb\\'"
|
:mode "\\.rb\\'"
|
||||||
|
@ -114,7 +113,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Version managers
|
;; Version managers
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! rbenv
|
(def-package! rbenv
|
||||||
:when (featurep! +rbenv)
|
:when (featurep! +rbenv)
|
||||||
|
|
|
@ -8,8 +8,7 @@
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! sh-script ; built-in
|
(def-package! sh-script ; built-in
|
||||||
:mode ("\\.zunit\\'" . sh-mode)
|
:mode ("\\.zunit\\'" . sh-mode)
|
||||||
|
|
|
@ -1,8 +1,7 @@
|
||||||
;;; lang/solidity/config.el -*- lexical-binding: t; -*-
|
;;; lang/solidity/config.el -*- lexical-binding: t; -*-
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
;; `solidity-mode'
|
;; `solidity-mode'
|
||||||
(setq solidity-comment-style 'slash)
|
(setq solidity-comment-style 'slash)
|
||||||
|
|
|
@ -20,8 +20,7 @@
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Frameworks
|
;; Framework-based minor-modes
|
||||||
;;
|
|
||||||
|
|
||||||
(def-project-mode! +web-jekyll-mode
|
(def-project-mode! +web-jekyll-mode
|
||||||
:modes (web-mode js-mode coffee-mode css-mode haml-mode pug-mode)
|
:modes (web-mode js-mode coffee-mode css-mode haml-mode pug-mode)
|
||||||
|
|
|
@ -9,7 +9,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Library
|
;; Library
|
||||||
;;
|
|
||||||
|
|
||||||
(defun +ein--collect-ein-buffer-links ()
|
(defun +ein--collect-ein-buffer-links ()
|
||||||
(let ((end (window-end))
|
(let ((end (window-end))
|
||||||
|
|
|
@ -5,8 +5,7 @@
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(after! ein
|
(after! ein
|
||||||
(setq ein:notebook-modes
|
(setq ein:notebook-modes
|
||||||
|
|
|
@ -47,7 +47,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Commands
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +magit/quit (&optional _kill-buffer)
|
(defun +magit/quit (&optional _kill-buffer)
|
||||||
|
@ -102,7 +101,6 @@ format."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Advice
|
;; Advice
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +magit*hub-settings--format-magithub.enabled ()
|
(defun +magit*hub-settings--format-magithub.enabled ()
|
||||||
|
|
|
@ -12,8 +12,7 @@ available.")
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! magit
|
(def-package! magit
|
||||||
:commands magit-file-delete
|
:commands magit-file-delete
|
||||||
|
|
|
@ -30,7 +30,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; API
|
;; API
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload (autoload 'auth-source-pass-parse-entry "auth-source-pass")
|
;;;###autoload (autoload 'auth-source-pass-parse-entry "auth-source-pass")
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
|
@ -62,7 +61,6 @@ search of your username. May prompt for your gpg passphrase."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Commands
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload (autoload 'password-store-dir "password-store")
|
;;;###autoload (autoload 'password-store-dir "password-store")
|
||||||
;;;###autoload (autoload 'password-store-list "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
|
;; Ivy interface
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +pass/ivy (arg)
|
(defun +pass/ivy (arg)
|
||||||
|
@ -136,7 +133,6 @@ fields in `+pass-url-fields' is used to find the url field."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; TODO Helm interface
|
;; TODO Helm interface
|
||||||
;;
|
|
||||||
|
|
||||||
;; (defun +pass/helm ()
|
;; (defun +pass/helm ()
|
||||||
;; (interactive)
|
;; (interactive)
|
||||||
|
|
|
@ -8,8 +8,7 @@
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
;; `password-store'
|
;; `password-store'
|
||||||
(setq password-store-password-length 12)
|
(setq password-store-password-length 12)
|
||||||
|
|
|
@ -13,7 +13,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Commands
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +tmux (command &rest args)
|
(defun +tmux (command &rest args)
|
||||||
|
@ -87,7 +86,6 @@ but do not execute them."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Data functions
|
;; Data functions
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +tmux-list-sessions ()
|
(defun +tmux-list-sessions ()
|
||||||
|
|
|
@ -99,7 +99,6 @@ PLIST can have the following properties:
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Bootstrap
|
;; Bootstrap
|
||||||
;;
|
|
||||||
|
|
||||||
(setq doom-fallback-buffer-name +doom-dashboard-name
|
(setq doom-fallback-buffer-name +doom-dashboard-name
|
||||||
initial-buffer-choice #'+doom-dashboard-initial-buffer)
|
initial-buffer-choice #'+doom-dashboard-initial-buffer)
|
||||||
|
@ -109,7 +108,6 @@ PLIST can have the following properties:
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Major mode
|
;; Major mode
|
||||||
;;
|
|
||||||
|
|
||||||
(define-derived-mode +doom-dashboard-mode special-mode
|
(define-derived-mode +doom-dashboard-mode special-mode
|
||||||
(format "DOOM v%s" doom-version)
|
(format "DOOM v%s" doom-version)
|
||||||
|
@ -168,7 +166,6 @@ PLIST can have the following properties:
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Hooks
|
;; Hooks
|
||||||
;;
|
|
||||||
|
|
||||||
(defun +doom-dashboard|reposition-point ()
|
(defun +doom-dashboard|reposition-point ()
|
||||||
"Trap the point in the buttons."
|
"Trap the point in the buttons."
|
||||||
|
@ -264,7 +261,6 @@ project (which may be different across perspective)."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Library
|
;; Library
|
||||||
;;
|
|
||||||
|
|
||||||
(defun +doom-dashboard-initial-buffer ()
|
(defun +doom-dashboard-initial-buffer ()
|
||||||
"Returns buffer to display on startup. Designed for `initial-buffer-choice'."
|
"Returns buffer to display on startup. Designed for `initial-buffer-choice'."
|
||||||
|
@ -338,7 +334,6 @@ controlled by `+doom-dashboard-pwd-policy'."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Widgets
|
;; Widgets
|
||||||
;;
|
|
||||||
|
|
||||||
(defun doom-dashboard-widget-banner ()
|
(defun doom-dashboard-widget-banner ()
|
||||||
(let ((point (point)))
|
(let ((point (point)))
|
||||||
|
|
|
@ -2,7 +2,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Modeline library
|
;; Modeline library
|
||||||
;;
|
|
||||||
|
|
||||||
(defvar doom--modeline-fn-alist ())
|
(defvar doom--modeline-fn-alist ())
|
||||||
(defvar doom--modeline-var-alist ())
|
(defvar doom--modeline-var-alist ())
|
||||||
|
@ -89,7 +88,6 @@ DEFAULT is non-nil, set the default mode-line for all buffers."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Custom faces
|
;; Custom faces
|
||||||
;;
|
|
||||||
|
|
||||||
(defgroup +doom-modeline nil
|
(defgroup +doom-modeline nil
|
||||||
"TODO"
|
"TODO"
|
||||||
|
@ -157,8 +155,7 @@ active."
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
;; anzu and evil-anzu expose current/total state that can be displayed in the
|
;; anzu and evil-anzu expose current/total state that can be displayed in the
|
||||||
;; mode-line.
|
;; mode-line.
|
||||||
|
@ -229,7 +226,6 @@ active."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Variables
|
;; Variables
|
||||||
;;
|
|
||||||
|
|
||||||
(defvar +doom-modeline-height 23
|
(defvar +doom-modeline-height 23
|
||||||
"How tall the mode-line should be (only respected in GUI emacs).")
|
"How tall the mode-line should be (only respected in GUI emacs).")
|
||||||
|
@ -260,7 +256,6 @@ file-name => comint.el")
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Modeline helpers
|
;; Modeline helpers
|
||||||
;;
|
|
||||||
|
|
||||||
(defun active ()
|
(defun active ()
|
||||||
(eq (selected-window) +doom-modeline-current-window))
|
(eq (selected-window) +doom-modeline-current-window))
|
||||||
|
@ -389,7 +384,6 @@ Example:
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; buffer information
|
;; buffer information
|
||||||
;;
|
|
||||||
|
|
||||||
(def-modeline-segment! buffer-default-directory
|
(def-modeline-segment! buffer-default-directory
|
||||||
"Displays `default-directory'. This is for special buffers like the scratch
|
"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
|
;; major-mode
|
||||||
;;
|
|
||||||
|
|
||||||
(def-modeline-segment! major-mode
|
(def-modeline-segment! major-mode
|
||||||
"The major mode, including process, environment and text-scale info."
|
"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
|
;; vcs
|
||||||
;;
|
|
||||||
|
|
||||||
(defvar-local +doom-modeline--vcs nil)
|
(defvar-local +doom-modeline--vcs nil)
|
||||||
(defun +doom-modeline--update-vcs ()
|
(defun +doom-modeline--update-vcs ()
|
||||||
|
@ -544,7 +536,6 @@ directory, the file name, and its state (modified, read-only or non-existent)."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; flycheck
|
;; flycheck
|
||||||
;;
|
|
||||||
|
|
||||||
(defvar +doom-modeline-vspc
|
(defvar +doom-modeline-vspc
|
||||||
(propertize " " 'face 'variable-pitch)
|
(propertize " " 'face 'variable-pitch)
|
||||||
|
@ -589,7 +580,6 @@ icons."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; selection-info
|
;; selection-info
|
||||||
;;
|
|
||||||
|
|
||||||
(defsubst doom-column (pos)
|
(defsubst doom-column (pos)
|
||||||
(save-excursion (goto-char 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)
|
;; matches (anzu, evil-substitute, iedit, macro)
|
||||||
;;
|
|
||||||
|
|
||||||
(defun +doom-modeline--macro-recording ()
|
(defun +doom-modeline--macro-recording ()
|
||||||
"Display current Emacs or evil macro being recorded."
|
"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
|
;; media-info
|
||||||
;;
|
|
||||||
|
|
||||||
(def-modeline-segment! media-info
|
(def-modeline-segment! media-info
|
||||||
"Metadata regarding the current file, such as dimensions for images."
|
"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
|
;; bar
|
||||||
;;
|
|
||||||
|
|
||||||
(defvar +doom-modeline--bar-active nil)
|
(defvar +doom-modeline--bar-active nil)
|
||||||
(defvar +doom-modeline--bar-inactive nil)
|
(defvar +doom-modeline--bar-inactive nil)
|
||||||
|
@ -759,7 +746,6 @@ Returns \"\" to not break --no-window-system."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Mode lines
|
;; Mode lines
|
||||||
;;
|
|
||||||
|
|
||||||
(def-modeline! 'main
|
(def-modeline! 'main
|
||||||
'(bar matches " " buffer-info " %l:%c %p " selection-info)
|
'(bar matches " " buffer-info " %l:%c %p " selection-info)
|
||||||
|
@ -784,7 +770,6 @@ Returns \"\" to not break --no-window-system."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Hooks
|
;; Hooks
|
||||||
;;
|
|
||||||
|
|
||||||
(defun +doom-modeline|refresh-bars (&optional width height)
|
(defun +doom-modeline|refresh-bars (&optional width height)
|
||||||
(setq +doom-modeline--bar-active
|
(setq +doom-modeline--bar-active
|
||||||
|
@ -818,7 +803,6 @@ Returns \"\" to not break --no-window-system."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Bootstrap
|
;; Bootstrap
|
||||||
;;
|
|
||||||
|
|
||||||
(doom-set-modeline 'main t) ; set default modeline
|
(doom-set-modeline 'main t) ; set default modeline
|
||||||
|
|
||||||
|
|
|
@ -19,8 +19,7 @@
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
;; <https://github.com/hlissner/emacs-doom-theme>
|
;; <https://github.com/hlissner/emacs-doom-theme>
|
||||||
(def-package! doom-themes
|
(def-package! doom-themes
|
||||||
|
|
|
@ -12,8 +12,7 @@ Changes to this variable do not take effect until `fci-mode' is restarted.")
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! fill-column-indicator
|
(def-package! fill-column-indicator
|
||||||
:hook ((text-mode prog-mode conf-mode) . turn-on-fci-mode)
|
:hook ((text-mode prog-mode conf-mode) . turn-on-fci-mode)
|
||||||
|
|
|
@ -68,7 +68,6 @@ Currently available functions:
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Custom faces
|
;; Custom faces
|
||||||
;;
|
|
||||||
|
|
||||||
(defgroup +modeline nil
|
(defgroup +modeline nil
|
||||||
"TODO"
|
"TODO"
|
||||||
|
@ -124,8 +123,7 @@ Currently available functions:
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Plugins
|
;; Packages
|
||||||
;;
|
|
||||||
|
|
||||||
(def-package! anzu
|
(def-package! anzu
|
||||||
:after-call isearch-mode
|
:after-call isearch-mode
|
||||||
|
@ -161,7 +159,6 @@ Currently available functions:
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Hacks
|
;; Hacks
|
||||||
;;
|
|
||||||
|
|
||||||
;; Keep `+modeline-current-window' up-to-date
|
;; Keep `+modeline-current-window' up-to-date
|
||||||
(defvar +modeline-current-window (frame-selected-window))
|
(defvar +modeline-current-window (frame-selected-window))
|
||||||
|
@ -225,7 +222,6 @@ Currently available functions:
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Helpers
|
;; Helpers
|
||||||
;;
|
|
||||||
|
|
||||||
(defun +modeline--make-xpm (width height &optional color)
|
(defun +modeline--make-xpm (width height &optional color)
|
||||||
"Create an XPM bitmap. Inspired by `powerline''s `pl/make-xpm'."
|
"Create an XPM bitmap. Inspired by `powerline''s `pl/make-xpm'."
|
||||||
|
@ -264,7 +260,6 @@ use `buffer-name'."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Buffer file path styles
|
;; Buffer file path styles
|
||||||
;;
|
|
||||||
|
|
||||||
(defun +modeline-file-path-with-project ()
|
(defun +modeline-file-path-with-project ()
|
||||||
"Returns the unaltered buffer file path relative to the project root's
|
"Returns the unaltered buffer file path relative to the project root's
|
||||||
|
@ -356,7 +351,6 @@ Meant for `+modeline-buffer-path-function'."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Bars
|
;; Bars
|
||||||
;;
|
|
||||||
|
|
||||||
(defvar +modeline-bar-start nil "TODO")
|
(defvar +modeline-bar-start nil "TODO")
|
||||||
(put '+modeline-bar-start 'risky-local-variable t)
|
(put '+modeline-bar-start 'risky-local-variable t)
|
||||||
|
@ -394,7 +388,6 @@ Meant for `+modeline-buffer-path-function'."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Segments
|
;; Segments
|
||||||
;;
|
|
||||||
|
|
||||||
(defun +modeline|update-on-change ()
|
(defun +modeline|update-on-change ()
|
||||||
(+modeline--set-+modeline-buffer-state)
|
(+modeline--set-+modeline-buffer-state)
|
||||||
|
@ -666,7 +659,6 @@ icons."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Preset modeline formats
|
;; Preset modeline formats
|
||||||
;;
|
|
||||||
|
|
||||||
(def-modeline-format! :main
|
(def-modeline-format! :main
|
||||||
'(+modeline-matches " "
|
'(+modeline-matches " "
|
||||||
|
@ -696,9 +688,6 @@ icons."
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;;
|
|
||||||
;;
|
|
||||||
|
|
||||||
(def-modeline-segment! +modeline--rest
|
(def-modeline-segment! +modeline--rest
|
||||||
(let ((rhs-str (format-mode-line +modeline-format-right)))
|
(let ((rhs-str (format-mode-line +modeline-format-right)))
|
||||||
(list (propertize
|
(list (propertize
|
||||||
|
|
|
@ -24,7 +24,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Core functions
|
;; Core functions
|
||||||
;;
|
|
||||||
|
|
||||||
;; Don't try to resize popup windows
|
;; Don't try to resize popup windows
|
||||||
(advice-add #'balance-windows :around #'+popup*save)
|
(advice-add #'balance-windows :around #'+popup*save)
|
||||||
|
@ -32,7 +31,6 @@
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; External functions
|
;; External functions
|
||||||
;;
|
|
||||||
|
|
||||||
;; `company'
|
;; `company'
|
||||||
(progn
|
(progn
|
||||||
|
|
|
@ -129,7 +129,6 @@ and enables `+popup-buffer-mode'."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Public library
|
;; Public library
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +popup-buffer-p (&optional buffer)
|
(defun +popup-buffer-p (&optional buffer)
|
||||||
|
@ -211,7 +210,6 @@ Uses `shrink-window-if-larger-than-buffer'."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Hooks
|
;; Hooks
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +popup|adjust-fringes ()
|
(defun +popup|adjust-fringes ()
|
||||||
|
@ -291,7 +289,6 @@ Any non-nil value besides the above will be used as the raw value for
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Commands
|
;; Commands
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defalias 'other-popup #'+popup/other)
|
(defalias 'other-popup #'+popup/other)
|
||||||
|
@ -397,7 +394,6 @@ the message buffer in a popup window."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Advice
|
;; Advice
|
||||||
;;
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +popup*close (&rest _)
|
(defun +popup*close (&rest _)
|
||||||
|
@ -555,7 +551,6 @@ Accepts the same arguments as `display-buffer-in-side-window'. You must set
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Emacs backwards compatibility
|
;; Emacs backwards compatibility
|
||||||
;;
|
|
||||||
|
|
||||||
(unless EMACS26+
|
(unless EMACS26+
|
||||||
(defvar window-sides-reversed nil)
|
(defvar window-sides-reversed nil)
|
||||||
|
|
|
@ -199,7 +199,6 @@ Example:
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Obsolete settings
|
;; Obsolete settings
|
||||||
;;
|
|
||||||
|
|
||||||
;; FIXME obsolete :popup
|
;; FIXME obsolete :popup
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
|
|
|
@ -35,7 +35,6 @@ adjustment.")
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Global modes
|
;; Global modes
|
||||||
;;
|
|
||||||
|
|
||||||
(defvar +popup-mode-map (make-sparse-keymap)
|
(defvar +popup-mode-map (make-sparse-keymap)
|
||||||
"Active keymap in a session with the popup system enabled. See
|
"Active keymap in a session with the popup system enabled. See
|
||||||
|
@ -95,7 +94,6 @@ that window has been changed or closed."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Macros
|
;; Macros
|
||||||
;;
|
|
||||||
|
|
||||||
(defmacro with-popup-rules! (rules &rest body)
|
(defmacro with-popup-rules! (rules &rest body)
|
||||||
"Evaluate BODY with popup RULES. RULES is a list of popup rules. Each rule
|
"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
|
;; Default popup rules & bootstrap
|
||||||
;;
|
|
||||||
|
|
||||||
(set-popup-rules!
|
(set-popup-rules!
|
||||||
(when (featurep! +all)
|
(when (featurep! +all)
|
||||||
|
@ -175,6 +172,5 @@ prevent the popup(s) from messing up the UI (or vice versa)."
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Hacks
|
;; Hacks
|
||||||
;;
|
|
||||||
|
|
||||||
(load! "+hacks")
|
(load! "+hacks")
|
||||||
|
|
Some files were not shown because too many files have changed in this diff Show more
Loading…
Add table
Add a link
Reference in a new issue