set tagsToAdd to (choose from list tagNames with title "Tag Companions" with prompt "Select tags to add to items tagged '" & tagName & "':" with multiple selections allowed without empty selection allowed)