init.el
changeset 34 8e91ec6fd0a2
parent 33 3be3d7b4cae4
child 35 4a9c440b6764
equal deleted inserted replaced
33:3be3d7b4cae4 34:8e91ec6fd0a2
    50       (defun get-font ()
    50       (defun get-font ()
    51         "Get appropriate font based on system and hostname."
    51         "Get appropriate font based on system and hostname."
    52         (cond
    52         (cond
    53          ((string-match "darwin" (emacs-version)) "Menlo-12")
    53          ((string-match "darwin" (emacs-version)) "Menlo-12")
    54          ((string-match "HoldenCaulfield" (system-name)) "monospace-7")
    54          ((string-match "HoldenCaulfield" (system-name)) "monospace-7")
       
    55          ((string-match "lhoersten-66113" (system-name)) "monospace-8")
    55          ("monospace-10")))
    56          ("monospace-10")))
    56 
    57 
    57       (tool-bar-mode -1)      ; remove tool bar
    58       (tool-bar-mode -1)      ; remove tool bar
    58       (scroll-bar-mode -1)    ; remove scroll bar
    59       (scroll-bar-mode -1)    ; remove scroll bar
    59       (visual-line-mode t)    ; word wrap break on whitespace
    60       (visual-line-mode t)    ; word wrap break on whitespace
    66       (color-theme-twilight)
    67       (color-theme-twilight)
    67       ))
    68       ))
    68 
    69 
    69 ;;; terminal
    70 ;;; terminal
    70 (global-set-key (kbd "C-c s") 'eshell) ; start shell
    71 (global-set-key (kbd "C-c s") 'eshell) ; start shell
    71 (add-hook 'eshell-mode-hook '(lambda () (setenv "TERM" "emacs"))) ; enable colors
    72 (add-hook
       
    73  'eshell-mode-hook
       
    74  '(lambda ()
       
    75     (setenv "TERM" "emacs") ; enable colors
       
    76     (setenv "PATH" (concat "~/.cabal/bin:" (getenv "PATH"))))) ; add cabal binaries
    72 
    77 
    73 
    78 
    74 ;;;; Mode-Specific ;;;;
    79 ;;;; Mode-Specific ;;;;
    75 
    80 
    76 ;;; linum-mode - line numbers
    81 ;;; linum-mode - line numbers
   156 
   161 
   157 (require 'hoersten-align-with-spaces) ; use only spaces for alignment
   162 (require 'hoersten-align-with-spaces) ; use only spaces for alignment
   158 (require 'hoersten-pastebin-region)   ; send selected text to pastebin
   163 (require 'hoersten-pastebin-region)   ; send selected text to pastebin
   159 (require 'hoersten-c-style)           ; load c specific lisp
   164 (require 'hoersten-c-style)           ; load c specific lisp
   160 (require 'vala-mode)                  ; vala programming language
   165 (require 'vala-mode)                  ; vala programming language
       
   166 (require 'move-line)                  ; move line up or down
   161 
   167 
   162 ;;; pretty-mode - unicode character replacement
   168 ;;; pretty-mode - unicode character replacement
   163 (require 'pretty-mode)
   169 (require 'pretty-mode)
   164 (global-pretty-mode t)
   170 (global-pretty-mode t)
   165 
   171