-(setq cltl2-root-url
- "http://metalzone.distorted.org.uk/doc/cltl/")
-(setq common-lisp-hyperspec-root
- "http://metalzone.distorted.org.uk/doc/hyperspec/")
+(setq cltl2-root-url (mdw-config 'cltl-url))
+(setq common-lisp-hyperspec-root (mdw-config 'hyperspec-url))
+
+;;;----- W3 and URL fetching stuff ------------------------------------------
+
+(let ((proxy (mdw-config 'http-proxy)))
+ (setq url-proxy-services
+ `(("http" . ,proxy)
+ ("ftp" . ,proxy)
+ ("gopher" . ,proxy))))
+(setq url-cookie-untrusted-urls '("."))
+
+(setq browse-url-browser-function (mdw-good-url-browser)
+ browse-url-mozilla-program "firefox")
+
+(setq w3m-default-display-inline-images t)
+
+(setq w3-do-incremental-display t
+ w3-use-menus '(file edit view go bookmark options
+ buffers style search emacs nil help)
+ w3-display-inline-image t
+ w3-keybinding 'info)