Exact value involving `ProductLog`


By manual manipulation, it’s not too difficult to show that the value of the following expression is exactly $1.$ How to convince Mathematica to do the simplification?

2/3 - ProductLog(-(Log(2)/(3 2^(1/3))))/Log(2)