rgr-programming.el

(which-function-mode t)

 (add-hook 'after-init-hook 'global-flycheck-mode)
 ;; (setq flycheck-check-syntax-automatically '(mode-enabled idle-change))

 ;; (require 'flycheck-color-mode-line)
 ;; (eval-after-load "flycheck"
 ;;   '(add-hook 'flycheck-mode-hook 'flycheck-color-mode-line-mode))

(global-set-key (kbd "<f11>") 'next-error)
(global-set-key (kbd "<f12>") 'previous-error)
(global-set-key (kbd "S-<f11>") 'first-error)

(global-set-key (kbd "C-c w") 'w3m)


;; (require 'semantic/ia)
;; (require 'semantic/canned-configs)

;; (setq semanticdb-default-save-directory "~/tmp/semantic.cache")

;; (semantic-mode 1)
;; (global-semanticdb-minor-mode 1)
;; (semantic-load-enable-excessive-code-helpers)

;; (defun my-cedet-hook ()
;;   ;; functions which are disabled
;;   ;; (local-set-key "\C-cp" 'semantic-ia-show-summary)
;;   ;; (local-set-key "\C-cl" 'semantic-ia-show-doc)
;;   ;; (local-set-key "." 'semantic-complete-self-insert)
;;   ;; (local-set-key ">" 'semantic-complete-self-insert)
;;   (local-set-key "\M-n" 'semantic-ia-complete-symbol-menu)  ;; auto completet by menu
;;   (local-set-key "\C-c/" 'semantic-ia-complete-symbol)
;;   (local-set-key "\C-cb" 'semantic-mrub-switch-tags)
;;   (local-set-key "\C-cj" 'semantic-ia-fast-jump)
;;   (local-set-key "\C-cR" 'semantic-symref) 
;;   (local-set-key "\C-cr" 'semantic-symref-symbol)  
;;   )

;; (add-hook 'c-mode-common-hook 'my-cedet-hook)

;; ;; Enable EDE (Project Management) features
;; (global-ede-mode 1)

(require 'iedit)
(global-set-key (kbd "<f9>") 'iedit-mode)

(require 'rgr-sql)
;;(require 'rgr-gtags)
(require 'rgr-c)
(require 'rgr-php)
(require 'rgr-haskell)
(require 'rgr-javascript)
(require 'rgr-java)

(add-hook 'css-mode-hook 'flyspell-prog-mode)
(add-hook 'html-mode-hook 'flyspell-prog-mode)

(define-key mode-specific-map [?g] 'magit-status)


(global-set-key (kbd "C-c f")
 		(lambda ()
 		  (interactive)
 		  (require 'finder)
 		  (let ((thing (intern (thing-at-point 'symbol))))
 		    (if (functionp thing)
 			(find-function thing)
 		      (find-variable thing)))))

(global-set-key (kbd "C-c P") 'gist-region-or-buffer)

(provide 'rgr-programming)