(defun emacs-format-function ()
   (untabify (point-min) (point-max))
   (save-buffer)
)