mirror of
https://github.com/Stichting-MINIX-Research-Foundation/pkgsrc-ng.git
synced 2025-09-13 06:23:45 -04:00
18 lines
608 B
Plaintext
18 lines
608 B
Plaintext
$NetBSD: patch-ab,v 1.1 2006/08/23 11:22:07 minskim Exp $
|
|
|
|
--- src/TclWebapache.c.orig 2004-12-03 02:17:10.000000000 +0000
|
|
+++ src/TclWebapache.c
|
|
@@ -660,10 +660,10 @@ TclWeb_GetEnvVar( TclWebRequest *req, ch
|
|
TclWeb_InitEnvVars( req );
|
|
|
|
/* Check to see if it's a header variable first. */
|
|
- (const char *)val = ap_table_get( req->req->headers_in, key );
|
|
+ val = (char *)ap_table_get( req->req->headers_in, key );
|
|
|
|
if( !val ) {
|
|
- (const char *)val = ap_table_get( req->req->subprocess_env, key );
|
|
+ val = (char *)ap_table_get( req->req->subprocess_env, key );
|
|
}
|
|
|
|
return val;
|