emacs.d/bundle/bundle--defaults.el
2020-12-01 17:32:43 +01:00

87 lines
2.6 KiB
EmacsLisp

;; General userinterface and appearance
(tool-bar-mode -1)
(menu-bar-mode -1)
(scroll-bar-mode -1)
(horizontal-scroll-bar-mode -1)
(global-hl-line-mode 1)
(define-key menu-bar-tools-menu [games] nil)
(setq-default display-time-format "%V %F %R %a")
(setq-default display-time-24hr-format t)
(display-time-mode 1)
(global-prettify-symbols-mode 1)
(when (eq emacs-major-version 27)
(when (display-graphic-p)
(tab-bar-mode 1)))
;; Cursor and mouse
(column-number-mode 1)
(mouse-wheel-mode 1)
(blink-cursor-mode -1)
;; Customization for locale, environment and computer
(setq-default european-calendar-style t)
(setq-default calendar-christian-all-holidays-flag t)
(setq-default calendar-date-style (quote iso))
(setq-default calendar-view-diary-initially-flag t)
(setq-default calendar-week-start-day 1)
(setq-default calendar-intermonth-text
'(propertize
(format "%2d"
(car
(calendar-iso-from-absolute
(calendar-absolute-from-gregorian
(list month day year )))))
'font-lock-face 'font-lock-function-name-face))
(setq-default ispell-program-name "aspell")
(setq-default grep-command "grep -i -nH -e ")
(when (eq system-type 'gnu/linux)
(setq-default shell-file-name "/bin/bash")
(setq-default tex-shell-file-name "/bin/bash"))
;; Files and sessions
(setq-default auto-save-timeout 60)
;; Tabs, spaces, lines and parenthesis
(show-paren-mode 1)
(setq-default indent-tabs-mode nil)
(setq-default line-spacing nil)
(setq-default make-backup-files nil)
(setq-default browse-url-browser-function (quote eww-browse-url))
(setq tab-width 4)
(setq sentence-end-double-space nil)
(setq next-line-add-newlines t)
(setq require-final-newline t)
;; Miscellaneous
(require 'cl-lib)
(setq default-major-mode 'text-mode)
(setq-default inhibit-startup-buffer-menu t
inhibit-startup-screen t)
(setq-default shr-cookie-policy nil)
(setq-default tramp-default-method "ssh")
(put 'narrow-to-region 'disabled nil)
(put 'narrow-to-page 'disabled nil)
(add-hook 'text-mode-hook 'turn-on-auto-fill)
(defalias 'yes-or-no-p 'y-or-n-p)
;; Windows, Frames
(setq default-frame-alist
'((font . "Fira Code-11")
(alpha . 100)
(undecorated . t)
(width . 85)
(height . 70)
(fullscreen . fullscreen)))
;; Mode line
(setq-default mode-line-format
'((""
mode-line-frame-control "%b "
mode-name
vc-mode
" "
mode-line-position
mode-line-misc-info
)))