|
Last change
on this file since 13291 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
|
| Line | |
|---|
| 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.
