(when (load "url" t)
  (setq url-history-track t)
  (setq url-personal-mail-address nil)
  (setq url-privacy-level (quote (lastloc)))
  )