-straight and ~formatting

This commit is contained in:
dx
2020-06-27 11:05:08 +01:00
parent cc732e8ee7
commit 5caab1de5d

View File

@@ -1,42 +1,42 @@
(setq user-emacs-directory (expand-file-name "~/.config/emacs/")) ;;; init.el -- My custom emacs config
(setq straight-use-package-by-default t) ;;; Commentary:
;;; Simple Emacs config that uses org-babel to execute org files which contain a literate config
;;; Code:
(defvar bootstrap-version) (require 'package)
(let ((bootstrap-file (add-to-list 'package-archives (cons "melpa" "https://melpa.org/packages/") t)
(expand-file-name "straight/repos/straight.el/bootstrap.el" user-emacs-directory)) (package-initialize)
(bootstrap-version 5)) (unless (fboundp 'use-package)
(unless (file-exists-p bootstrap-file) (package-install 'use-package))
(with-current-buffer
(url-retrieve-synchronously
"https://raw.githubusercontent.com/raxod502/straight.el/develop/install.el"
'silent 'inhibit-cookies)
(goto-char (point-max))
(eval-print-last-sexp)))
(load bootstrap-file nil 'nomessage))
(straight-use-package 'use-package) (setq user-emacs-directory (expand-file-name "~/.config/emacs/")
(setq ring-bell-function 'ignore) ring-bell-function 'ignore
inhibit-startup-screen t)
(tool-bar-mode -1) (tool-bar-mode -1)
(scroll-bar-mode -1) (scroll-bar-mode -1)
(tab-bar-mode -1) (tab-bar-mode -1)
(add-hook 'prog-mode-hook #'hs-minor-mode)
(load-theme 'tango-dark) (load-theme 'tango-dark)
(add-hook 'prog-mode-hook #'hs-minor-mode)
(use-package evil (use-package evil
:ensure t
:config :config
(evil-mode +1)) (evil-mode +1))
(use-package evil-surround (use-package evil-surround
:ensure t
:after (evil) :after (evil)
:config :config
(evil-surround-mode +1)) (evil-surround-mode +1))
(use-package which-key (use-package which-key
:ensure t
:config :config
(which-key-mode +1)) (which-key-mode +1))
(use-package general (use-package general
:ensure t
:config :config
(general-create-definer leader (general-create-definer leader
:prefix "SPC" :prefix "SPC"
@@ -81,6 +81,7 @@
:wk "Open init.el"))) :wk "Open init.el")))
(use-package counsel (use-package counsel
:ensure t
:general :general
(leader (leader
"SPC" #'counsel-M-x) "SPC" #'counsel-M-x)
@@ -89,19 +90,20 @@
"s" #'(swiper :wk "Search buffer") "s" #'(swiper :wk "Search buffer")
"r" #'(counsel-rg :wk "Ripgrep")) "r" #'(counsel-rg :wk "Ripgrep"))
(general-def (general-def
:keymaps 'ivy-mode-map :keymaps 'ivy-minibuffer-map
"C-j" #'ivy-next-line-or-history "C-j" #'ivy-next-line-or-history
"C-k" #'ivy-previous-line-or-history) "C-k" #'ivy-previous-line-or-history)
:init :init
(counsel-mode +1)) (counsel-mode +1))
(use-package org) (use-package org :ensure t)
(use-package magit) (use-package magit :ensure t)
(use-package evil-magit) (use-package evil-magit :ensure t)
(use-package telephone-line (use-package telephone-line
:ensure t
:hook (after-init . telephone-line-mode) :hook (after-init . telephone-line-mode)
:init :init
; Faces ; Faces