[LON-CAPA-cvs] cvs: doc /loncapafiles updatequery.piml
albertel
lon-capa-cvs@mail.lon-capa.org
Wed, 30 Jun 2004 06:21:46 -0000
albertel Wed Jun 30 02:21:46 2004 EDT
Modified files:
/doc/loncapafiles updatequery.piml
Log:
- Hrrm, rh 7.3 don't like the -W, plus I am curious why only 1 of the three cases tries to do a ping before doing the mail . . . anyhoo deleting these lines fix BUG#3156 and I can't think of any issues they might possibly cause.
Index: doc/loncapafiles/updatequery.piml
diff -u doc/loncapafiles/updatequery.piml:1.33 doc/loncapafiles/updatequery.piml:1.34
--- doc/loncapafiles/updatequery.piml:1.33 Tue Jun 29 11:18:41 2004
+++ doc/loncapafiles/updatequery.piml Wed Jun 30 02:21:45 2004
@@ -1,6 +1,6 @@
<!-- updatequery.piml -->
-<!-- $Id: updatequery.piml,v 1.33 2004/06/29 15:18:41 albertel Exp $ -->
+<!-- $Id: updatequery.piml,v 1.34 2004/06/30 06:21:45 albertel Exp $ -->
<!--
@@ -786,8 +786,7 @@
close(OUT);
`ln -s new_${lonCluster}_hosts.tab ../hosts.tab`;
# email appropriate message
- system('ping -c 1 -W 5 www.lon-capa.org > /dev/null || ping -c 1 -W 5 www.msu.edu > /dev/null || ping -c 1 -W 5 www.mit.edu > /dev/null');
- `echo "REPLACE:$lonCluster:$lonHostID:$date:$line2insert" | mail -s "REPLACE:$lonCluster:$lonHostID:$date" installrecord\@mail.lon-capa.org` unless $?;
+ `echo "REPLACE:$lonCluster:$lonHostID:$date:$line2insert" | mail -s "REPLACE:$lonCluster:$lonHostID:$date" installrecord\@mail.lon-capa.org`;
}
elsif ($hostidexistflag and $lineexistflag) {
print <<END;
@@ -839,8 +838,7 @@
close(OUT);
`ln -s new_${lonCluster}_domain.tab ../domain.tab`;
# email appropriate message
- system('ping -c 1 -W 5 www.lon-capa.org > /dev/null || ping -c 1 -W 5 www.msu.edu > /dev/null || ping -c 1 -W 5 www.mit.edu > /dev/null');
- `echo "REPLACEdom:$lonCluster:$lonHostID:$date:$domaninsert" | mail -s "REPLACEdom:$lonCluster:$lonHostID:$date" installrecord\@mail.lon-capa.org` unless $?;
+ `echo "REPLACEdom:$lonCluster:$lonHostID:$date:$domaninsert" | mail -s "REPLACEdom:$lonCluster:$lonHostID:$date" installrecord\@mail.lon-capa.org`;
}
elsif ($domainexistflag and $lineexistflag) {
print <<END;