(defun my-html-mode ()
    (interactive)
    (html-mode)
    (setq fill-column 79)
    (auto-fill-mode 1)
    (setq mode-name "my-html-me")
)