head	1.1;
access;
symbols
	RELEASE_8_3_0:1.1
	RELEASE_9_0_0:1.1
	RELEASE_7_4_0:1.1
	RELEASE_8_2_0:1.1
	RELEASE_6_EOL:1.1
	RELEASE_8_1_0:1.1
	RELEASE_7_3_0:1.1
	RELEASE_8_0_0:1.1
	RELEASE_7_2_0:1.1
	RELEASE_7_1_0:1.1
	RELEASE_6_4_0:1.1
	RELEASE_5_EOL:1.1
	RELEASE_7_0_0:1.1
	RELEASE_6_3_0:1.1
	PRE_XORG_7:1.1
	RELEASE_4_EOL:1.1
	RELEASE_6_2_0:1.1
	RELEASE_6_1_0:1.1
	RELEASE_5_5_0:1.1
	RELEASE_6_0_0:1.1
	RELEASE_5_4_0:1.1
	RELEASE_4_11_0:1.1
	RELEASE_5_3_0:1.1
	RELEASE_4_10_0:1.1
	RELEASE_5_2_1:1.1
	RELEASE_5_2_0:1.1
	RELEASE_4_9_0:1.1
	RELEASE_5_1_0:1.1
	RELEASE_4_8_0:1.1
	RELEASE_5_0_0:1.1
	RELEASE_4_7_0:1.1
	RELEASE_4_6_2:1.1
	RELEASE_4_6_1:1.1
	RELEASE_4_6_0:1.1
	RELEASE_5_0_DP1:1.1
	RELEASE_4_5_0:1.1
	RELEASE_4_4_0:1.1
	RELEASE_4_3_0:1.1
	RELEASE_4_2_0:1.1
	RELEASE_4_1_1:1.1;
locks; strict;
comment	@# @;


1.1
date	2000.07.20.11.55.54;	author nbm;	state Exp;
branches;
next	;


desc
@@


1.1
log
@Add tclhttpd, a pure-Tcl implementation of a HTTP server.

PR:		ports/19870
Submitted by:	Mikhail Teterin <mi@@privatelabs.com>
@
text
@This is needed, because of the way tcllib's pkgIndex.tcl is laid
out. The _children_ of the directory containing tcllib itself are
not searched for packages the first time. So
	``package require <some sub package>''
will fail the first time :(. This is, probably, a bug in tcllib,
but this is a workaround.
+++ htdocs/cgi-bin/flip.cgi	Fri May  5 11:34:19 2000
@@@@ -5,4 +5,3 @@@@
 if {[catch {
-    package require ncgi
-    package require html
+    package require tcllib
 
+++ htdocs/cgi-bin/redirect.cgi	Fri May  5 11:34:31 2000
@@@@ -5,3 +5,3 @@@@
 if {[catch {
-    package require ncgi
+    package require tcllib
 
+++ htdocs/cgi-bin/test.cgi	Fri May  5 11:34:47 2000
@@@@ -5,4 +5,3 @@@@
 if {[catch {
-    package require ncgi
-    package require html
+    package require tcllib
 
@
