(setq load-path (append 
                 `("/usr/local/share/emacs/site-lisp")
                 load-path))
(global-font-lock-mode 1)

(autoload 'idlwave-mode "idlwave" "IDLWAVE Mode" t)
(autoload 'idlwave-shell "idlw-shell" "IDLWAVE Shell" t)
(setq auto-mode-alist  
      (cons '("\\.pro\\'" . idlwave-mode) auto-mode-alist))
(setq idlwave-help-directory "/usr/local/etc")

(add-hook 'text-mode-hook 'turn-on-auto-fill)

(setq idlwave-file-header '(nil ";+\n; NAME:\n;\n;\n; PURPOSE:\n;\n;\n; CALLING SEQUENCE:\n;\n;\n; INPUTS:\n;\n;\n; OPTIONAL INPUTS:\n;\n;\n; KEYWORD PARAMETERS:\n;\n;\n; OUTPUTS:\n;\n;\n; OPTIONAL OUTPUTS:\n;\n;\n; COMMON BLOCKS:\n;\n;\n; PROCEDURES USED:\n;\n;\n; COMMENTS:\n;\n;\n; EXAMPLES:\n;\n;\n; MODIFICATION HISTORY:\n;\n;-\n"))

(add-hook 'idlwave-mode-hook
          (lambda ()
            (setq                        ; Set Options Here
	     idlwave-main-block-indent 4
	     idlwave-block-indent 3 ; blocks indent 3
	     idlwave-end-offset  -3 ; end of blocks indent -3
             ;; Gotta have that smart-continue-indenting
	     idlwave-max-extra-continuation-indent 0
             idlwave-header-to-beginning-of-file t
             idlwave-expand-generic-end t
             ;; Any self-respecting programmer indents his main block
	     idlwave-continuation-indent 2    ; additional indentation on continued lines
	     idlwave-indent-to-open-paren nil ; do not indent to innermost parenthesis
             idlwave-reserved-word-upcase nil ; Don't uppercase reserved words
             idlwave-surround-by-blank nil
             idlwave-pad-keyword nil
             font-lock-maximum-decoration t
             idlwave-shell-automatic-start t
             ;; A little trick to help fill routine descriptions with
             ;; fancy line delimiters (like =*=*=*=*...).     
             paragraph-separate "[ \t\f]*$\\|[ \t]*;+[ \t]*$\\|;+[+=-_*]+$"
)))