+ Corrected example

packages/extra/uncgi/testcgi.pp

@@ -4,16 +4,12 @@ uses uncgi;
 
 begin
   cgi_init;
+  set_content('text/html');
   Writeln ('User agent = ',http_useragent);
   Writeln ('Referer    = ',http_referer);
   Writeln ('Name       = ',get_value('name'));
   Writeln ('Address    = ',get_value('address'));
   Writeln ('City       = ',get_value('city'));
-end.  $Log$
-end.  Revision 1.2  2002-09-07 15:43:06  peter
-end.    * old logs removed and tabs fixed
-end.
-end.  Revision 1.1  2002/01/29 17:55:23  peter
-end.    * splitted to base and extra
 end.
+{
 }