 ;;;; Useful Functions
 (defun print-list (list)
   (while list
-    (princ (car list))
-    (princ "\n")
+    (princ-list (car list) "\n")
     (setq list (cdr list))))

  (other-window 1)))
(global-set-key (kbd "C-x 3") 'my-split-window-right)

;;; Custom key bindings
(global-set-key (kbd "C-.") 'repeat)

;;; Clear some keys
(global-unset-key (kbd "C-z"))

(add-hook 'before-save-hook 'delete-trailing-whitespace)
(global-linum-mode t)
(setq inhibit-startup-message t)  ; Bypass emacs start screen
(setq uniquify-buffer-name-style 'forward)
(evil-mode 1)
(powerline-default-theme)

;; Suppress "Symbolic link to Git-controlled source file; follow link?"
(setq vc-follow-symlinks nil)
