Last change
on this file since 8957 was 8614, checked in by rick, 14 years ago |
Restore deleted files from tools/iris-8.0@8610
|
-
Property svn:executable
set to
*
|
File size:
434 bytes
|
Rev | Line | |
---|
[6664] | 1 | #!/usr/bin/perl -w
|
---|
| 2 | #
|
---|
| 3 | # Local variable file
|
---|
| 4 |
|
---|
| 5 | #path variablen
|
---|
| 6 | $home="/usr/local/www/data/genesis";
|
---|
| 7 | $conf_file="$home/tools/FreeBSD6_x/genesis.conf";
|
---|
| 8 |
|
---|
| 9 |
|
---|
| 10 | #(inter)net env
|
---|
| 11 | if( defined $ENV{'SERVER_NAME'} ) {
|
---|
| 12 | $hostname=$ENV{'SERVER_NAME'};
|
---|
| 13 | }
|
---|
| 14 | else {
|
---|
| 15 | $hostname=`hostname`;
|
---|
| 16 | };
|
---|
| 17 |
|
---|
| 18 | chomp($hostname);
|
---|
| 19 | $cgi_dir="http://$hostname/freebsd/6.0";
|
---|
| 20 | $source="$cgi_dir/g_list.pl";
|
---|
| 21 |
|
---|
| 22 | #exec vars
|
---|
| 23 | $svn="/usr/local/bin/svn";
|
---|
| 24 | $wicontrol='/usr/sbin/wicontrol';
|
---|
| 25 |
|
---|
Note:
See
TracBrowser
for help on using the repository browser.