There are entire departments devoted to future problem solving. As a near monopoly multinational, are you more likely to be unseated by a competitor that approves of porn when you don't or by a competitor that prohibits porn when you allow it?
The former. Doing the embarrassing thing would be better for your company. But you're a near-monopoly anyway and unlikely to go bankrupt, so why make yourself uncomfortable?
