modified company.clj