a57c0fbede
devdocs-lookup is broken at the moment. devdocs search is still available through +lookup/online as a provider however. This may be reversed later, when (and if) we find a better devdocs backend.
140 lines
5.1 KiB
EmacsLisp
140 lines
5.1 KiB
EmacsLisp
;;; config/default/+evil-commands.el -*- lexical-binding: t; -*-
|
|
;;;###if (featurep! :feature evil)
|
|
|
|
(defalias 'ex! 'evil-ex-define-cmd)
|
|
|
|
(evil-define-command doom:cleanup-session (bang)
|
|
(interactive "<!>")
|
|
(doom/cleanup-session bang))
|
|
|
|
(evil-define-operator doom:open-scratch-buffer (bang)
|
|
(interactive "<!>")
|
|
(doom/open-scratch-buffer bang))
|
|
|
|
(evil-define-command doom:pwd (bang)
|
|
"Display the current working directory. If BANG, copy it to your clipboard."
|
|
(interactive "<!>")
|
|
(if (not bang)
|
|
(pwd)
|
|
(kill-new default-directory)
|
|
(message "Copied to clipboard")))
|
|
|
|
(evil-define-command doom:make (command &optional from-pwd)
|
|
"Run the current project Makefile's COMMAND. If FROM-PWD (bang), run the make
|
|
command from the current directory instead of the project root."
|
|
(interactive "<sh><!>")
|
|
(let ((default-directory (if from-pwd default-directory (doom-project-root t))))
|
|
(compile (or (if command (evil-ex-replace-special-filenames command))
|
|
(eval compile-command)))))
|
|
|
|
(evil-define-command doom:reverse-lines (beg end)
|
|
"Reverse lines between BEG and END."
|
|
(interactive "<r>")
|
|
(reverse-region beg end))
|
|
|
|
|
|
;;
|
|
;; Commands
|
|
;;
|
|
|
|
;;; Commands defined elsewhere
|
|
;;(ex! "al[ign]" #'+evil:align)
|
|
;;(ex! "g[lobal]" #'+evil:global)
|
|
|
|
;;; Custom commands
|
|
;; Editing
|
|
(ex! "@" #'+evil:macro-on-all-lines) ; TODO Test me
|
|
(ex! "al[ign]" #'+evil:align)
|
|
(ex! "ral[ign]" #'+evil:align-right)
|
|
(ex! "enhtml" #'+web:encode-html-entities)
|
|
(ex! "dehtml" #'+web:decode-html-entities)
|
|
(ex! "mc" #'+evil:mc)
|
|
(ex! "iedit" #'evil-multiedit-ex-match)
|
|
(ex! "na[rrow]" #'+evil:narrow-buffer)
|
|
(ex! "retab" #'+evil:retab)
|
|
(ex! "rev[erse]" #'doom:reverse-lines)
|
|
;; External resources
|
|
;; TODO (ex! "db" #'doom:db)
|
|
;; TODO (ex! "dbu[se]" #'doom:db-select)
|
|
;; TODO (ex! "go[ogle]" #'doom:google-search)
|
|
(ex! "lo[okup]" #'+lookup:online)
|
|
(ex! "dash" #'+lookup:dash)
|
|
(ex! "http" #'httpd-start) ; start http server
|
|
(ex! "repl" #'+eval:repl) ; invoke or send to repl
|
|
;; TODO (ex! "rx" 'doom:regex) ; open re-builder
|
|
(ex! "sh[ell]" #'+eshell:run)
|
|
(ex! "t[mux]" #'+tmux:run) ; send to tmux
|
|
(ex! "tcd" #'+tmux:cd-here) ; cd to default-directory in tmux
|
|
(ex! "pad" #'doom:open-scratch-buffer)
|
|
;; GIT
|
|
(ex! "gist" #'+gist:send) ; send current buffer/region to gist
|
|
(ex! "gistl" #'+gist:list) ; list gists by user
|
|
(ex! "gbrowse" #'+vc:git-browse) ; show file in github/gitlab
|
|
(ex! "gissues" #'+vc/git-browse-issues) ; show github issues
|
|
(ex! "git" #'magit-status) ; open magit status window
|
|
(ex! "gstage" #'magit-stage)
|
|
(ex! "gunstage" #'magit-unstage)
|
|
(ex! "gblame" #'magit-blame)
|
|
(ex! "grevert" #'git-gutter:revert-hunk)
|
|
;; Dealing with buffers
|
|
(ex! "clean[up]" #'doom:cleanup-session)
|
|
(ex! "k[ill]" #'doom/kill-this-buffer)
|
|
(ex! "k[ill]all" #'+default:kill-all-buffers)
|
|
(ex! "k[ill]m" #'+default:kill-matching-buffers)
|
|
(ex! "k[ill]o" #'doom/kill-other-buffers)
|
|
(ex! "l[ast]" #'doom/popup-restore)
|
|
(ex! "m[sg]" #'view-echo-area-messages)
|
|
(ex! "pop[up]" #'doom/popup-this-buffer)
|
|
;; Project navigation
|
|
(ex! "a" #'projectile-find-other-file)
|
|
(ex! "cd" #'+default:cd)
|
|
(ex! "pwd" #'doom:pwd)
|
|
(cond ((featurep! :completion ivy)
|
|
(ex! "ag" #'+ivy:ag)
|
|
(ex! "agc[wd]" #'+ivy:ag-from-cwd)
|
|
(ex! "rg" #'+ivy:rg)
|
|
(ex! "rgc[wd]" #'+ivy:rg-from-cwd)
|
|
(ex! "pt" #'+ivy:pt)
|
|
(ex! "ptc[wd]" #'+ivy:pt-from-cwd)
|
|
(ex! "grep" #'+ivy:grep)
|
|
(ex! "grepc[wd]" #'+ivy:grep-from-cwd)
|
|
(ex! "sw[iper]" #'+ivy:swiper)
|
|
(ex! "todo" #'+ivy:todo))
|
|
((featurep! :completion helm)
|
|
(ex! "ag" #'+helm:ag)
|
|
(ex! "agc[wd]" #'+helm:ag-from-cwd)
|
|
(ex! "rg" #'+helm:rg)
|
|
(ex! "rgc[wd]" #'+helm:rg-from-cwd)
|
|
(ex! "pt" #'+helm:pt)
|
|
(ex! "ptc[wd]" #'+helm:pt-from-cwd)
|
|
(ex! "grep" #'+helm:grep)
|
|
(ex! "grepc[wd]" #'+helm:grep-from-cwd)
|
|
(ex! "sw[oop]" #'+helm:swoop)
|
|
;; (ex! "todo" #'+helm:todo) TODO implement `+helm:todo'
|
|
))
|
|
;; Project tools
|
|
(ex! "mak[e]" #'doom:make)
|
|
(ex! "debug" #'+debug/run)
|
|
(ex! "er[rors]" #'flycheck-list-errors)
|
|
;; File operations
|
|
(ex! "cp" #'+evil:copy-this-file)
|
|
(ex! "mv" #'+evil:move-this-file)
|
|
(ex! "rm" #'+evil:delete-this-file)
|
|
;; Sessions/tabs
|
|
(ex! "sclear" #'+workspace/kill-session)
|
|
(ex! "sl[oad]" #'+workspace:load-session)
|
|
(ex! "ss[ave]" #'+workspace:save-session)
|
|
(ex! "tabc[lose]" #'+workspace:delete)
|
|
(ex! "tabclear" #'doom/kill-all-buffers)
|
|
(ex! "tabl[ast]" #'+workspace/switch-to-last)
|
|
(ex! "tabload" #'+workspace:load)
|
|
(ex! "tabn[ew]" #'+workspace:new)
|
|
(ex! "tabn[ext]" #'+workspace:switch-next)
|
|
(ex! "tabp[rev]" #'+workspace:switch-previous)
|
|
(ex! "tabr[ename]" #'+workspace:rename)
|
|
(ex! "tabs" #'+workspace/display)
|
|
(ex! "tabsave" #'+workspace:save)
|
|
;; Org-mode
|
|
(ex! "cap" #'org-capture)
|
|
|