Updated the shit
This commit is contained in:
qorg11
parent
66d5c1f60b
commit
288d81be1b
1 changed files with 680 additions and 569 deletions
577
config.org
577
config.org
|
|
@ -3,46 +3,46 @@
|
|||
|
||||
* qorg's Emacs config
|
||||
|
||||
This is my Emacs configuration. Hope you like it.
|
||||
This is my Emacs configuration. Hope you like it.
|
||||
|
||||
** Installation
|
||||
Just copy this repository to your .emacs.d. Nothing else is needed.
|
||||
Just copy this repository to your .emacs.d. Nothing else is needed.
|
||||
* Why?
|
||||
- I can
|
||||
- I don't like doom emacs
|
||||
- I don't like spacemacs
|
||||
- I don't want to learn doom emacs
|
||||
- I don't want to learn spacemacs
|
||||
- I don't like Vim
|
||||
- I can
|
||||
- I don't like doom emacs
|
||||
- I don't like spacemacs
|
||||
- I don't want to learn doom emacs
|
||||
- I don't want to learn spacemacs
|
||||
- I don't like Vim
|
||||
** About me
|
||||
Here I set variables about personal information i'll use later in
|
||||
this config.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
Here I set variables about personal information i'll use later in
|
||||
this config.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(setq name "qorg11")
|
||||
(setq email "qorg@vxempire.xyz")
|
||||
(setq website "qorg11.net")
|
||||
#+END_SRC
|
||||
#+END_SRC
|
||||
** Dependencies
|
||||
The only no emacs related dependence in this configuration is the
|
||||
IBM Plex Mono font. Install it from your distribution packages.
|
||||
You can change it before opening Emacs with this configuration for
|
||||
the first time.
|
||||
The only no emacs related dependence in this configuration is the
|
||||
IBM Plex Mono font. Install it from your distribution packages.
|
||||
You can change it before opening Emacs with this configuration for
|
||||
the first time.
|
||||
|
||||
For irony-mode (C autocompletion) irony-sever must be
|
||||
installed. You can install it with M-x irony-install-server or via
|
||||
distribution's packages, in Debian case, apt install irony-server.
|
||||
Using M-x irony-install-server requires cmake and a lot of
|
||||
dependences I'm to lazy to install.
|
||||
For irony-mode (C autocompletion) irony-sever must be
|
||||
installed. You can install it with M-x irony-install-server or via
|
||||
distribution's packages, in Debian case, apt install irony-server.
|
||||
Using M-x irony-install-server requires cmake and a lot of
|
||||
dependences I'm to lazy to install.
|
||||
|
||||
** Configuration
|
||||
Yeah, this configuration file has a configuration, ironic ha?
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
Yeah, this configuration file has a configuration, ironic ha?
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(setq i-just-use-emacs-to-be-cool nil) ;; Repleace to true to use EVIL
|
||||
|
||||
#+END_SRC
|
||||
#+END_SRC
|
||||
|
||||
* gc
|
||||
#+begin_src emacs-lisp
|
||||
#+begin_src emacs-lisp
|
||||
;; Minimize garbage collection during startup
|
||||
(setq gc-cons-threshold most-positive-fixnum)
|
||||
|
||||
|
|
@ -50,11 +50,11 @@ Yeah, this configuration file has a configuration, ironic ha?
|
|||
(add-hook 'emacs-startup-hook
|
||||
(lambda ()
|
||||
(setq gc-cons-threshold (expt 2 23))))
|
||||
#+end_src
|
||||
#+end_src
|
||||
* melpa crap, and basic packages installation
|
||||
melpa, where you get the packages. This also installs use-package,
|
||||
and other packages I use.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
melpa, where you get the packages. This also installs use-package,
|
||||
and other packages I use.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(require 'package)
|
||||
(let* ((no-ssl (and (memq system-type '(windows-nt ms-dos))
|
||||
(not (gnutls-available-p))))
|
||||
|
|
@ -71,12 +71,12 @@ and other packages I use.
|
|||
(unless (package-installed-p 'use-package)
|
||||
(package-refresh-contents)
|
||||
(package-install 'use-package))
|
||||
#+END_SRC
|
||||
#+END_SRC
|
||||
** Generic packages
|
||||
Here I install some packages that don't need configuration.
|
||||
Remember to run M-x all-the-icons-install-fonts after the first
|
||||
init to install the fonts.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
Here I install some packages that don't need configuration.
|
||||
Remember to run M-x all-the-icons-install-fonts after the first
|
||||
init to install the fonts.
|
||||
#+BEGIN_SRC elisp
|
||||
|
||||
(use-package markdown-mode
|
||||
:defer 1
|
||||
|
|
@ -88,10 +88,10 @@ init to install the fonts.
|
|||
(use-package which-key
|
||||
:ensure t
|
||||
:init (which-key-mode))
|
||||
#+END_SRC
|
||||
#+END_SRC
|
||||
* Autoindentation
|
||||
C-c n for indent-buffer. I don't use the rest.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
C-c n for indent-buffer. I don't use the rest.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(setq-default tab-width 5)
|
||||
(defvaralias 'sgml-basic-offset 'tab-width)
|
||||
(add-hook 'html-mode-hook
|
||||
|
|
@ -104,18 +104,18 @@ C-c n for indent-buffer. I don't use the rest.
|
|||
(global-set-key (kbd "C-c n") 'indent-buffer)
|
||||
;; C bullshit
|
||||
(c-set-offset 'arglist-cont-nonempty '+)
|
||||
#+END_SRC
|
||||
#+END_SRC
|
||||
|
||||
* Shorcuts
|
||||
Probably this overwrites another keybinding. But since I overwrited
|
||||
it. I don't think i'd ever use the overwritten.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
Probably this overwrites another keybinding. But since I overwrited
|
||||
it. I don't think i'd ever use the overwritten.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(global-set-key (kbd "M-m") 'mark-whole-buffer)
|
||||
(global-set-key (kbd "C-c m") 'man)
|
||||
#+END_SRC
|
||||
#+END_SRC
|
||||
|
||||
* No idea
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(setq package-enable-at-startup nil) (package-initialize)
|
||||
(setq make-backup-files nil) ; stop creating backup~ files
|
||||
(setq auto-save-default nil) ; stop creating #autosave# files
|
||||
|
|
@ -131,12 +131,41 @@ it. I don't think i'd ever use the overwritten.
|
|||
(use-package zencoding-mode
|
||||
:ensure t
|
||||
:defer 1)
|
||||
#+END_SRC
|
||||
#+END_SRC
|
||||
* My functions
|
||||
Functions I wrote because emacs lisp is cool and useful.
|
||||
#+begin_src emacs-lisp
|
||||
(defun qorg/goto-previous-buffer ()
|
||||
"Switch to the previous buffer."
|
||||
(interactive)
|
||||
(switch-to-buffer (other-buffer)))
|
||||
|
||||
(defun kill-inner-word ()
|
||||
"Unlike (kill-word) function, this function actually kill a world."
|
||||
(interactive)
|
||||
(forward-char 1)
|
||||
(backward-word)
|
||||
(kill-word 1))
|
||||
(defun qorg/no-lines()
|
||||
"Locally disable number line mode, useful hooks."
|
||||
(display-line-numbers-mode -1))
|
||||
|
||||
(defun qorg/git-pushall ()
|
||||
"Call the git pushall shell command."
|
||||
(interactive)
|
||||
(shell-command "git pushall"))
|
||||
|
||||
(defun qorg/goto-dashboard ()
|
||||
"Goes to the dashboard buffer"
|
||||
(interactive)
|
||||
(switch-to-buffer "*dashboard*")
|
||||
(dashboard-mode))
|
||||
#+end_src
|
||||
* Programs
|
||||
Emacs customization, Here is where most of the configuration is.
|
||||
Emacs customization, Here is where most of the configuration is.
|
||||
** Pseudopersonalization
|
||||
The basic emacs persdonalization lol
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
The basic emacs persdonalization lol
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(tool-bar-mode -1)
|
||||
(menu-bar-mode -1)
|
||||
(global-hl-line-mode)
|
||||
|
|
@ -146,13 +175,13 @@ The basic emacs persdonalization lol
|
|||
(setq-default major-mode 'text-mode)
|
||||
(defalias 'yes-or-no-p 'y-or-n-p)
|
||||
;; Are you experienced?
|
||||
(set-cursor-color "purple")
|
||||
|
||||
(set-face-background 'line-number nil)
|
||||
(set-face-background 'line-number-current-line nil)
|
||||
(setq-default Man-notify-method 'pushy)
|
||||
#+END_SRC
|
||||
#+END_SRC
|
||||
** Highlight matching parentheses
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(show-paren-mode 1)
|
||||
(setq show-paren-style 'mixed)
|
||||
|
||||
|
|
@ -160,65 +189,66 @@ The basic emacs persdonalization lol
|
|||
(setq gc-cons-threshold most-positive-fixnum)
|
||||
(defun startup/reset-gc () (setq gc-cons-threshold startup/gc-cons-threshold))
|
||||
(add-hook 'emacs-startup-hook 'startup/reset-gc)
|
||||
#+END_SRC
|
||||
#+END_SRC
|
||||
** Tramp mode shit
|
||||
#+begin_src emacs-lisp
|
||||
#+begin_src emacs-lisp
|
||||
(set-variable 'tramp-copy-size-limit 122222222222)
|
||||
(set-variable 'tramp-inline-compress-start-size 12222222222222)
|
||||
#+end_src
|
||||
#+end_src
|
||||
** Lines and columns
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(global-display-line-numbers-mode 1)
|
||||
(setq display-line-numbers-type 'relative)
|
||||
(column-number-mode 1)
|
||||
#+END_SRC
|
||||
#+END_SRC
|
||||
** Flycheck
|
||||
Flycheck is a syntax validator or somehting like that
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
Flycheck is a syntax validator or somehting like that
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(use-package flycheck
|
||||
:ensure t
|
||||
:init
|
||||
(add-hook 'after-init-hook #'global-flycheck-mode))
|
||||
#+END_SRC
|
||||
And for raku
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
#+END_SRC
|
||||
And for raku
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(use-package flycheck-raku
|
||||
:ensure t
|
||||
:init
|
||||
(add-hook 'raku-mode 'flycheck-raku-mode))
|
||||
#+END_SRC
|
||||
#+END_SRC
|
||||
|
||||
** Terminal
|
||||
vterm is better than ansi-term and shit, despite it's kinda slow,
|
||||
it's a price i'm willing to pay.
|
||||
vterm is better than ansi-term and shit, despite it's kinda slow,
|
||||
it's a price i'm willing to pay.
|
||||
|
||||
It should use your default shell by default.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
It should use your default shell by default.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(use-package "vterm"
|
||||
:ensure t
|
||||
:bind("C-x t" . vterm))
|
||||
#+END_SRC
|
||||
:bind("C-x C-t" . vterm))
|
||||
#+END_SRC
|
||||
** Theme
|
||||
#+begin_src emacs-lisp
|
||||
#+begin_src emacs-lisp
|
||||
(use-package base16-theme
|
||||
:ensure t
|
||||
:init(load-theme 'base16-harmonic-dark t))
|
||||
(set-face-attribute 'default nil :font "IBM Plex Mono 12")
|
||||
(set-frame-font "Inconsolata 14")
|
||||
#+end_src
|
||||
(set-frame-font "Source Code Pro 12")
|
||||
(set-cursor-color "purple")
|
||||
#+end_src
|
||||
** ctrlf
|
||||
So, you know, C-s in emacs sucks, so this is a repleacement for that.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
So, you know, C-s in emacs sucks, so this is a repleacement for that.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(use-package ctrlf
|
||||
:ensure t
|
||||
:defer 1
|
||||
:init
|
||||
(ctrlf-mode +1))
|
||||
#+END_SRC
|
||||
#+END_SRC
|
||||
** Company and Irony
|
||||
Some shit for autocompletion and that kind of shit.
|
||||
Some shit for autocompletion and that kind of shit.
|
||||
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(use-package company
|
||||
:defer 1
|
||||
:ensure t
|
||||
|
|
@ -247,12 +277,12 @@ Some shit for autocompletion and that kind of shit.
|
|||
(add-hook 'irony-mode-hook 'irony-cdb-autosetup-compile-options))
|
||||
(with-eval-after-load 'company
|
||||
(add-hook 'c-mode-hook 'company-mode))
|
||||
#+END_SRC
|
||||
#+END_SRC
|
||||
** Programming language things
|
||||
*** Lisp
|
||||
Parentheses highlight in lisp modes. So you can easily identify
|
||||
them.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
Parentheses highlight in lisp modes. So you can easily identify
|
||||
them.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(use-package rainbow-delimiters
|
||||
:ensure t
|
||||
:init
|
||||
|
|
@ -261,62 +291,41 @@ them.
|
|||
(add-hook 'scheme-mode-hook 'rainbow-delimiters-mode))
|
||||
|
||||
(setq lisp-indent-offset 5)
|
||||
#+END_SRC
|
||||
#+END_SRC
|
||||
*** Perl
|
||||
Cperl-mode is better than perl-mode. You can't change my mind.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
Cperl-mode is better than perl-mode. You can't change my mind.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(defalias 'perl-mode 'cperl-mode)
|
||||
(setq cperl-indent-level 5)
|
||||
#+END_SRC
|
||||
#+END_SRC
|
||||
*** C*
|
||||
This use c-eldoc mode so it prints the function's prototype in the
|
||||
minibuffer. Which is very useful since Irony works when it wants
|
||||
to.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
This use c-eldoc mode so it prints the function's prototype in the
|
||||
minibuffer. Which is very useful since Irony works when it wants
|
||||
to.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(use-package c-eldoc
|
||||
:ensure t
|
||||
:init
|
||||
(add-hook 'c-mode-hook 'c-turn-on-eldoc-mode))
|
||||
(setq c-default-style "k&r")
|
||||
(add-hook 'c-mode-hook '(lambda ()
|
||||
(lsp 1)
|
||||
(flycheck-select-checker 'c/c++-clang)))
|
||||
(setq c-mode-hook nil)
|
||||
#+END_SRC
|
||||
(add-hook 'c-mode-hook (lambda ()
|
||||
"" ""
|
||||
(lsp)
|
||||
(irony-mode -1)))
|
||||
#+END_SRC
|
||||
*** Raku
|
||||
Raku, the cornerstone of any well designed programming language.
|
||||
#+begin_src emacs-lisp
|
||||
Raku, the cornerstone of any well designed programming language.
|
||||
#+begin_src emacs-lisp
|
||||
(setq raku-indent-offset 5)
|
||||
(setq raku-exec-path "/home/qorg/rakudo-star-2021.04/bin/raku")
|
||||
#+end_src
|
||||
*** Web shit
|
||||
Web programming and its consequences have been a disaster for the
|
||||
human race, but it's a necessary evil these days. So here's a little
|
||||
configuration for web-mode. Which is an improved shit for editing html documents.
|
||||
#+begin_src emacs-lisp
|
||||
(use-package web-mode
|
||||
:ensure t
|
||||
:init
|
||||
(setq web-mode-markup-indent-offset 5)
|
||||
(setq web-mode-indent-style nil)
|
||||
(setq web-mode-css-indent-offset 5)
|
||||
(setq web-mode-code-indent-offset 5)
|
||||
(add-to-list 'web-mode-indentation-params '("lineup-args" . nil))
|
||||
(add-to-list 'web-mode-indentation-params '("lineup-calls" . nil))
|
||||
(add-to-list 'web-mode-indentation-params '("lineup-concats" . nil))
|
||||
(add-to-list 'web-mode-indentation-params '("lineup-ternary" . nil))
|
||||
(setq web-mode-enable-current-element-highlight t)
|
||||
(set-face-attribute 'web-mode-html-tag-face nil :foreground "Green3")
|
||||
(set-face-attribute 'web-mode-html-attr-value-face nil :foreground "Orange4")
|
||||
(set-face-attribute 'web-mode-html-attr-name-face nil :foreground "Yellow4"))
|
||||
#+end_src
|
||||
Now for indent shit, so it matches the tabsize
|
||||
#+begin_src emacs-lisp
|
||||
#+end_src
|
||||
*** Now for indent shit, so it matches the tabsize
|
||||
#+begin_src emacs-lisp
|
||||
(setq css-indent-offset 5)
|
||||
(setq sgml-basic-offset 5)
|
||||
#+end_src
|
||||
#+end_src
|
||||
*** org
|
||||
#+begin_src emacs-lisp
|
||||
#+begin_src emacs-lisp
|
||||
(setq org-ellipsis " ")
|
||||
(setq org-src-fontify-natively t)
|
||||
(setq org-src-tab-acts-natively t)
|
||||
|
|
@ -324,48 +333,39 @@ Now for indent shit, so it matches the tabsize
|
|||
(setq org-export-with-smart-quotes t)
|
||||
(setq org-src-window-setup 'current-window)
|
||||
(add-hook 'org-mode-hook 'org-indent-mode)
|
||||
(add-hook 'org-mode-hook 'no-lines)
|
||||
(add-hook 'org-mode-hook 'qorg/no-lines)
|
||||
;; Syntax highlighting in exports
|
||||
(use-package htmlize
|
||||
:ensure t)
|
||||
#+end_src
|
||||
#+end_src
|
||||
**** Org-agenda
|
||||
>Le attention deficit destroyer
|
||||
#+begin_src emacs-lisp
|
||||
>Le attention deficit destroyer
|
||||
#+begin_src emacs-lisp
|
||||
(setq org-agenda-files (quote ("~/Documentos/agenda.org")))
|
||||
#+end_src
|
||||
** Extra functions
|
||||
Here I put functions I won't bother to document because they're so
|
||||
simple.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(defun git-pushall ()
|
||||
(interactive)
|
||||
(shell-command "git pushall"))
|
||||
(defun no-lines()
|
||||
(display-line-numbers-mode -1))
|
||||
(defun kill-inner-word ()
|
||||
(interactive)
|
||||
(forward-char 1)
|
||||
(backward-word)
|
||||
(kill-word 1))
|
||||
#+end_src
|
||||
** Keybindings
|
||||
Here I put functions I won't bother to document because they're so
|
||||
simple.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(global-set-key (kbd "M-d") 'kill-inner-word)
|
||||
(global-set-key (kbd "M-.") 'repeat)
|
||||
(global-set-key (kbd "C-x k") 'kill-buffer)
|
||||
(global-set-key (kbd "C-x C-k") 'kill-current-buffer)
|
||||
(global-set-key (kbd "C-k") 'kill-line)
|
||||
#+END_SRC
|
||||
(global-unset-key (kbd "C-x C-b"))
|
||||
(global-set-key (kbd "C-x C-b") 'qorg/goto-previous-buffer)
|
||||
#+END_SRC
|
||||
** Hunspell
|
||||
For some reason, there is no ispell spanish in void linux. so i had
|
||||
to fallback to hunspell. which does the same.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
For some reason, there is no ispell spanish in void linux. so i had
|
||||
to fallback to hunspell. which does the same.
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(defvar ispell-program-name "hunspell") ;; Or whatever you use
|
||||
;; (ispell, aspell...)
|
||||
|
||||
#+END_SRC
|
||||
#+END_SRC
|
||||
** Dired
|
||||
Ahhh, the emacs file browser, better than ranger and others...
|
||||
Hide dotfiles:
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
Ahhh, the emacs file browser, better than ranger and others...
|
||||
Hide dotfiles:
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
|
||||
(use-package dired-hide-dotfiles
|
||||
:ensure t
|
||||
|
|
@ -385,39 +385,39 @@ Hide dotfiles:
|
|||
(add-hook 'dired-mode-hook
|
||||
(lambda ()
|
||||
(dired-hide-details-mode)))
|
||||
#+END_SRC
|
||||
Now let's make the thing lysergic
|
||||
#+begin_src emacs-lisp
|
||||
#+END_SRC
|
||||
Now let's make the thing lysergic
|
||||
#+begin_src emacs-lisp
|
||||
(set-face-foreground dired-directory-face "orange")
|
||||
(set-face-foreground dired-symlink-face "cyan")
|
||||
(set-face-foreground dired-mark-face "green")
|
||||
(set-face-foreground dired-marked-face "blue")
|
||||
#+end_src
|
||||
#+end_src
|
||||
** kill ring popup
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(use-package popup-kill-ring
|
||||
:ensure t
|
||||
:bind ("M-y" . popup-kill-ring))
|
||||
|
||||
#+END_SRC
|
||||
#+END_SRC
|
||||
|
||||
** scrolling
|
||||
Scroll by lines rather than by pages.
|
||||
#+begin_src emacs-lisp
|
||||
Scroll by lines rather than by pages.
|
||||
#+begin_src emacs-lisp
|
||||
(setq scroll-step 1)
|
||||
(setq scroll-conservatively 10000)
|
||||
(setq auto-window-vscroll nil)
|
||||
(scroll-bar-mode 1)
|
||||
#+end_src
|
||||
#+end_src
|
||||
** Sidebar
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(use-package dired-sidebar
|
||||
:ensure t
|
||||
:commands (dired-sidebar-toggle-sidebar))
|
||||
(global-set-key (kbd "<f7>") 'dired-sidebar-toggle-sidebar)
|
||||
#+END_SRC
|
||||
#+END_SRC
|
||||
** Shell
|
||||
#+begin_src emacs-lisp
|
||||
#+begin_src emacs-lisp
|
||||
(add-hook 'shell-mode-hook 'yas-minor-mode)
|
||||
(add-hook 'shell-mode-hook 'flycheck-mode)
|
||||
(add-hook 'shell-mode-hook 'company-mode)
|
||||
|
|
@ -433,149 +433,266 @@ Scroll by lines rather than by pages.
|
|||
:config
|
||||
(require 'company)
|
||||
(add-hook 'shell-mode-hook 'shell-mode-company-init))
|
||||
#+end_src
|
||||
#+end_src
|
||||
|
||||
** Mark multiple
|
||||
Multiple cursors :DD
|
||||
#+begin_src emacs-lisp
|
||||
Multiple cursors :DD
|
||||
#+begin_src emacs-lisp
|
||||
(use-package "multiple-cursors"
|
||||
:ensure t
|
||||
:bind ("C-c q" . 'mc/mark-next-like-this))
|
||||
|
||||
#+end_src
|
||||
#+end_src
|
||||
|
||||
** Highlight indent guides
|
||||
I don't really know, it looks cool.
|
||||
#+begin_src emacs-lisp
|
||||
I don't really know, it looks cool.
|
||||
#+begin_src emacs-lisp
|
||||
(use-package "highlight-indent-guides"
|
||||
:ensure t
|
||||
:defer
|
||||
:init (add-hook 'prog-mode-hook 'highlight-indent-guides-mode)
|
||||
(setq highlight-indent-guides-method 'bitmap))
|
||||
#+end_src
|
||||
#+end_src
|
||||
** Ace jump mode
|
||||
So you can jump to characters fast af
|
||||
#+begin_src emacs-lisp
|
||||
So you can jump to characters fast af
|
||||
#+begin_src emacs-lisp
|
||||
(use-package "ace-jump-mode"
|
||||
:ensure t
|
||||
:bind("C-l" . 'ace-jump-mode))
|
||||
#+end_src
|
||||
And same but jumping between frames
|
||||
#+begin_src emacs-lisp
|
||||
#+end_src
|
||||
And same but jumping between frames
|
||||
#+begin_src emacs-lisp
|
||||
(use-package "ace-window"
|
||||
:ensure t
|
||||
:bind("M-l" . 'ace-window)
|
||||
:bind("M-o" . 'ace-delete-window))
|
||||
;; Gotta remove the bad habits
|
||||
(global-unset-key (kbd "C-x o"))
|
||||
#+end_src
|
||||
#+end_src
|
||||
|
||||
** Expand region
|
||||
#+begin_src emacs-lisp
|
||||
#+begin_src emacs-lisp
|
||||
(use-package expand-region
|
||||
:ensure t
|
||||
:init(global-unset-key (kbd "C-q"))
|
||||
(global-set-key (kbd"C-q") 'er/expand-region))
|
||||
#+end_src
|
||||
#+end_src
|
||||
** Beacon mode
|
||||
#+begin_src emacs-lisp
|
||||
#+begin_src emacs-lisp
|
||||
(use-package "beacon"
|
||||
:ensure t
|
||||
:init(beacon-mode 1))
|
||||
#+end_src
|
||||
#+end_src
|
||||
** LSP
|
||||
Le language server
|
||||
#+begin_src emacs-lisp
|
||||
Le language server
|
||||
#+begin_src emacs-lisp
|
||||
(use-package "lsp-mode"
|
||||
:ensure t
|
||||
)
|
||||
(use-package "lsp-ui"
|
||||
:ensure t
|
||||
:init(add-hook 'lsp-mode-hook 'lsp-ui-mode))
|
||||
#+end_src
|
||||
#+end_src
|
||||
** Workspaces
|
||||
I'm a tilling window manager user, so i know what i'm talking about.
|
||||
#+begin_src emacs-lisp
|
||||
(use-package "workgroups"
|
||||
:ensure t
|
||||
:init(workgroups-mode))
|
||||
#+end_src
|
||||
I'm a tilling window manager user, so i know what i'm talking about.
|
||||
#+begin_src emacs-lisp
|
||||
; (use-package "workgroups"
|
||||
; :ensure t
|
||||
; :init(workgroups-mode 1))
|
||||
#+end_src
|
||||
** Buffers
|
||||
Well, you know sometimes you just want to change to the previous
|
||||
buffer and don't want a whole interface for just pressing enter.
|
||||
#+begin_src emacs-lisp
|
||||
Well, you know sometimes you just want to change to the previous
|
||||
buffer and don't want a whole interface for just pressing enter.
|
||||
#+begin_src emacs-lisp
|
||||
(defun switch-to-previous-buffer ()
|
||||
(interactive)
|
||||
(switch-to-buffer (other-buffer (current-buffer) 1)))
|
||||
|
||||
(global-set-key (kbd "C-x C-b") 'switch-to-previous-buffer)
|
||||
#+end_src
|
||||
#+end_src
|
||||
** Hooks
|
||||
I am tired of =M-x auto-fill-mode= in some modes
|
||||
#+begin_src emacs-lisp
|
||||
I am tired of =M-x auto-fill-mode= in some modes
|
||||
#+begin_src emacs-lisp
|
||||
(add-hook 'org-mode-hook 'auto-fill-mode)
|
||||
(add-hook 'text-mode-hook 'auto-fill-mode)
|
||||
(add-hook 'sgml-mode-hook 'auto-fill-mode)
|
||||
(add-hook 'sgml-mode-hook 'zencoding-mode)
|
||||
(add-hook 'Man-mode-hook 'no-lines)
|
||||
(add-hook 'speedbar-mode-hook 'no-lines)
|
||||
#+end_src
|
||||
#+end_src
|
||||
** Hungry delete
|
||||
Having to delete multiple whitespaces is one of the things I hate,
|
||||
thankfully there's this thing.
|
||||
#+begin_src emacs-lisp
|
||||
Having to delete multiple whitespaces is one of the things I hate,
|
||||
thankfully there's this thing.
|
||||
#+begin_src emacs-lisp
|
||||
(use-package "hungry-delete"
|
||||
:ensure t
|
||||
:init(global-hungry-delete-mode))
|
||||
#+end_src
|
||||
#+end_src
|
||||
** Yasnippet
|
||||
#+begin_src emacs-lisp
|
||||
#+begin_src emacs-lisp
|
||||
(use-package "yasnippet"
|
||||
:ensure t
|
||||
:config
|
||||
(use-package "yasnippet-snippets"
|
||||
:ensure t)
|
||||
:init(yas-global-mode)
|
||||
(yas-reload-all))
|
||||
#+end_src
|
||||
#+end_src
|
||||
** Org-mode customization
|
||||
#+begin_src emacs-lisp
|
||||
#+begin_src emacs-lisp
|
||||
(use-package "org-bullets"
|
||||
:ensure t
|
||||
:config
|
||||
(add-hook 'org-mode-hook 'org-bullets-mode))
|
||||
(local-unset-key (kbd"C-c C-q"))
|
||||
#+end_src
|
||||
#+end_src
|
||||
** diff-hl
|
||||
#+begin_src emacs-lisp
|
||||
#+begin_src emacs-lisp
|
||||
(use-package "diff-hl"
|
||||
:ensure t
|
||||
:config
|
||||
(global-diff-hl-mode)
|
||||
(add-hook 'magit-pre-refresh-hook 'diff-hl-magit-pre-refresh)
|
||||
(add-hook 'magit-post-refresh-hook 'diff-hl-magit-post-refresh))
|
||||
#+end_src
|
||||
#+end_src
|
||||
** zzz-to-char
|
||||
It's like ace-whatever but for zapping characters.
|
||||
=zap-to-char=
|
||||
#+begin_src emacs-lisp
|
||||
It's like ace-whatever but for zapping characters.
|
||||
=zap-to-char=
|
||||
#+begin_src emacs-lisp
|
||||
(use-package zzz-to-char
|
||||
:ensure t
|
||||
:bind("M-z" . 'zzz-up-to-char))
|
||||
#+end_src
|
||||
#+end_src
|
||||
** Helpful
|
||||
Better \*help\* buffer
|
||||
#+begin_src emacs-lisp
|
||||
Better \*help\* buffer
|
||||
#+begin_src emacs-lisp
|
||||
(use-package helpful
|
||||
:ensure t
|
||||
:bind ("C-h f". #'helpful-callable)
|
||||
:bind ("C-h v". #'helpful-variable)
|
||||
:bind ("C-h k". #'helpful-key))
|
||||
|
||||
#+end_src
|
||||
#+end_src
|
||||
** Treemacs
|
||||
Le ebin sidebar
|
||||
#+begin_src emacs-lisp
|
||||
(use-package treemacs
|
||||
:ensure t
|
||||
:defer t
|
||||
:init
|
||||
(with-eval-after-load 'winum
|
||||
(define-key winum-keymap (kbd "M-0") #'treemacs-select-window))
|
||||
:config
|
||||
(progn
|
||||
(setq treemacs-collapse-dirs (if treemacs-python-executable 3 0)
|
||||
treemacs-deferred-git-apply-delay 0.5
|
||||
treemacs-directory-name-transformer #'identity
|
||||
treemacs-display-in-side-window t
|
||||
treemacs-eldoc-display 'simple
|
||||
treemacs-file-event-delay 5000
|
||||
treemacs-file-extension-regex treemacs-last-period-regex-value
|
||||
treemacs-file-follow-delay 0.2
|
||||
treemacs-file-name-transformer #'identity
|
||||
treemacs-follow-after-init t
|
||||
treemacs-expand-after-init t
|
||||
treemacs-find-workspace-method 'find-for-file-or-pick-first
|
||||
treemacs-git-command-pipe ""
|
||||
treemacs-goto-tag-strategy 'refetch-index
|
||||
treemacs-indentation 2
|
||||
treemacs-indentation-string " "
|
||||
treemacs-is-never-other-window nil
|
||||
treemacs-max-git-entries 5000
|
||||
(use-package treemacs-evil
|
||||
:after (treemacs evil)
|
||||
:ensure t)
|
||||
|
||||
treemacs-missing-project-action 'ask
|
||||
treemacs-move-forward-on-expand nil
|
||||
treemacs-no-png-images nil
|
||||
treemacs-no-delete-other-windows t
|
||||
treemacs-project-follow-cleanup nil
|
||||
treemacs-persist-file (expand-file-name ".cache/treemacs-persist" user-emacs-directory)
|
||||
treemacs-position 'left
|
||||
treemacs-read-string-input 'from-child-frame
|
||||
treemacs-recenter-distance 0.1
|
||||
treemacs-recenter-after-file-follow nil
|
||||
treemacs-recenter-after-tag-follow nil
|
||||
treemacs-recenter-after-project-jump 'always
|
||||
treemacs-recenter-after-project-expand 'on-distance
|
||||
treemacs-litter-directories '("/node_modules" "/.venv" "/.cask")
|
||||
treemacs-show-cursor nil
|
||||
treemacs-show-hidden-files t
|
||||
treemacs-silent-filewatch nil
|
||||
treemacs-silent-refresh nil
|
||||
treemacs-sorting 'alphabetic-asc
|
||||
treemacs-select-when-already-in-treemacs 'move-back
|
||||
treemacs-space-between-root-nodes t
|
||||
treemacs-tag-follow-cleanup t
|
||||
treemacs-tag-follow-delay 1.5
|
||||
treemacs-text-scale nil
|
||||
treemacs-user-mode-line-format nil
|
||||
treemacs-user-header-line-format nil
|
||||
treemacs-wide-toggle-width 70
|
||||
treemacs-width 35
|
||||
treemacs-width-increment 1
|
||||
treemacs-width-is-initially-locked t
|
||||
treemacs-workspace-switch-cleanup nil)
|
||||
|
||||
;; The default width and height of the icons is 22 pixels. If you are
|
||||
;; using a Hi-DPI display, uncomment this to double the icon size.
|
||||
;;(treemacs-resize-icons 44)
|
||||
|
||||
(treemacs-follow-mode t)
|
||||
(treemacs-filewatch-mode t)
|
||||
(treemacs-fringe-indicator-mode 'always)
|
||||
|
||||
(pcase (cons (not (null (executable-find "git")))
|
||||
(not (null treemacs-python-executable)))
|
||||
(`(t . t)
|
||||
(treemacs-git-mode 'deferred))
|
||||
(`(t . _)
|
||||
(treemacs-git-mode 'simple)))
|
||||
|
||||
(treemacs-hide-gitignored-files-mode nil))
|
||||
:bind
|
||||
(:map global-map
|
||||
("M-0" . treemacs-select-window)
|
||||
("C-x t 1" . treemacs-delete-other-windows)
|
||||
("C-x t t" . treemacs)
|
||||
("C-x t d" . treemacs-select-directory)
|
||||
("C-x t B" . treemacs-bookmark)
|
||||
("C-x t C-t" . treemacs-find-file)
|
||||
("C-x t M-t" . treemacs-find-tag)))
|
||||
|
||||
(use-package treemacs-projectile
|
||||
:after (treemacs projectile)
|
||||
:ensure t)
|
||||
|
||||
(use-package treemacs-icons-dired
|
||||
:hook (dired-mode . treemacs-icons-dired-enable-once)
|
||||
:ensure t)
|
||||
|
||||
(use-package treemacs-magit
|
||||
:after (treemacs magit)
|
||||
:ensure t)
|
||||
|
||||
(use-package treemacs-tab-bar ;;treemacs-tab-bar if you use tab-bar-mode
|
||||
:after (treemacs)
|
||||
:ensure t
|
||||
:config (treemacs-set-scope-type 'Tabs))
|
||||
|
||||
#+end_src
|
||||
** Projectile
|
||||
#+begin_src emacs-lisp
|
||||
(use-package projectile
|
||||
:ensure t
|
||||
:init(projectile-mode))
|
||||
|
||||
#+end_src
|
||||
|
||||
* Helm
|
||||
fuck Ido lol
|
||||
#+begin_src emacs-lisp
|
||||
fuck Ido lol
|
||||
#+begin_src emacs-lisp
|
||||
(use-package helm
|
||||
:ensure t
|
||||
:bind
|
||||
|
|
@ -602,11 +719,11 @@ fuck Ido lol
|
|||
(helm-autoresize-mode 1)
|
||||
(define-key helm-find-files-map (kbd "C-b") 'helm-find-files-up-one-level)
|
||||
(define-key helm-find-files-map (kbd "C-f") 'helm-execute-persistent-action)
|
||||
#+end_src
|
||||
#+end_src
|
||||
|
||||
* CRUX
|
||||
This thing add sane shortcuts for emacs
|
||||
#+begin_src emacs-lisp
|
||||
This thing add sane shortcuts for emacs
|
||||
#+begin_src emacs-lisp
|
||||
(use-package "crux"
|
||||
:ensure t
|
||||
:bind("C-k" . 'crux-smart-kill-line)
|
||||
|
|
@ -616,25 +733,19 @@ This thing add sane shortcuts for emacs
|
|||
:bind("C-x C-d" . 'crux-duplicate-current-line-or-region)
|
||||
:bind("C-c u" . 'crux-view-url)
|
||||
:bind("C-c s" . 'crux-create-scratch-buffer))
|
||||
#+end_src
|
||||
#+end_src
|
||||
* Dashboard
|
||||
The dashboard is a good index for your things. So it's useful to have
|
||||
it
|
||||
The dashboard is a good index for your things. So it's useful to have
|
||||
it
|
||||
|
||||
Here is an useful function I wrote so you can go to the dashboard (Or
|
||||
create it in case you accidentally killed the buffer)
|
||||
Here is an useful function I wrote so you can go to the dashboard (Or
|
||||
create it in case you accidentally killed the buffer)
|
||||
|
||||
#+begin_src emacs-lisp
|
||||
(defun goto-dashboard ()
|
||||
(interactive)
|
||||
(switch-to-buffer "*dashboard*")
|
||||
;; In case it doesn't exist.
|
||||
(dashboard-mode))
|
||||
#+begin_src emacs-lisp
|
||||
(global-set-key (kbd "C-c C-d") 'qorg/goto-dashboard)
|
||||
#+end_src
|
||||
|
||||
(global-set-key (kbd "C-c C-d") 'goto-dashboard)
|
||||
#+end_src
|
||||
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(use-package dashboard
|
||||
:ensure t
|
||||
:init
|
||||
|
|
@ -648,10 +759,10 @@ create it in case you accidentally killed the buffer)
|
|||
(setq dashboard-startup-banner "~/.emacs.d/img/banner.png")
|
||||
(setq dashboard-set-heading-icons t)
|
||||
(setq dashboard-set-file-icons t))
|
||||
#+END_SRC
|
||||
#+END_SRC
|
||||
|
||||
* Modeline
|
||||
#+begin_src emacs-lisp
|
||||
#+begin_src emacs-lisp
|
||||
(use-package "doom-modeline"
|
||||
:ensure t
|
||||
:config
|
||||
|
|
@ -659,7 +770,7 @@ create it in case you accidentally killed the buffer)
|
|||
(setq doom-modeline-indent-info t)
|
||||
(setq doom-modeline-buffer-encoding t)
|
||||
:init (doom-modeline-mode 1))
|
||||
#+end_src
|
||||
#+end_src
|
||||
|
||||
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue