Comment added to explain the SMTokenField frame calculation kludge