… | |
… | |
169 | extern char **environ; |
169 | extern char **environ; |
170 | extern char **rxvt_environ; // the original environ pointer |
170 | extern char **rxvt_environ; // the original environ pointer |
171 | |
171 | |
172 | inline void set_environ (stringvec *envv) |
172 | inline void set_environ (stringvec *envv) |
173 | { |
173 | { |
|
|
174 | #if ENABLE_PERL |
|
|
175 | assert (envv); |
|
|
176 | #else |
174 | if (envv) |
177 | if (envv) |
|
|
178 | #endif |
175 | environ = (char **)envv->begin (); |
179 | environ = (char **)envv->begin (); |
176 | } |
180 | } |
177 | |
181 | |
178 | inline void set_environ (char **envv) |
182 | inline void set_environ (char **envv) |
179 | { |
183 | { |
|
|
184 | #if ENABLE_PERL |
|
|
185 | assert (envv); |
|
|
186 | #else |
180 | if (envv) |
187 | if (envv) |
|
|
188 | #endif |
181 | environ = envv; |
189 | environ = envv; |
182 | } |
190 | } |
183 | |
191 | |
184 | /* |
192 | /* |
185 | ***************************************************************************** |
193 | ***************************************************************************** |