Trump picks Callista Gingrich as ambassador to Switzerland