94 lines
4.3 KiB
EmacsLisp
94 lines
4.3 KiB
EmacsLisp
;; Generic Emacs stuff
|
|
(add-to-list 'load-path "~/.emacs.d")
|
|
|
|
;; multi-term
|
|
(require 'multi-term)
|
|
(setq multi-term-program "/bin/bash")
|
|
|
|
;; Always use spaces instead of tabs, a tab is 4 spaces by default
|
|
(setq-default indent-tabs-mode nil)
|
|
(setq-default tab-width 4)
|
|
|
|
;; WhiteSpace hilighting
|
|
(require 'whitespace)
|
|
(setq whitespace-style (quote (face trailing tabs tab-mark empty lines-tail)))
|
|
(setq-default whitespace-line-column 80)
|
|
(global-whitespace-mode 1)
|
|
|
|
;; C, use k&r style by default (naev)
|
|
(setq-default c-default-style "k&r"
|
|
c-basic-offset 3)
|
|
|
|
;; Python!
|
|
;; Prevent ropemacs from overriding emacs shortcuts
|
|
;;(setq ropemacs-enable-shortcuts nil)
|
|
;;(setq ropemacs-local-prefix "C-c C-p")
|
|
;; Load of a bunch of stuff for pymacs : http://pymacs.progiciels-bpi.ca/pymacs.html#installation
|
|
;;(autoload 'pymacs-apply "pymacs")
|
|
;;(autoload 'pymacs-call "pymacs")
|
|
;;(autoload 'pymacs-eval "pymacs" nil t)
|
|
;;(autoload 'pymacs-exec "pymacs" nil t)
|
|
;;(autoload 'pymacs-load "pymacs" nil t)
|
|
;;(autoload 'pymacs-autoload "pymacs")
|
|
;;(eval-after-load "pymacs"
|
|
;; '(add-to-list 'pymacs-load-path YOUR-PYMACS-DIRECTORY"))
|
|
;;(require 'pymacs)
|
|
;; Load ropemacs
|
|
;;(pymacs-load "ropemacs" "rope-")
|
|
|
|
;; PHP and Drupal-Modes
|
|
;; http://stackoverflow.com/questions/898063/making-php-mode-and-other-cc-mode-derived-modes-compatible-with-emacs-23
|
|
;; Use autoload for php-mode and drupal-mode to avoid occasionaly errors on some
|
|
;; systems when loading from init. See the above question on stack overflow
|
|
(autoload 'php-mode "php-mode" "Major mode for editing php code." t)
|
|
(autoload 'drupal-mode "drupal-mode" "Major mode for editing drupal php files." t)
|
|
;(require 'php-mode)
|
|
;(require 'drupal-mode)
|
|
(add-to-list 'auto-mode-alist '("\\.\\(module\\|test\\|install\\|theme\\)$" . drupal-mode))
|
|
(add-to-list 'auto-mode-alist '("\\.\\(php\\|inc\\)$" . php-mode))
|
|
(add-to-list 'auto-mode-alist '("\\.info" . conf-windows-mode))
|
|
(defun my-php-hook-function ()
|
|
(set (make-local-variable 'compile-command) (format "phpcs --report=emacs --standard=PEAR %s" (buffer-file-name))))
|
|
(add-hook 'php-mode-hook 'my-php-hook-function)
|
|
(defun my-drupal-hook-function ()
|
|
(set (make-local-variable 'compile-command) (format "phpcs --report=emacs --extensions=php,module,inc,install,test,profile,theme --standard=Drupal %s" (buffer-file-name))))
|
|
(add-hook 'drupal-mode-hook 'my-drupal-hook-function)
|
|
(autoload 'js2-mode "js2-mode" nil t)
|
|
(add-to-list 'auto-mode-alist '("\\.js$" . js2-mode))
|
|
;; Synax checking for PHP with flymake
|
|
;; http://sachachua.com/blog/2008/07/emacs-and-php-on-the-fly-syntax-checking-with-flymake/
|
|
;; https://github.com/illusori/emacs-flymake
|
|
;; http://www.emacswiki.org/emacs/FlyMake
|
|
(require 'flymake)
|
|
(defun flymake-php-init ()
|
|
"Use php to check the syntax of the current file."
|
|
(let* ((temp (flymake-init-create-temp-buffer-copy 'flymake-create-temp-inplace))
|
|
(local (file-relative-name temp (file-name-directory buffer-file-name))))
|
|
(list "php" (list "-f" local "-l"))))
|
|
(add-to-list 'flymake-err-line-patterns
|
|
'("\\(Parse\\|Fatal\\) error: +\\(.*?\\) in \\(.*?\\) on line \\([0-9]+\\)$" 3 4 nil 2))
|
|
(add-to-list 'flymake-allowed-file-name-masks '("\\.php$" flymake-php-init))
|
|
;; Drupal-type extensions
|
|
(add-to-list 'flymake-allowed-file-name-masks
|
|
'("\\.\\(inc\\|module\\|test\\|install\\|theme\\)$"
|
|
flymake-php-init))
|
|
(add-hook 'php-mode-hook (lambda () (flymake-mode 1)))
|
|
(add-hook 'php-mode-hook (lambda ()
|
|
(define-key php-mode-map '[M-S-up]
|
|
'flymake-goto-prev-error)))
|
|
(add-hook 'php-mode-hook (lambda ()
|
|
(define-key php-mode-map '[M-S-down]
|
|
'flymake-goto-next-error)))
|
|
(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.
|
|
)
|
|
(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.
|
|
'(flymake-errline ((((class color) (background light)) (:background "magenta" :foreground "red")))))
|