ewwを特定のwebページから起動したいとき

以下のコードを評価し、M-x eww-gohomeとする。

(defvar eww-home-page "http://www.yahoo.co.jp")
(defun eww-gohome ()
  "Go to the homepage specified by `eww-home-page'."
  (interactive)
  (unless eww-home-page
    (user-error "No `eww-home-page' is found."))
  (eww-browse-url eww-home-page))