[LON-CAPA-cvs] cvs: loncom /cgi lonversions.pl

albertel lon-capa-cvs@mail.lon-capa.org
Sat, 06 Sep 2003 17:23:29 -0000 

albertel		Sat Sep  6 13:23:29 2003 EDT

  Modified files:              
    /loncom/cgi	lonversions.pl 
  Log:
  - $idle in loncnew  adding non version data to output. (BUG#2152)
  
  
Index: loncom/cgi/lonversions.pl
diff -u loncom/cgi/lonversions.pl:1.3 loncom/cgi/lonversions.pl:1.4
--- loncom/cgi/lonversions.pl:1.3	Sun Aug 31 23:37:27 2003
+++ loncom/cgi/lonversions.pl	Sat Sep  6 13:23:29 2003
@@ -1,7 +1,7 @@
 #!/usr/bin/perl
 $|=1;
 # Prints ut the Id line from most files
-# $Id: lonversions.pl,v 1.3 2003/09/01 03:37:27 albertel Exp $
+# $Id: lonversions.pl,v 1.4 2003/09/06 17:23:29 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -30,7 +30,7 @@
       "<html><body bgcolor=#FFFFFF><h1>Handler Versions</h1>".
       "<pre>\n";
 open (DFH,
-"grep '\$Id' /home/httpd/perl/* /home/httpd/lib/perl/Apache/*.pm /home/httpd/html/res/adm/includes/* /home/httpd/html/res/adm/pages/*|");
+"grep '\$Id:' /home/httpd/perl/* /home/httpd/lib/perl/Apache/*.pm /home/httpd/html/res/adm/includes/* /home/httpd/html/res/adm/pages/*|");
 while ($line=<DFH>) { 
    print "$line"; 
 }