"  Open javadoc/HTML file matching a class name
"  --
"  Adapted from http://groups.google.com/groups?th=38544441460cfb2c
"  --
"  Links in jdk-doc-classes.html are relative
function! Javadoc(class)
  let Doc_base = 'http://java/api/'
  let Doc = '$HOME/ref/lang/java/jdk-doc-classes.html'

  split
  exec "view" Doc
  exec "normal /[^\"]\\+\\<" . a:class . "\\.html\n"
  exec "call YankMatched()\n"
  exec ':silent !xterm -e useragent text ' . Doc_base . @" . '&'
  exec ":bwipeout!"

  unlet Doc_base
  unlet Doc
endfunction