(defconst javagnustyle '((c-hanging-braces-alist '((block-open before after) (brace-list-open))) (c-basic-offset . 2) ) ) (defun enable-javagnu () (interactive) ;; remember old values (setq javagnu-c-auto-newline c-auto-newline) (setq javagnu-indent-tabs-mode indent-tabs-mode) (setq javagnu-jde-gen-k&r jde-gen-k&r) (setq javagnu-jde-gen-comments jde-gen-comments) ; auto-newline mode on (setq c-auto-newline t) ; indent spaces instead of tabs (setq indent-tabs-mode nil) ; GNU style braces placement in templates (setq jde-gen-k&r nil) ; supress generate comments (setq jde-gen-comments nil) (jde-abbrev-mode) (c-add-style "user" javagnustyle t) (c-set-style "user") ) (defun disable-javagnu () (interactive) ;; restore old values (setq c-auto-newline javagnu-c-auto-newline) (setq indent-tabs-mode javagnu-indent-tabs-mode) (setq jde-gen-k&r javagnu-jde-gen-k&r) (setq jde-gen-comments javagnu-jde-gen-comments) (c-set-style "java") ) ;; uncomment the following line to automatically enable Java-GNU-mode ;; on JDE-startup ;(add-hook 'jde-mode-hook 'enable-javagnu)