sravan/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Remove Org Mode Code Blocks Leading Whitespace

Browse Source 
- Remove leading whitespace in README.org code blocks
- Set org mode code block leading indentation to 0
This commit is contained in:
Sravan Balaji
2021-09-11 09:57:18 -04:00
parent 251ff3aeb8
commit 7576c9079b
2 changed files with 501 additions and 499 deletions
Download Patch File Download Diff File Expand all files Collapse all files

311
README.org
View File

@@ -11,21 +11,21 @@ Run the block below with =C-c C-c= to tangle code blocks to config file.
*NOT IN USE* *NOT IN USE*
#+begin_src emacs-lisp :tangle no #+begin_src emacs-lisp :tangle no
(org-mode-restart) (org-mode-restart)
(org-babel-tangle) (org-babel-tangle)
#+end_src #+end_src
** Configuration Variables ** Configuration Variables
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
;; Font Sizes ;; Font Sizes
(defvar sb/default-font-size 110) (defvar sb/default-font-size 110)
(defvar sb/default-variable-font-size 110) (defvar sb/default-variable-font-size 110)
(defvar sb/modeline-height 10) (defvar sb/modeline-height 10)
;; Font Names ;; Font Names
(defvar sb/source-code-font "FiraCode Nerd Font") (defvar sb/source-code-font "FiraCode Nerd Font")
(defvar sb/document-font "Cantarell") (defvar sb/document-font "Cantarell")
#+end_src #+end_src
* Package System Setup * Package System Setup
@@ -33,37 +33,37 @@ Run the block below with =C-c C-c= to tangle code blocks to config file.
** Package Sources and Initialization ** Package Sources and Initialization
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
;; Initialize package sources ;; Initialize package sources
(require 'package) (require 'package)
(setq package-archives '( (setq package-archives '(
("melpa" . "https://melpa.org/packages/") ("melpa" . "https://melpa.org/packages/")
("gnu-elpa" . "https://elpa.gnu.org/packages/") ("gnu-elpa" . "https://elpa.gnu.org/packages/")
("nongnu-elpa" . "https://elpa.nongnu.org/nongnu/") ("nongnu-elpa" . "https://elpa.nongnu.org/nongnu/")
) )
) )
(package-initialize) (package-initialize)
(unless package-archive-contents (unless package-archive-contents
(package-refresh-contents) (package-refresh-contents)
) )
;; Initialize use-package on non-Linux platforms ;; Initialize use-package on non-Linux platforms
(unless (package-installed-p 'use-package) (unless (package-installed-p 'use-package)
(package-install 'use-package) (package-install 'use-package)
) )
(require 'use-package) (require 'use-package)
(setq use-package-always-ensure t) (setq use-package-always-ensure t)
#+end_src #+end_src
** Auto Update Packages ** Auto Update Packages
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
(use-package auto-package-update (use-package auto-package-update
:init :init
(auto-package-update-maybe) (auto-package-update-maybe)
) )
#+end_src #+end_src
* Basic UI Configuration * Basic UI Configuration
@@ -74,27 +74,27 @@ Disable some visual elements that are not necessary like startup message, scroll
Turn on the visual bell and add some breathing room. Turn on the visual bell and add some breathing room.
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
(setq inhibit-startup-message t) ; Disable startup message (setq inhibit-startup-message t) ; Disable startup message
(scroll-bar-mode -1) ; Disable visible scrollbar (scroll-bar-mode -1) ; Disable visible scrollbar
(tool-bar-mode -1) ; Disable the toolbar (tool-bar-mode -1) ; Disable the toolbar
(tooltip-mode -1) ; Disable tooltips (tooltip-mode -1) ; Disable tooltips
(set-fringe-mode 10) ; Give some breathing room (set-fringe-mode 10) ; Give some breathing room
(menu-bar-mode -1) ; Disable the menu bar (menu-bar-mode -1) ; Disable the menu bar
(setq visible-bell t) ; Set up the visible bell (setq visible-bell t) ; Set up the visible bell
#+end_src #+end_src
** Line Numbers ** Line Numbers
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
;; Line Numbers ;; Line Numbers
(column-number-mode) (column-number-mode)
(global-display-line-numbers-mode t) (global-display-line-numbers-mode t)
;; Disable line numbers for some modes ;; Disable line numbers for some modes
(dolist (mode '( (dolist (mode '(
org-mode-hook org-mode-hook
term-mode-hook term-mode-hook
shell-mode-hook shell-mode-hook
@@ -102,7 +102,7 @@ Turn on the visual bell and add some breathing room.
) )
) )
(add-hook mode (lambda () (display-line-numbers-mode 0))) (add-hook mode (lambda () (display-line-numbers-mode 0)))
) )
#+end_src #+end_src
** Font Configuration ** Font Configuration
@@ -110,14 +110,14 @@ Turn on the visual bell and add some breathing room.
Setup FiraCode and Cantarell fonts with specified size. Setup FiraCode and Cantarell fonts with specified size.
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
;; Set the default font ;; Set the default font
(set-face-attribute 'default nil :font sb/source-code-font :height sb/default-font-size) (set-face-attribute 'default nil :font sb/source-code-font :height sb/default-font-size)
;; Set the fixed pitch font ;; Set the fixed pitch font
(set-face-attribute 'fixed-pitch nil :font sb/source-code-font :height sb/default-font-size) (set-face-attribute 'fixed-pitch nil :font sb/source-code-font :height sb/default-font-size)
;; Set the variable pitch font ;; Set the variable pitch font
(set-face-attribute 'variable-pitch nil :font sb/document-font :height sb/default-font-size :weight 'regular) (set-face-attribute 'variable-pitch nil :font sb/document-font :height sb/default-font-size :weight 'regular)
#+end_src #+end_src
** Ligature Support ** Ligature Support
@@ -129,7 +129,7 @@ Add ligature support using Fira Code symbols.
=M-x fira-code-mode-install-fonts RET= =M-x fira-code-mode-install-fonts RET=
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
(use-package fira-code-mode (use-package fira-code-mode
:custom :custom
;; List of ligatures to turn off ;; List of ligatures to turn off
(fira-code-mode-disabled-ligatures '( (fira-code-mode-disabled-ligatures '(
@@ -138,13 +138,13 @@ Add ligature support using Fira Code symbols.
) )
;; Enables fira-code-mode automatically for programming major modes ;; Enables fira-code-mode automatically for programming major modes
:hook prog-mode :hook prog-mode
) )
#+end_src #+end_src
** Tab Width ** Tab Width
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
(setq-default tab-width 4) (setq-default tab-width 4)
#+end_src #+end_src
* Keybindings * Keybindings
@@ -152,21 +152,21 @@ Add ligature support using Fira Code symbols.
** Custom Functions ** Custom Functions
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
(defun reload-config () (defun reload-config ()
(interactive) (interactive)
(load-file user-init-file) (load-file user-init-file)
(revert-buffer t t) (revert-buffer t t)
) )
#+end_src #+end_src
** General ** General
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
;; Make ESC quit prompts ;; Make ESC quit prompts
(global-set-key (kbd "<escape>") 'keyboard-escape-quit) (global-set-key (kbd "<escape>") 'keyboard-escape-quit)
;; General (for easy keybindings) ;; General (for easy keybindings)
(use-package general (use-package general
:config :config
(general-create-definer sb/leader-keys (general-create-definer sb/leader-keys
:keymaps '(normal insert visual emacs) :keymaps '(normal insert visual emacs)
@@ -185,18 +185,18 @@ Add ligature support using Fira Code symbols.
"ss" '(hydra-text-scale/body :which-key "scale text") "ss" '(hydra-text-scale/body :which-key "scale text")
"st" '(counsel-load-theme :which-key "choose theme") "st" '(counsel-load-theme :which-key "choose theme")
) )
) )
(general-define-key (general-define-key
"C-M-j" 'counsel-switch-buffer "C-M-j" 'counsel-switch-buffer
) )
#+end_src #+end_src
** Evil Keybindings ** Evil Keybindings
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
;; Evil Keybindings ;; Evil Keybindings
(use-package evil (use-package evil
:init :init
(setq evil-want-integration t) (setq evil-want-integration t)
(setq evil-want-keybinding nil) (setq evil-want-keybinding nil)
@@ -213,19 +213,19 @@ Add ligature support using Fira Code symbols.
(evil-set-initial-state 'messages-buffer-mode 'normal) (evil-set-initial-state 'messages-buffer-mode 'normal)
(evil-set-initial-state 'dashboard-mode 'normal) (evil-set-initial-state 'dashboard-mode 'normal)
) )
(use-package evil-collection (use-package evil-collection
:after evil :after evil
:config :config
(evil-collection-init) (evil-collection-init)
) )
;; Easymotion ;; Easymotion
(use-package evil-easymotion (use-package evil-easymotion
:config :config
(evilem-default-keybindings "SPC") (evilem-default-keybindings "SPC")
) )
#+end_src #+end_src
* UI Configuration * UI Configuration
@@ -233,31 +233,31 @@ Add ligature support using Fira Code symbols.
** Color Theme ** Color Theme
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
;; Dracula Doom Theme ;; Dracula Doom Theme
(use-package doom-themes (use-package doom-themes
:init (load-theme 'doom-dracula t) :init (load-theme 'doom-dracula t)
) )
;; ;; Dracula Pro Theme ;; ;; Dracula Pro Theme
;; (add-to-list 'custom-theme-load-path "~/.config/emacs/themes") ;; (add-to-list 'custom-theme-load-path "~/.config/emacs/themes")
;; (load-theme 'dracula-pro t) ;; (load-theme 'dracula-pro t)
#+end_src #+end_src
** Better Modeline ** Better Modeline
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
;; Doom Modeline ;; Doom Modeline
(use-package doom-modeline (use-package doom-modeline
:ensure t :ensure t
:init (doom-modeline-mode 1) :init (doom-modeline-mode 1)
:custom ((doom-modeline-height sb/modeline-height)) :custom ((doom-modeline-height sb/modeline-height))
) )
#+end_src #+end_src
** Dashboard ** Dashboard
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
;; Emacs Dashboard ;; Emacs Dashboard
(use-package dashboard (use-package dashboard
:ensure t :ensure t
:config :config
(dashboard-setup-startup-hook) (dashboard-setup-startup-hook)
@@ -278,18 +278,18 @@ Add ligature support using Fira Code symbols.
(setq dashboard-set-init-info t) (setq dashboard-set-init-info t)
;; Use with counsel-projectile ;; Use with counsel-projectile
(setq dashboard-projects-switch-function 'counsel-projectile-switch-project-by-name) (setq dashboard-projects-switch-function 'counsel-projectile-switch-project-by-name)
) )
#+end_src #+end_src
** Which Key ** Which Key
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
(use-package which-key (use-package which-key
:init (which-key-mode) :init (which-key-mode)
:diminish which-key-mode :diminish which-key-mode
:config :config
(setq which-key-idle-delay 1) (setq which-key-idle-delay 1)
) )
#+end_src #+end_src
** Ivy and Counsel ** Ivy and Counsel
@@ -299,8 +299,8 @@ Add ligature support using Fira Code symbols.
=M-x all-the-icons-install-fonts RET= =M-x all-the-icons-install-fonts RET=
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
;; Ivy Autocompletion ;; Ivy Autocompletion
(use-package ivy (use-package ivy
:diminish :diminish
:bind ( :bind (
("C-s" . swiper) ("C-s" . swiper)
@@ -319,36 +319,36 @@ Add ligature support using Fira Code symbols.
) )
:config :config
(ivy-mode 1) (ivy-mode 1)
) )
;; All the Icons Ivy Rich ;; All the Icons Ivy Rich
(use-package all-the-icons-ivy-rich (use-package all-the-icons-ivy-rich
:ensure t :ensure t
:after counsel-projectile :after counsel-projectile
:init (all-the-icons-ivy-rich-mode 1) :init (all-the-icons-ivy-rich-mode 1)
) )
;; Ivy Rich ;; Ivy Rich
(use-package ivy-rich (use-package ivy-rich
:ensure t :ensure t
:init (ivy-rich-mode 1) :init (ivy-rich-mode 1)
) )
;; Counsel ;; Counsel
(use-package counsel (use-package counsel
:bind (("C-M-j" . 'counsel-switch-buffer) :bind (("C-M-j" . 'counsel-switch-buffer)
:map minibuffer-local-map :map minibuffer-local-map
("C-r" . 'counsel-minibuffer-history)) ("C-r" . 'counsel-minibuffer-history))
:config :config
(counsel-mode 1) (counsel-mode 1)
) )
#+end_src #+end_src
** Helpful Help Commands ** Helpful Help Commands
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
;; Helpful ;; Helpful
(use-package helpful (use-package helpful
:custom :custom
(counsel-describe-function-function #'helpful-callable) (counsel-describe-function-function #'helpful-callable)
(counsel-describe-variable-function #'helpful-variable) (counsel-describe-variable-function #'helpful-variable)
@@ -357,7 +357,7 @@ Add ligature support using Fira Code symbols.
([remap describe-command] . helpful-command) ([remap describe-command] . helpful-command)
([remap describe-variable] . counsel-describe-variable) ([remap describe-variable] . counsel-describe-variable)
([remap describe-key] . helpful-key) ([remap describe-key] . helpful-key)
) )
#+end_src #+end_src
** Text Scaling ** Text Scaling
@@ -365,28 +365,28 @@ Add ligature support using Fira Code symbols.
Use Hydra to design a transient key binding for quickly adjusting the scale of the text on screen. Use Hydra to design a transient key binding for quickly adjusting the scale of the text on screen.
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
;; Hydra ;; Hydra
(use-package hydra) (use-package hydra)
(defhydra hydra-text-scale (:timeout 4) (defhydra hydra-text-scale (:timeout 4)
"scale text" "scale text"
("j" text-scale-increase "in") ("j" text-scale-increase "in")
("k" text-scale-decrease "out") ("k" text-scale-decrease "out")
("f" nil "finished" :exit t) ("f" nil "finished" :exit t)
) )
#+end_src #+end_src
** Highlight Indent Guides ** Highlight Indent Guides
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
(use-package highlight-indent-guides (use-package highlight-indent-guides
:hook (prog-mode . highlight-indent-guides-mode) :hook (prog-mode . highlight-indent-guides-mode)
:hook (text-mode . highlight-indent-guides-mode) :hook (text-mode . highlight-indent-guides-mode)
:init :init
(setq highlight-indent-guides-method 'fill) (setq highlight-indent-guides-method 'fill)
(setq highlight-indent-guides-responsive 'stack) (setq highlight-indent-guides-responsive 'stack)
(setq highlight-indent-guides-delay 0) (setq highlight-indent-guides-delay 0)
) )
#+end_src #+end_src
* Org Mode * Org Mode
@@ -394,7 +394,7 @@ Use Hydra to design a transient key binding for quickly adjusting the scale of t
** Better Font Faces ** Better Font Faces
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
(defun sb/org-font-setup () (defun sb/org-font-setup ()
;; ;; Replace list hyphen with dot ;; ;; Replace list hyphen with dot
;; (font-lock-add-keywords 'org-mode ;; (font-lock-add-keywords 'org-mode
;; '(("^ *\\([-]\\) " ;; '(("^ *\\([-]\\) "
@@ -420,21 +420,22 @@ Use Hydra to design a transient key binding for quickly adjusting the scale of t
(set-face-attribute 'org-special-keyword nil :inherit '(font-lock-comment-face fixed-pitch)) (set-face-attribute 'org-special-keyword nil :inherit '(font-lock-comment-face fixed-pitch))
(set-face-attribute 'org-meta-line nil :inherit '(font-lock-comment-face fixed-pitch)) (set-face-attribute 'org-meta-line nil :inherit '(font-lock-comment-face fixed-pitch))
(set-face-attribute 'org-checkbox nil :inherit 'fixed-pitch) (set-face-attribute 'org-checkbox nil :inherit 'fixed-pitch)
) )
#+end_src #+end_src
** Main Config ** Main Config
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
(defun sb/org-mode-setup () (defun sb/org-mode-setup ()
(org-indent-mode) (org-indent-mode)
(variable-pitch-mode 1) (variable-pitch-mode 1)
(auto-fill-mode 0) (auto-fill-mode 0)
(visual-line-mode 1) (visual-line-mode 1)
(setq evil-auto-indent nil) (setq evil-auto-indent nil)
) (setq org-edit-src-content-indentation 0)
)
(use-package org (use-package org
:hook (org-mode . sb/org-mode-setup) :hook (org-mode . sb/org-mode-setup)
:config :config
;; Change elipsis to down arrow ;; Change elipsis to down arrow
@@ -573,7 +574,7 @@ Use Hydra to design a transient key binding for quickly adjusting the scale of t
;; (lambda () (interactive) (org-capture nil "jj"))) ;; (lambda () (interactive) (org-capture nil "jj")))
(sb/org-font-setup) (sb/org-font-setup)
) )
#+end_src #+end_src
** Heading Bullets ** Heading Bullets
@@ -593,41 +594,41 @@ Use Hydra to design a transient key binding for quickly adjusting the scale of t
*NOT IN USE* *NOT IN USE*
#+begin_src emacs-lisp :tangle no #+begin_src emacs-lisp :tangle no
(defun sb/org-mode-visual-fill () (defun sb/org-mode-visual-fill ()
(setq visual-fill-column-width 100 (setq visual-fill-column-width 100
visual-fill-column-center-text t) visual-fill-column-center-text t)
(visual-fill-column-mode 1) (visual-fill-column-mode 1)
) )
(use-package visual-fill-column (use-package visual-fill-column
:hook (org-mode . sb/org-mode-visual-fill) :hook (org-mode . sb/org-mode-visual-fill)
) )
#+end_src #+end_src
** Configure Babel Languages ** Configure Babel Languages
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
(org-babel-do-load-languages (org-babel-do-load-languages
'org-babel-load-languages 'org-babel-load-languages
'((emacs-lisp . t) '((emacs-lisp . t)
(makefile . t) (makefile . t)
(python . t)) (python . t))
) )
(push '("conf-unix" . conf-unix) org-src-lang-modes) (push '("conf-unix" . conf-unix) org-src-lang-modes)
#+end_src #+end_src
** Structure Templates ** Structure Templates
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
;; This is needed as of Org 9.2 ;; This is needed as of Org 9.2
(require 'org-tempo) (require 'org-tempo)
(add-to-list 'org-structure-template-alist '("sh" . "src shell")) (add-to-list 'org-structure-template-alist '("sh" . "src shell"))
(add-to-list 'org-structure-template-alist '("el" . "src emacs-lisp")) (add-to-list 'org-structure-template-alist '("el" . "src emacs-lisp"))
(add-to-list 'org-structure-template-alist '("py" . "src python")) (add-to-list 'org-structure-template-alist '("py" . "src python"))
(add-to-list 'org-structure-template-alist '("hs" . "src haskell")) (add-to-list 'org-structure-template-alist '("hs" . "src haskell"))
(add-to-list 'org-structure-template-alist '("cf" . "src config")) (add-to-list 'org-structure-template-alist '("cf" . "src config"))
#+end_src #+end_src
** Auto-Tangle ** Auto-Tangle
@@ -636,10 +637,10 @@ Automatically tangle code blocks in file everytime it is saved.
Add =#+auto_tangle: t= to the org document to enable this. Add =#+auto_tangle: t= to the org document to enable this.
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
(use-package org-auto-tangle (use-package org-auto-tangle
:defer t :defer t
:hook (org-mode . org-auto-tangle-mode) :hook (org-mode . org-auto-tangle-mode)
) )
#+end_src #+end_src
* Development * Development
@@ -647,9 +648,9 @@ Add =#+auto_tangle: t= to the org document to enable this.
** Commenting ** Commenting
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
(use-package evil-nerd-commenter (use-package evil-nerd-commenter
:bind ("M-/" . evilnc-comment-or-uncomment-lines) :bind ("M-/" . evilnc-comment-or-uncomment-lines)
) )
#+end_src #+end_src
** Languages ** Languages
@@ -659,79 +660,79 @@ Add =#+auto_tangle: t= to the org document to enable this.
**** Fish Shell **** Fish Shell
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
(use-package fish-mode) (use-package fish-mode)
#+end_src #+end_src
**** Git Attributes **** Git Attributes
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
(use-package gitattributes-mode) (use-package gitattributes-mode)
#+end_src #+end_src
**** Git Config **** Git Config
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
(use-package gitconfig-mode) (use-package gitconfig-mode)
#+end_src #+end_src
**** Git Ignore **** Git Ignore
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
(use-package gitignore-mode) (use-package gitignore-mode)
#+end_src #+end_src
**** Haskell **** Haskell
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
(use-package haskell-mode) (use-package haskell-mode)
#+end_src #+end_src
**** Vimrc **** Vimrc
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
(use-package vimrc-mode) (use-package vimrc-mode)
#+end_src #+end_src
**** C / C++ **** C / C++
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
(use-package cc-mode) (use-package cc-mode)
#+end_src #+end_src
*** Language Servers *** Language Servers
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
(defun sb/lsp-mode-setup () (defun sb/lsp-mode-setup ()
(setq lsp-headerline-breadcrumb-segments '(path-up-to-project file symbols)) (setq lsp-headerline-breadcrumb-segments '(path-up-to-project file symbols))
(lsp-headerline-breadcrumb-mode) (lsp-headerline-breadcrumb-mode)
) )
(use-package lsp-mode (use-package lsp-mode
:commands (lsp lsp-deferred) :commands (lsp lsp-deferred)
:hook (lsp-mode . sb/lsp-mode-setup) :hook (lsp-mode . sb/lsp-mode-setup)
:init :init
(setq lsp-keymap-prefix "C-c l") ;; Or 'C-l', 's-l' (setq lsp-keymap-prefix "C-c l") ;; Or 'C-l', 's-l'
:config :config
(lsp-enable-which-key-integration t) (lsp-enable-which-key-integration t)
) )
(use-package lsp-ui (use-package lsp-ui
:hook (lsp-mode . lsp-ui-mode) :hook (lsp-mode . lsp-ui-mode)
:custom :custom
(lsp-ui-doc-position 'bottom) (lsp-ui-doc-position 'bottom)
) )
(use-package lsp-treemacs (use-package lsp-treemacs
:after lsp :after lsp
) )
(use-package lsp-ivy) (use-package lsp-ivy)
#+end_src #+end_src
*** Company Mode *** Company Mode
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
(use-package company (use-package company
:after lsp-mode :after lsp-mode
:hook (lsp-mode . company-mode) :hook (lsp-mode . company-mode)
:bind :bind
@@ -742,18 +743,18 @@ Add =#+auto_tangle: t= to the org document to enable this.
:custom :custom
(company-minimum-prefix-length 1) (company-minimum-prefix-length 1)
(company-idle-delay 0.0) (company-idle-delay 0.0)
) )
(use-package company-box (use-package company-box
:hook (company-mode . company-box-mode) :hook (company-mode . company-box-mode)
) )
#+end_src #+end_src
** Projectile ** Projectile
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
;; Projectile ;; Projectile
(use-package projectile (use-package projectile
:diminish projectile-mode :diminish projectile-mode
:config (projectile-mode) :config (projectile-mode)
:custom ((projectile-completion-system 'ivy)) :custom ((projectile-completion-system 'ivy))
@@ -762,11 +763,11 @@ Add =#+auto_tangle: t= to the org document to enable this.
:init :init
(setq projectile-project-search-path '("~/Projects/" "~/.config/" "~/.xmonad/")) (setq projectile-project-search-path '("~/Projects/" "~/.config/" "~/.xmonad/"))
(setq projectile-switch-project-action #'projectile-dired) (setq projectile-switch-project-action #'projectile-dired)
) )
(use-package counsel-projectile (use-package counsel-projectile
:config (counsel-projectile-mode) :config (counsel-projectile-mode)
) )
#+end_src #+end_src
** Magit ** Magit
@@ -784,22 +785,22 @@ Add =#+auto_tangle: t= to the org document to enable this.
*NOTE*: evil-magit was removed from MELPA and now a part of evil-collection *NOTE*: evil-magit was removed from MELPA and now a part of evil-collection
#+begin_src emacs-lisp :tangle no #+begin_src emacs-lisp :tangle no
(use-package evil-magit (use-package evil-magit
:after magit :after magit
) )
;; NOTE: Make sure to configure a GitHub token before using this package! ;; NOTE: Make sure to configure a GitHub token before using this package!
;; - https://magit.vc/manual/forge/Token-Creation.html#Token-Creation ;; - https://magit.vc/manual/forge/Token-Creation.html#Token-Creation
;; - https://magit.vc/manual/ghub/Getting-Started.html#Getting-Started ;; - https://magit.vc/manual/ghub/Getting-Started.html#Getting-Started
(use-package forge) (use-package forge)
#+end_src #+end_src
** Rainbow Delimeters ** Rainbow Delimeters
#+begin_src emacs-lisp :tangle init.el #+begin_src emacs-lisp :tangle init.el
;; Rainbow Delimiters ;; Rainbow Delimiters
(use-package rainbow-delimiters (use-package rainbow-delimiters
:hook (prog-mode . rainbow-delimiters-mode) :hook (prog-mode . rainbow-delimiters-mode)
) )
#+end_src #+end_src

1
init.el
View File

@@ -306,6 +306,7 @@
(auto-fill-mode 0) (auto-fill-mode 0)
(visual-line-mode 1) (visual-line-mode 1)
(setq evil-auto-indent nil) (setq evil-auto-indent nil)
(setq org-edit-src-content-indentation 0)
) )
(use-package org (use-package org