Reloads safari from emacs... bind to C-cC-r in MMM or html mode.
(defun reload-safari ()
(interactive)
(shell-command "printf 'tell application \"System Events\"
click button \"Stop\" of first window of process \"Safari\"
end tell' | osascript" nil nil))
