;; This file: http://user.it.uu.se/~embe8573/conf/emacs-init/w3m/w3m-tabs.el

(require 'w3m)

(setq w3m-tab-width 16)
(setq w3m-tab-separator (propertize " " 'face 'default))
(setq w3m-use-header-line nil)
(setq w3m-use-tab-menubar nil)

(defun w3m-new-tab (&optional name)
  (interactive)
  (w3m-copy-buffer nil                     ; BUFFER
                   (or name "w3m buffer")  ; NEWNAME
                   nil                     ; JUST-COPY
                   t) )                    ; EMPTY

(defun w3m-browse-url-new-tab (&optional url)
  (interactive "sURL: ")
  (w3m-new-tab url)
  (w3m-browse-url (or url (thing-at-point 'url)) ))

(provide 'w3m-tabs)