86 lines
2.2 KiB
EmacsLisp
86 lines
2.2 KiB
EmacsLisp
;; -*- lexical-binding: t -*-
|
|
|
|
;; Supress native-comp warnings
|
|
(when (featurep 'native-compile)
|
|
(setq native-comp-async-report-warnings-errors nil))
|
|
|
|
;; Load essentials.
|
|
(load "~/.emacs.d/essential.el")
|
|
|
|
;; Packages.
|
|
(load "~/.emacs.d/packages.el")
|
|
|
|
;; Correct bad defaults.
|
|
(load "~/.emacs.d/tweaks.el")
|
|
|
|
(setq fez/file-keys
|
|
'(("config" . "~/.emacs.d/init.el")
|
|
("agenda" . "~/doc/agenda.org")))
|
|
|
|
;; Additional functions, keybinds.
|
|
(load "~/.emacs.d/custom.el")
|
|
|
|
;; Start an emacs server from this session, if it isn't already running.
|
|
;; This is useful for stuff like Nyxt where we can launch and emacsclient to
|
|
;; evaluate forms.
|
|
;; (when (not (server-running-p))
|
|
;; (server-start))
|
|
|
|
;; Tab width.
|
|
(setq-default tab-width 4)
|
|
;; Use spaces by default.
|
|
(setq-default indent-tabs-mode nil)
|
|
|
|
;;; Appearance
|
|
;; The font is set in fontconfig. Usually it's UW Ttyp0 or Gohufont
|
|
(set-frame-font "monospace 11")
|
|
(setq default-frame-alist '((font . "monospace 11")))
|
|
|
|
;; Highlight matching parentheses.
|
|
(show-paren-mode t)
|
|
|
|
;; Mode line
|
|
(line-number-mode t)
|
|
(column-number-mode t)
|
|
(setq display-time-24hr-format t)
|
|
(display-time-mode t)
|
|
|
|
;; Electric pair mode
|
|
(setq electric-pair-pairs '((?\( . ?\))
|
|
(?\[ . ?\])
|
|
(?\{ . ?\})
|
|
(?\" . ?\")))
|
|
(electric-pair-mode t)
|
|
|
|
(setq-default rmail-display-summary t)
|
|
|
|
(setq
|
|
send-mail-function 'smtpmail-send-it
|
|
rmail-preserve-inbox 1
|
|
rmail-delete-after-output 1
|
|
rmail-mail-new-frame 1
|
|
rmail-mime-prefer-html nil
|
|
rmail-file-name "~/mail/inbox"
|
|
rmail-primary-inbox-list '("~/mail/inboxes/disroot")
|
|
rmail-default-file "~/mbox/archive"
|
|
rmail-secondary-file-directory "~/mail"
|
|
message-default-headers "Fcc: ~/mail/sent"
|
|
user-full-name "opfez"
|
|
user-mail-address "opfez@disroot.org"
|
|
message-signature "")
|
|
|
|
;; C configuration
|
|
(setq c-default-style "linux"
|
|
c-basic-offset 4)
|
|
|
|
;; Scheme configuration
|
|
;; (setq geiser-guile-binary "/usr/bin/guile")
|
|
;; for ncurses development, uncomment this:
|
|
;; (setq geiser-guile-binary "/usr/local/bin/guile-ncurses-shell")
|
|
|
|
(setq geiser-active-implementations '(chez))
|
|
(setq geiser-chez-binary "/usr/bin/scheme")
|
|
|
|
;; I use emacs as my window manager.
|
|
(exwm-config)
|