(load "/usr/share/emacs/site-lisp/site-gentoo")
(setq default-tab-width 4)
(setq-default indent-tabs-mode nil)
(global-font-lock-mode t)
(setq font-lock-maximum-decoration t)
(transient-mark-mode 1)
(setq inhibit-startup-message t)
(show-paren-mode 1)
(setq show-trailing-whitespace t)
(setq fortran-do-indent 2)
(setq fortran-if-indent 2)
(setq fortran-continuation-indent 4)
(setq fortran-line-number-indent 4)
(setq fortran-comment-line-start "!")
(setq fortran-continuation-string "&")
(setq fortran-comment-indent-style nil)
(setq nxml-where-tag+id nil)

; So you can run 'emacsclient file' and it opens up in the active session
; instead of starting a new emacs instance, which is expensive
(unless (string-equal "root" (getenv "USER"))

;; Only start server mode if it isn't started already

  (when (or (not (boundp 'server-process))

  (not (eq (process-status server-process)

  'listen)))

  (server-start)))

;;; This was installed by package-install.el.
;;; This provides support for the package system and
;;; interfacing with ELPA, the package archive.
;;; Move this code earlier if you want to reference
;;; packages in your .emacs.
(when
    (load
     (expand-file-name "~/.emacs.d/elpa/package.el"))
  (package-initialize))

;;; Too annoying when working on phenix
(when (load "flymake" t)
  (defun flymake-pylint-init ()
    (let* ((temp-file (flymake-init-create-temp-buffer-copy
                       'flymake-create-temp-inplace))
       (local-file (file-relative-name
                    temp-file
                    (file-name-directory buffer-file-name))))
      (list "pycheckers" (list local-file))))
    
  (add-to-list 'flymake-allowed-file-name-masks
           '("\\.py\\'" flymake-pylint-init)))


(load "~/.emacs.d/flymake-cursor/flymake-cursor.el")
(load "~/.emacs.d/flymake-shell/flymake-shell.el")

(require 'flymake)
(add-hook 'python-mode-hook 'flymake-mode-on)

(require 'flymake-shell)
(add-hook 'sh-mode-hook 'flymake-shell-load)

(require 'flymake-cursor)

(custom-set-faces 
 '(flymake-errline ((((class color)) (:background "DarkRed")))) 
 '(flymake-warnline ((((class color)) (:background "DarkBlue"))))) 

(defun next-flymake-error ()
  (interactive)
  (let ((err-buf nil))
    (condition-case err
        (setq err-buf (next-error-find-buffer))
      (error))
    (if err-buf
        (next-error)
        (progn
          (flymake-goto-next-error)
          (let ((err (get-char-property (point) 'help-echo)))
            (when err
              (message err)))))))

(pymacs-load "ropemacs" "rope-")

(require 'auto-complete-config)
(ac-config-default)

;;(defvar ac-ropemacs-loaded 1)

(require 'ecb)
(custom-set-variables
  ;; custom-set-variables was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
 '(ecb-layout-name "left9")
 '(ecb-options-version "2.40")
 '(ecb-source-path (quote ("/data/src/phenix/cctbx_project"))))
(custom-set-faces
  ;; custom-set-faces was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
 )

;; automatically reparse semantic source code for ECB, etc.
(semantic-load-enable-code-helpers)

;; move from window to window using shift and arrow keys
(when (fboundp 'windmove-default-keybindings)
  (windmove-default-keybindings))