I don't see an easy way, but one uneasy way is to evaluate a Grid, as in:
Grid[{{"\[Bullet]", Style["Item one", "Text"]},
{"\[Bullet]", Style["Item two with a very very very very very very very very very long name", "Text"]},
{"\[Bullet]", Style["Item three", "Text"]}},
Alignment -> {Left, Baseline}, ItemSize -> {{Scaled[0.01], Scaled[0.9]}}]
And then paste the output into a text field in the graphics editor:
