fix has-prog