(defun troff-mode ()
  "Major mode for editing troff. Really text mode with some other minor stuff."
  (interactive)
  (text-mode)
  (make-local-variable 'paragraph-start)
  (make-local-variable 'paragraph-separate)
  (setq mode-name "Troff"
	paragraph-start (concat "^\\.\\|" paragraph-start)
	paragraph-separate (concat "^\\.\\|" paragraph-separate)))