summary refs log tree commit diff
path: root/emacs.d/modules/module-appareance.el
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--emacs.d/modules/module-appareance.el46
1 files changed, 46 insertions, 0 deletions
diff --git a/emacs.d/modules/module-appareance.el b/emacs.d/modules/module-appareance.el
new file mode 100644
index 0000000..53a34fd
--- /dev/null
+++ b/emacs.d/modules/module-appareance.el
@@ -0,0 +1,46 @@
+;; I don't want a startup screen
+(setq inhibit-startup-screen t)
+
+;; fullscreen
+(global-set-key (kbd "<s-return>") 'toggle-frame-fullscreen)
+
+;; disable tool bar and the scroll bar
+(dolist (mode '(tool-bar-mode scroll-bar-mode))
+  (when (fboundp mode) (funcall mode -1)))
+
+;; Set default font.
+(set-face-attribute 'default nil :height 130 :weight 'normal :width 'normal)
+
+;; no bell
+(setq visible-bell nil)
+(setq ring-bell-function 'ignore)
+
+;; don't use native full screen on OS-X
+(when (eq system-type 'darwin)
+  (setq ns-use-native-fullscreen nil))
+
+;; highlight current line
+(global-hl-line-mode 1)
+
+;; cursor is a horizontal bar
+(setq-default cursor-type 'hbar)
+
+;; no blinking cursor
+(blink-cursor-mode -1)
+
+;; I don't want a frindge on the right
+(fringe-mode '(6 . 0))
+
+;; frame title
+(setq frame-title-format '( "%f" " [" (:eval mode-name) "]"))
+
+;; show parenthesis
+(show-paren-mode +1)
+
+;; show column number in the mode line
+(setq column-number-mode t)
+
+;; unclutter the modeline
+(use-package diminish)
+
+(provide 'module-appareance)