[Libcvs-perl-cvs] libcvs-perl/examples lcvs-st

[Alexander Taler]

CVSROOT:        /cvsroot/libcvs-perl
Module name:    libcvs-perl
Branch:         
Changes by:     Alexander Taler <address@hidden>        06/03/22 20:38:09

Modified files:
        examples       : lcvs-st 

Log message:
        Remove unnecessary comment

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/libcvs-perl/libcvs-perl/examples/lcvs-st.diff?tr1=1.30&tr2=1.31&r1=text&r2=text

Patches:
Index: libcvs-perl/examples/lcvs-st
diff -u libcvs-perl/examples/lcvs-st:1.30 libcvs-perl/examples/lcvs-st:1.31
--- libcvs-perl/examples/lcvs-st:1.30   Thu Mar  9 13:40:21 2006
+++ libcvs-perl/examples/lcvs-st        Wed Mar 22 20:38:09 2006
@@ -154,7 +154,7 @@
 
 # Check for non-default commands
 if ($cmd_version) {
-  print '$Header: /cvsroot/libcvs-perl/libcvs-perl/examples/lcvs-st,v 1.30 
2006/03/09 13:40:21 dissent Exp $ ', "\n";
+  print '$Header: /cvsroot/libcvs-perl/libcvs-perl/examples/lcvs-st,v 1.31 
2006/03/22 20:38:09 dissent Exp $ ', "\n";
   print "VCS::LibCVS::VERSION = $VCS::LibCVS::VERSION\n";
   exit;
 }
@@ -503,7 +503,6 @@
 ### Print routine
 ###############################################################################
 sub print_output {
-  # Print output
   foreach my $file_name (sort keys %st_info) {
     my $f_info = $st_info{$file_name};
     $f_info->{State} = $f_info->{LAdmin}.$f_info->{LState}.$f_info->{RState};