Get font face under cursor in Emacs

Question

I\'ve been developing my own custom color theme, and it\'d be really useful if I could get a list of font-faces affecting the text under the cursor.

Something like T

Answer 1

There's a bug in the `what-face' code: the function takes "pos" as an argument but then doesn't use it when getting the face -- instead it uses "(point)", even though the message later claims pos in the "No face at %d" case.