(set-input-mode nil nil 'foo)
(add-hook 'text-mode-hook 'turn-on-auto-fill)
(setq require-final-newline t)
(setq auto-mode-alist 
      (nconc (list 
              '("\\.pl\\'" . cperl-mode) 
              '("\\.l\\'" . c-mode)
              '("[mM]akefile" . makefile-mode)
              '("\\.txt\\'" . text-mode))
             auto-mode-alist))
(setq cperl-indent-level 4)
(autoload 'perl-mode "cperl-mode" "alternate Perl mode" t)
(defun my-c-mode-common-hook ()
  (c-set-style "bsd") )
(add-hook 'c-mode-common-hook 'my-c-mode-common-hook)
(autoload 'html-helper-mode "html-helper-mode" "Yay HTML" t)
(setq auto-mode-alist (cons '("\\.html$" . html-helper-mode) auto-mode-alist))
(add-hook 'html-helper-load-hook '(lambda () (require 'html-font)))
(autoload 'praat-mode "praat-mode.el" "Enter Praat mode." t)
(setq auto-mode-alist (cons '("\\.praat$" . praat-mode) auto-mode-alist))
(global-set-key "\M-g" 'goto-line)
(setq column-number-mode t)
(toggle-global-lazy-font-lock-mode)
(global-set-key [(f1)] (lambda () (interactive) (manual-entry (current-word))))