;;; Emacs initialization file for Roscoe Bartlett (rabartl)

(add-to-list 'load-path (expand-file-name "~/elisp/"))

;; Load custom Thyra C++ styles
(require 'cpp-thyra-styles)

;; Set my style to the Thyra style!
(setq c-set-style "thyra")

;;; Load the C++ function menu
(require 'cpp-func-menu)

;;; Load GNU global
;;;(require 'gtags)
(autoload 'gtags-mode "gtags" "" t)
(setq c-mode-hook
          '(lambda ()
              (gtags-mode 1)
      ))

;; Set up the keyboard so the delete key on both the regular keyboard
;; and the keypad delete the character under the cursor and to the right
;; under X, instead of the default, backspace behavior.
(global-set-key [delete] 'delete-char)
(global-set-key [kp-delete] 'delete-char)
(global-set-key "\C-v" 'yank)

;;; Set up other customizations
(custom-set-variables
 '(case-fold-search t)
 '(column-number-mode t)
 '(current-language-environment "English")
 '(fill-column 78)
 '(font-lock-auto-fontify t)
 '(font-lock-maximum-decoration t)
 '(font-lock-mode t nil (font-lock))
 '(font-lock-use-colors nil)
 '(font-lock-use-fonts t)
 '(global-font-lock-mode t nil (font-lock))
 '(line-number-mode t)
 '(load-home-init-file t t)
 '(make-backup-files nil)
 '(query-user-mail-address nil)
 '(require-final-newline t)
 '(show-paren-mode t nil (paren))
 '(transient-mark-mode t)
 '(indent-tabs-mode nil))
(custom-set-faces
 '(default ((t (:family "Clean" :size "12pt"))) t))

;; I can't remember what this does?
(setq minibuffer-max-depth nil)

;; Setup the PSGML mode to indent elements automatically!
(setq sgml-indent-data t)
(setq sgml-indent-step 2)
