new Graph in Mathematica 8.0

Question

1. Has anybody figured out a way to modify Graph objects in Mathematica 8? In particular, how to get the same functionality you get when you right click on the graph.<

Answer 1

The following will preserve the vertex coordinates of the original graph.

g = CompleteGraph[5];
coords = PropertyValue[{g, #}, VertexCoordinates] & /@ VertexList[g];
Graph[VertexList[g], EdgeList[g], GraphStyle -> "BasicGold", 
 VertexCoordinates -> coords]

I would think something similar could preserve other options as well, though I haven't tried it.