URL conversion to SVG

[wrcstewart (William Stewart)]

Trying to construct a graph of URL s and then convert to SVG.
This works fine till I convert to SVG - surely the conversion should maintain the URL functionality?

 LayeredGraphPlot[{Hyperlink["Wolfram Research, Inc.", 
        "http://www.wolfram.com"] -> 2, 1 -> 3, 2 -> 3, 1 -> 4, 2 -> 4, 
      1 -> 5}, VertexLabeling -> True]