emacs.d/config/init-base.el

   1
   2
   3 (scroll-bar-mode -1)
   4 (tool-bar-mode -1)
   5 (menu-bar-mode -1)
   6 (add-to-list 'default-frame-alist '(width  . 120))
   7 (add-to-list 'default-frame-alist '(height . 40))
   8 (add-to-list 'default-frame-alist '(font . "Source Code Pro for Powerline-12:weight:light" ))
   9 ;(add-to-list 'default-frame-alist '(font . "Source Code Pro for Powerline-12" ))
  10
  11 (setq inhibit-startup-message t)
  12
  13 (put 'set-goal-column 'disabled nil)
  14 (setq vc-follow-symlinks t)
  15 (setq visible-bell 1)
  16 (setq ring-bell-function 'ignore)
  17 (setq resize-mini-windows t)
  18 (blink-cursor-mode 0)
  19
  20 ;(custom-set-variables
  21 ; '(fringe-mode (quote (0 . 0)) nil (fringe)))
  22
  23 (fringe-mode (quote (0 . 0)))
  24
  25 (add-to-list 'auto-mode-alist '("emacs\\'" . emacs-lisp-mode))
  26
  27
  28
  29 ;;; Set symbol for the border
  30 (set-display-table-slot standard-display-table
  31                         'vertical-border
  32                         (make-glyph-code ?┃))
  33
  34 (set-face-attribute 'vertical-border nil  :foreground "gray")
  35
  36 (defalias 'yes-or-no-p 'y-or-n-p)
  37
  38 (setq scroll-margin 5)
  39 (setq scroll-conservatively 10000)
  40 (show-paren-mode t)
  41
  42
  43 (add-hook 'help-mode-hook
  44           (lambda ()
  45             (linum-mode -1)))
  46
  47 ;; Dired mode
  48 (require 'dired+)
  49 ;; create new file  key map
  50 (define-key dired-mode-map "c" 'find-file)
  51 ;; ^ goto-up directory
  52 (define-key dired-mode-map (kbd "C-c C-u") 'dired-up-directory)
  53
  54 (setq diredp-hide-details-initially-flag t)
  55 (setq diredp-hide-details-propagate-flag t)
  56
  57 (setq term-buffer-maximum-size 10000)
  58
  59 (provide 'init-base)