X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=demo%2Finetd_demo;fp=bin%2Finetd_demo;h=0a80d12a06aa68dbac07f20b1939ce1cd931de75;hb=9a1ca27b4e9283a89dbcc627641dafeb07ccacb8;hp=9556f69da7537bebb59090c7432b5fd713ce9d72;hpb=907cbc6d770ea6bf36c1649d1952caaccf17d420;p=urisagit%2FStem.git diff --git a/bin/inetd_demo b/demo/inetd_demo similarity index 96% rename from bin/inetd_demo rename to demo/inetd_demo index 9556f69..0a80d12 100755 --- a/bin/inetd_demo +++ b/demo/inetd_demo @@ -10,7 +10,7 @@ my @children ; print "INETD: $ENV{PATH}\n" ; use File::Basename qw( basename ); -$ENV{PATH} .= ':' . basename( $0 ) . ':.'; +$ENV{PATH} .= ':' . basename( $0 ) . ':.:../bin:./bin'; for my $prog qw( run_stem xterm telnet ) { die "Can't find $prog in PATH\n" if system( "which $prog >/dev/null 2>&1" ) != 0;