Update author's mail address.
Signed-off-by: Thomas Hochstein <thh@thh.name>
This commit is contained in:
		
							parent
							
								
									36d02b3364
								
							
						
					
					
						commit
						c25a20d679
					
				
					 1 changed files with 3 additions and 3 deletions
				
			
		| 
						 | 
					@ -3,7 +3,7 @@
 | 
				
			||||||
# usestats.pl
 | 
					# usestats.pl
 | 
				
			||||||
#############
 | 
					#############
 | 
				
			||||||
 | 
					
 | 
				
			||||||
# (c) 10/2003-10/2004 Thomas Hochstein  <thh@inter.net>
 | 
					# (c) 10/2003-10/2004 Thomas Hochstein  <thh@thh.name>
 | 
				
			||||||
#
 | 
					#
 | 
				
			||||||
# This program is free software; you can redistribute it and/or modify it under
 | 
					# This program is free software; you can redistribute it and/or modify it under
 | 
				
			||||||
# the terms of the GNU General Public License as published by the Free
 | 
					# the terms of the GNU General Public License as published by the Free
 | 
				
			||||||
| 
						 | 
					@ -77,7 +77,7 @@ if ($options{'h'}) {
 | 
				
			||||||
 print "$0 v $ver\nUsage: $0 [-hq] [-w|r <savefile>] [-c <configfile>]\n";
 | 
					 print "$0 v $ver\nUsage: $0 [-hq] [-w|r <savefile>] [-c <configfile>]\n";
 | 
				
			||||||
 exit(0);
 | 
					 exit(0);
 | 
				
			||||||
};
 | 
					};
 | 
				
			||||||
print STDERR "$0 v $ver [" . scalar(gmtime) . "]\n(c) 10/2003-10/2004 Thomas Hochstein * <thh\@inter.net>\n" if (!$options{'q'});
 | 
					print STDERR "$0 v $ver [" . scalar(gmtime) . "]\n(c) 10/2003-10/2004 Thomas Hochstein * <thh\@thh.name>\n" if (!$options{'q'});
 | 
				
			||||||
if ($options{'c'}) {
 | 
					if ($options{'c'}) {
 | 
				
			||||||
  &readconfig($options{'c'});
 | 
					  &readconfig($options{'c'});
 | 
				
			||||||
};
 | 
					};
 | 
				
			||||||
| 
						 | 
					@ -219,7 +219,7 @@ foreach $report (@reports) {
 | 
				
			||||||
 };
 | 
					 };
 | 
				
			||||||
};
 | 
					};
 | 
				
			||||||
 | 
					
 | 
				
			||||||
print "-- \n$0 v $ver [" . scalar(gmtime) . "]\n(c) 10/2003-10/2004 Thomas Hochstein * <thh\@inter.net>\n";
 | 
					print "-- \n$0 v $ver [" . scalar(gmtime) . "]\n(c) 10/2003-10/2004 Thomas Hochstein * <thh\@thh.name>\n";
 | 
				
			||||||
exit;
 | 
					exit;
 | 
				
			||||||
 | 
					
 | 
				
			||||||
# Subroutinen #########################
 | 
					# Subroutinen #########################
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Loading…
	
	Add table
		Add a link
		
	
		Reference in a new issue