home/.emacs.d/init.el: add whitespace control functions