This code works ok in V 10.0.2 (from a post I was looking at here)
I noticed what seems to be a regression bug. This code works in version 10.0.2 on windows 7
Clear[t]
tmp = RevolutionPlot3D[{2 + Cos[t], Sin[t]}, {t, 0, 2 Pi}, PlotPoints -> 2];
tmp = GraphicsComplex[tmp[[1, 1]], tmp[[1, 2, 1, 1, 5, 1]]];
r1 = BoundaryDiscretizeGraphics@tmp
But on V 10.1:
Clear[t]
tmp = RevolutionPlot3D[{2 + Cos[t], Sin[t]}, {t, 0, 2 Pi}, PlotPoints -> 2];
tmp = GraphicsComplex[tmp[[1, 1]], tmp[[1, 2, 1, 1, 5, 1]]];
r1 = BoundaryDiscretizeGraphics@tmp
Is this a new bug in 10.1? Windows 7, 64 bit