emacs.d/elisp/init-base.el

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