Mercurial > urweb
comparison src/c/urweb.c @ 1994:94529780bbcf
getenv calls UNIX getenv() when no special alternative is set
author | Adam Chlipala <adam@chlipala.net> |
---|---|
date | Fri, 07 Mar 2014 11:50:45 -0500 |
parents | 3d1d44111906 |
children | c93fbd139732 01c8aceac480 |
comparison
equal
deleted
inserted
replaced
1993:3d1d44111906 | 1994:94529780bbcf |
---|---|
3670 | 3670 |
3671 uw_Basis_string uw_Basis_getenv(uw_context ctx, uw_Basis_string name) { | 3671 uw_Basis_string uw_Basis_getenv(uw_context ctx, uw_Basis_string name) { |
3672 if (ctx->get_env) | 3672 if (ctx->get_env) |
3673 return ctx->get_env(ctx->get_env_data, name); | 3673 return ctx->get_env(ctx->get_env_data, name); |
3674 else | 3674 else |
3675 return NULL; | 3675 return getenv(name); |
3676 } | 3676 } |
3677 | 3677 |
3678 uw_Basis_string uw_unnull(uw_Basis_string s) { | 3678 uw_Basis_string uw_unnull(uw_Basis_string s) { |
3679 return s ? s : ""; | 3679 return s ? s : ""; |
3680 } | 3680 } |