.emacs

; Email and user's name.
(setq user-mail-address "foo@bar.com")
(setq user-full-name "Tim Hawes")

; Display clock and line and column numbers.
(display-time)
(line-number-mode 1)
(column-number-mode 1)

(global-font-lock-mode t)
(setq font-lock-maximum-size nil)

;; Use this for remote so I can specify command line arguments
(defun remote-term (new-buffer-name cmd &rest switches)
  (setq term-ansi-buffer-name (concat "*" new-buffer-name "*"))
  (setq term-ansi-buffer-name (generate-new-buffer-name term-ansi-buffer-name))
  (setq term-ansi-buffer-name (apply 'make-term term-ansi-buffer-name cmd nil switches))
  (set-buffer term-ansi-buffer-name)
  (term-mode)
  (term-char-mode)
  (term-set-escape-char ?\C-x)
  (switch-to-buffer term-ansi-buffer-name))
;; You can then define a new function in your init file for each host you frequently visit with it’s own buffer name and connection parameters:

(defun open-hyde ()
  (interactive)
  (remote-term "Hyde" "ssh" "hawet@hyde.rtp.netapp.com"))


;(setq load-path
;      (append "/usr/share/emacs/site-lisp"
;              "/usr/local/share/emacs/site-site"
;              "/home/thawes/.emacs.d"
;              load-path))
(add-to-list 'load-path (expand-file-name "~/.emacs.d"))
(load-library "autotools")
(load-library "colors")
(load-library "keys")