use quote_str function in set_environment