Update init.el

This commit is contained in:
Mid Favila 2022-03-05 00:35:01 -04:00
parent 4a6936a2ed
commit 5b5da17503
1 changed files with 51 additions and 30 deletions

View File

@ -18,10 +18,19 @@
;; Investigate buffer-manage, comment-tags, company, guru-mode, ivy.
;; Integrate GDB?
(if (fboundp `use-package)
()
(package-install `use-package))
(setq package-native-compile t)
(require 'package)
(add-to-list 'package-archives
`("melpa-unstable" . "https://melpa.org/packages/"))
;; Make startup faster by reducing the frequency of garbage
;; collection. The default is 800 kilobytes. Measured in bytes.
(setq gc-cons-threshold (* 1000 1000 1000))
(setq gc-cons-threshold (* 1000 1000 1000))
;;;; Index:
@ -43,23 +52,28 @@
;; Subsection 1.1
(use-package eww
:defer t
:config
(progn
(define-key eww-mode-map (kbd "C-c f") 'ace-link)
(setq
browse-url-browser-function 'eww-browse-url
shr-use-fonts nil
shr-use-colors nil
shr-indentation 2
eww-search-prefix "https://duckduckgo.com/lite")
(setq load-path
(flatten-list
(list load-path
(mapcar `directory-file-name `("/usr/share/emacs/site-lisp/quack.el")))))
;; Allow for multiple Wowsers.
(defun eww-hook () "Reconfigure eww buffers on the fly."
(progn (rename-buffer "eww" t)
(variable-pitch-mode)))
(add-hook 'eww-mode-hook 'eww-hook)))
(use-package eww
:defer t
:config
(progn
(define-key eww-mode-map (kbd "C-c f") 'ace-link)
(setq
browse-url-browser-function 'eww-browse-url
shr-use-fonts nil
shr-use-colors nil
shr-indentation 2
eww-search-prefix "https://duckduckgo.com/lite")
;; Allow for multiple Wowsers.
(defun eww-hook () "Reconfigure eww buffers on the fly."
(progn (rename-buffer "eww" t)
(variable-pitch-mode)))
(add-hook 'eww-mode-hook 'eww-hook)))
(use-package help-mode
:defer t
@ -102,7 +116,7 @@
(add-hook 'server-after-make-frame-hook '(lambda () (load-theme 'modus-operandi t))) ;This is a workaround for Solaire Mode.
(add-hook 'server-after-make-frame-hook `(lambda () (load-theme 'modus-operandi t))) ;This is a workaround for Solaire Mode.
;; Fonts and faces.
@ -227,8 +241,9 @@
:config
(progn
(golden-ratio-mode 1)
;; Interop with ace-window.
(add-to-list 'golden-ratio-extra-commands 'ace-window)))
;; Interop with other libraries.
(setq golden-ratio-extra-commands
(flatten-list (list 'golden-ratio-extra-commands '(ace-window ace-jump-move))))))
;; Dim inactive buffers.
@ -310,11 +325,16 @@
:config
(global-set-key (kbd "M-o") 'ace-window))
(use-package avy
;; (use-package avy
;; :ensure t
;; :demand
;; :config
;; (global-set-key (kbd "C-c SPC") 'avy-jump-char))
(use-package ace-jump-mode
:ensure t
:demand
:config
(global-set-key (kbd "C-c SPC") 'avy-jump-char))
(global-set-key (kbd "C-c SPC") 'ace-jump-char-mode))
(use-package ace-link
:defer t
@ -327,13 +347,6 @@
:ensure t
:defer t)
;; Make sure Emacs auto-compiles ELisp.
(use-package auto-compile
:ensure t
:defer t
:config
(auto-compile-on-save-mode t))
;; Add SLY, a Lisp REPL.
(use-package sly
:ensure t
@ -527,7 +540,15 @@
'("2f93ebb862a9d50fee9c1b3302d858e2d2c0bba9d4e1be9bb3b08b7373f1710c" default))
'(helm-completion-style 'helm)
'(package-selected-packages
'(ctxmenu aggressive-indent-mode xpm ws-butler web-completion-data use-package srfi solarized-theme solaire-mode smooth-scroll sly rainbow-mode rainbow-blocks powerline popwin paren-face parchment-theme names helm-slime helm-mode-manager helm-flycheck helm-eww good-scroll goggles gnuplot focus flyspell-correct-helm flymake-haskell-multi flymake flycheck-haskell flycheck-aspell eww-lnum electric-operator dimmer context-coloring clean-buffers auto-compile aggressive-indent ace-window ace-link ace-jump-mode ac-slime ac-html ac-haskell-process ac-etags)))
'(dimmer god-mode paredit geiser-mit ctxmenu aggressive-indent-mode xpm ws-butler web-completion-data use-package srfi solarized-theme solaire-mode sly rainbow-mode rainbow-blocks powerline popwin paren-face parchment-theme names helm-slime helm-mode-manager helm-flycheck helm-eww good-scroll goggles gnuplot focus flyspell-correct-helm flymake-haskell-multi flymake flycheck-haskell flycheck-aspell eww-lnum electric-operator context-coloring clean-buffers aggressive-indent ace-window ace-link ace-jump-mode ac-slime ac-html ac-haskell-process ac-etags))
'(quack-default-program "scheme")
'(quack-newline-behavior 'newline)
'(quack-programs
'("s9" "bigloo" "csi" "csi -hygienic" "gosh" "gracket" "gsi" "gsi ~~/syntax-case.scm -" "guile" "kawa" "mit-scheme" "racket" "racket -il typed/racket" "rs" "scheme" "scheme48" "scsh" "sisc" "stklos" "sxi"))
'(quack-run-scheme-always-prompts-p nil)
'(quack-smart-open-paren-p nil)
'(warning-suppress-log-types '((use-package) (comp)))
'(warning-suppress-types '((emacs) (comp))))
(custom-set-faces
;; custom-set-faces was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.