opfez
/
.emacs.d
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

alskdfja;lskdjf

This commit is contained in:
opFez 2021-05-04 14:42:01 +02:00
parent c8efc20173
commit c929ef8cd2
3 changed files with 17 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
functions.el
View File

@ -52,9 +52,7 @@
(global-set-key (kbd "C-x C-z") 'mark-line)
(global-unset-key (kbd "C-z")) ; disable suspend frame
(global-set-key (kbd "C-x C-x") 'other-window)
(global-set-key (kbd "C-x C-b") '(lambda () (interactive)
(bs-show nil)
(swiper)))
(global-set-key (kbd "C-x C-b") 'bs-show)
(defun toggle-indent ()
(interactive)
@ -80,7 +78,7 @@
(transient-mark-mode)
(save-excursion
(mark-defun)
(when (current-line-empty-p)
(while (current-line-empty-p)
(forward-char))
(let* ((start (region-beginning))
(end (region-end))

13
init.el
View File

@ -14,7 +14,6 @@
;;(add-hook 'scheme-mode-hook '(setq indent-tabs-mode nil))
(setq-default indent-tabs-mode nil)
;; Remove useless stuff
(menu-bar-mode 0)
(tool-bar-mode 0)
@ -24,7 +23,8 @@
(set-language-environment "UTF-8")
;; Appearance
(set-frame-font "Gohu Gohufont 11")
(set-frame-font "monospace 13")
(setq default-frame-alist '((font . "monospace 13")))
(set-face-italic 'font-lock-comment-face nil) ; disable italics
; theme set in packages.el
(add-to-list 'custom-theme-load-path "~/.emacs.d/themes/")
@ -90,7 +90,9 @@
c-basic-offset 4)
;; Scheme configuration
(setq geiser-active-implementations '(guile))
;; (setq geiser-active-implementations '(guile))
;; (setq geiser-active-implementations '(mit))
(setq geiser-active-implementations '(chez))
;; Disable bold fonts
(defun remap-faces-default-attributes ()
@ -109,6 +111,9 @@
(defalias 'open 'find-file-other-window)
(defalias 'clean 'eshell/clear-scrollback)
;; 80 character limit when writing text
(add-hook 'text-mode-hook 'turn-on-auto-fill)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(custom-set-variables
@ -123,7 +128,7 @@
'(org-babel-load-languages '((awk . t) (lisp . t) (emacs-lisp . t) (C . t)))
'(org-confirm-babel-evaluate nil)
'(package-selected-packages
'(basic-theme geiser-chicken geiser-guile disaster multiple-cursors nasm-mode carp-mode flycheck ido-mode move-text undo-tree sorcery-theme autothemer rust-mode paredit forth-mode avy swiper auto-package-update magit expand-region go-mode tao-themes tao-theme almost-mono-themes use-package))
'(frames-only-mode exwm geiser-mit basic-theme geiser-chicken geiser-guile disaster multiple-cursors nasm-mode carp-mode flycheck ido-mode move-text undo-tree sorcery-theme autothemer rust-mode paredit forth-mode avy swiper auto-package-update magit expand-region go-mode tao-themes tao-theme almost-mono-themes use-package))
'(pdf-view-midnight-colors '("#dddddd" . "#000000"))
'(show-paren-mode t)
'(tool-bar-mode nil))

6
packages.el
View File

@ -81,6 +81,12 @@
(use-package geiser-guile
:ensure t)
(use-package geiser-mit
:ensure t)
(use-package geiser-chez
:ensure t)
(use-package geiser-chicken
:ensure t
:config