Update init.el
This commit is contained in:
parent
4a6936a2ed
commit
5b5da17503
|
@ -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.
|
||||
|
|
Loading…
Reference in New Issue