(autoload 'mh-send "mh-rmail" t)
(autoload 'webster "/mit/hbriceno/elisp/webster" nil t)
(setq text-mode-hook
      '(lambda () (auto-fill-mode 1)))
(global-set-key "\C-\\" 'mh-rmail)
(autoload 'perl-mode "~/elisp/perl-mode" "Yay Perl" t)

(setq auto-mode-alist (append (list (cons "\\.pl$" 'perl-mode))
                               auto-mode-alist))
(setq auto-mode-alist (append (list (cons "\\.ph$" 'perl-mode))
                               auto-mode-alist))

;(load "~/elisp/tempo")
;(autoload 'html-helper-mode "~/elisp/html-helper-mode" "Yay HTML" t)

(autoload 'html-helper-mode "~/elisp/html-helper-mode" "Yay HTML" t)
(setq auto-mode-alist (cons '("\\.html$" . html-helper-mode) auto-mode-alist))



;(setq browse-url-browser-function
;      (if (string= window-system "x")
;	  'browse-url-mosaic ; or browse-url-mosaic
;	'browse-url-w3))
;(autoload browse-url-browser-function "browse-url.el"
;	  "Ask a WWW browser to show a URL." t)
;; Bind this to control-X w (normally undefined):
;(global-set-key "\C-xw" browse-url-browser-function)
;;      ;; Note: no quote       ^

;(autoload 'browse-url-of-file "browse-url.el"
;	  "Ask a WWW browser to display the current file." t)
;(setq browse-url-save-file t)   ; Always save




;(setq html-helper-do-write-file-hooks t)
;(setq html-helper-build-new-buffer t)
(setq html-helper-address-string 
  "<a href=\"http://venezuela.mit.edu/author.html\">Hector Brice&ntilde;o &lt;hb@mit.edu&gt;</a>")


;;html-helper-new-buffer-template (default is hairy) 





(setq mh-summary-height 6)
(defvar default-load-path load-path)
(setq
 load-path (append
            (list
             "/mit/hbriceno/extras")
            default-load-path))

(setq inhibit-local-variables t)

;;; Emacs-w3 configuration options
(setq load-path (cons (expand-file-name "/mit/hbriceno/elisp") load-path))
(setq load-path (cons (expand-file-name "/mit/hbriceno/w3") load-path))
(autoload 'w3-preview-this-buffer "w3" "WWW Previewer" t)
(autoload 'w3-follow-url-at-point "w3" "Find document at pt" t)
(autoload 'w3 "w3" "WWW Browser" t)
(autoload 'w3-open-local "w3" "Open local file for WWW browsing" t)
(autoload 'w3-fetch "w3" "Open remote file for WWW browsing" t)
(autoload 'w3-use-hotlist "w3" "Use shortcuts to view WWW docs" t)
(autoload 'w3-show-hotlist "w3" "Use shortcuts to view WWW docs" t)
(autoload 'w3-follow-link "w3" "Follow a hypertext link." t)
(autoload 'w3-batch-fetch "w3" "Batch retrieval of URLs" t)
(autoload 'url-get-url-at-point "url" "Find the url under the cursor" nil)
(autoload 'url-file-attributes  "url" "File attributes of a URL" nil)
(autoload 'url-popup-info "url" "Get info on a URL" t)
(autoload 'url-retrieve   "url" "Retrieve a URL" nil)
(autoload 'url-buffer-visiting "url" "Find buffer visiting a URL." nil)
(autoload 'gopher-dispatch-object "gopher" "Fetch gopher dir" t)
;;; End of Emacs-w3 configuration options
