/[clhp]/clhp/mod_clhp.c
ViewVC logotype

Diff of /clhp/mod_clhp.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.4 by aventimiglia, Wed Nov 12 21:57:40 2003 UTC revision 1.5 by aventimiglia, Thu Nov 13 19:37:41 2003 UTC
# Line 83  static int Handler ( request_rec *req ) Line 83  static int Handler ( request_rec *req )
83    ap_add_cgi_vars ( req );    ap_add_cgi_vars ( req );
84    child.req = req;    child.req = req;
85    
86      // First we should check if the document exists
87      // But for now...
88      req->content_type = "text/html";
89      ap_table_set ( req->headers_out, "X-Powered-By",
90                     "CLHP Common Lisp Hypertext Preprocessor" );
91      ap_send_http_header ( req );
92    
93    if ( ! ap_bspawn_child ( req->pool, run_lisp, (void *) &child,    if ( ! ap_bspawn_child ( req->pool, run_lisp, (void *) &child,
94                             kill_always, &lisp_out, &lisp_in, NULL ))                             kill_always, &lisp_out, &lisp_in, NULL ))
95      return HTTP_INTERNAL_SERVER_ERROR;      return HTTP_INTERNAL_SERVER_ERROR;

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

  ViewVC Help
Powered by ViewVC 1.1.5