[LON-CAPA-cvs] cvs: doc /loncapafiles updatequery.piml

[harris41]

harris41		Thu Jun  6 11:44:27 2002 EDT

  Modified files:              
    /doc/loncapafiles	updatequery.piml 
  Log:
  avoid blank spaces in hosts.tab and remove junk comments
  
  
Index: doc/loncapafiles/updatequery.piml
diff -u doc/loncapafiles/updatequery.piml:1.13 doc/loncapafiles/updatequery.piml:1.14
--- doc/loncapafiles/updatequery.piml:1.13	Thu Jun  6 11:36:41 2002
+++ doc/loncapafiles/updatequery.piml	Thu Jun  6 11:44:27 2002
@@ -1,7 +1,7 @@
 <!-- updatequery.piml -->
 <!-- Scott Harrison -->
 
-<!-- $Id: updatequery.piml,v 1.13 2002/06/06 15:36:41 harris41 Exp $ -->
+<!-- $Id: updatequery.piml,v 1.14 2002/06/06 15:44:27 harris41 Exp $ -->
 
 <!--
 
@@ -486,16 +486,11 @@
       `grep -v "$lonHostID:" ../production_hosts.tab &gt; ../new_production_hosts.tab`;
        open(OUT,'&gt;&gt;../new_production_hosts.tab') or
          die("cannot open loncom/standalone_hosts.tab for output\n");
-         print(OUT &lt;&lt;END);
-$line2insert
-END
+         print(OUT $line2insert);
        close(OUT);
       `ln -s new_production_hosts.tab ../hosts.tab`;
       # email appropriate message
-#      `echo "$date" | mail -s "REPLACE:$lonHostID:$date" installrecord\@mail.lon-capa.org`;
       `echo "REPLACE:$lonHostID:date:$line2insert" | mail -s "REPLACE:$lonHostID:$date" installrecord\@mail.lon-capa.org`;
-      # "REPLACE:hostid:date"
-      # "REPLACE:hostid:date:line"
     }
     elsif ($hostidexistflag and $lineexistflag) {
       `ln -s production_hosts.tab ../hosts.tab`;