;; Minor modes (add-hook 'perl-mode-hook 'whitespace-mode) (add-hook 'perl-mode-hook 'capitalized-words-mode) ;(add-hook 'perl-mode-hook 'flyspell-mode) ;; perlcritic (require 'cl) ; perlcritic needs it (autoload 'perlcritic "perlcritic" "" t) (autoload 'perlcritic-region "perlcritic" "" t) (autoload 'perlcritic-mode "perlcritic" "" t) (eval-after-load "perl-mode" '(add-hook 'perl-mode-hook 'perlcritic-mode)) ;; Indentation settings (add-hook 'perl-mode-hook '(lambda () (setq ;; Insert spaces instead of tabs indent-tabs-mode nil tab-width 4))) ;; Add postgresql-consulting specifics (dir-locals-set-class-variables 'postgresql-consulting '((perl-mode . ((indent-tabs-mode . t) (tab-width . 4))))) (dir-locals-set-directory-class "~/repo/postgresql-consulting" 'postgresql-consulting)