add functions from emacs-live
font....