;;Don't show the startup splash screen
(setq inhibit-startup-message t)

;;Set your favorite global keys
(global-set-key "\M-g" 'goto-line)
(global-set-key "\M-s" 'search-forward)
(global-set-key "\M-a" 'search-forward)
(global-set-key "\M-r" 'query-replace)
(global-set-key "\M-c" 'compile)

;;Turns off annoying beep
(setq visible-bell t)

;;Sets up fontlock mode to color fonts
(if window-system
 (progn
  (load-library "font-lock")
  (add-hook 'find-file-hooks 'turn-on-font-lock)))

;;Fixes broken shell
(setq explicit-shell-file-name "C:\\WINNT\\SYSTEM32\\CMD.EXE")

;;Tell the java mode to use javac for the compiler and to 
;;look to m:\java_classes for classes if such a directory exists
(setq java-mode-hook
   '(lambda () 
      (progn 
	(make-local-variable 'compile-command)
	(make-local-variable 'java-compiler)
	(setq java-compiler "r:\\jdk1.1.4\\bin\\javac")
	     (if
	      (file-exists-p "m:\\java_classes")
	      (setq compile-command 
		    (concat java-compiler "-d m:\\java_classes" 
			    "-classpath m:\\java_classes" 
			    java-classes buffer-file-name))
	      (setq compile-command 
		    (concat java-compiler buffer-file-name))))))
;;Changes to home directory
(cd "~/")