Shaming may not be a nice way to manage a company, but I don't think we should pretend it lacks for efficacy just because we don't like it. Pretending it doesn't work will never change the minds of people who already know from experience that it does work. If you want to change their minds you should first acknowledge that it works, then explain why it working isn't sufficient moral or ethical justification for doing it.