Fixed some comments, put GPL copyright at top of sources.

icculus · Jan 29, 2002 · 0982384 · 0982384
1 parent a8edba0
commit 0982384
Show file tree

Hide file tree

Showing 4 changed files with 71 additions and 2 deletions.
diff --git a/IcculusFinger_archiveplans.pl b/IcculusFinger_archiveplans.pl
@@ -1,10 +1,34 @@
 #!/usr/bin/perl -w
+#-----------------------------------------------------------------------------
+#
+#  Copyright (C) 2002 Ryan C. Gordon (icculus@icculus.org)
+#
+#  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 Software Foundation; either version 2 of the License, or
+#  (at your option) any later version.
+#
+#  This program is distributed in the hope that it will be useful,
+#  but WITHOUT ANY WARRANTY; without even the implied warranty of
+#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#  GNU General Public License for more details.
+#
+#  You should have received a copy of the GNU General Public License
+#  along with this program; if not, write to the Free Software
+#  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
+#
+#-----------------------------------------------------------------------------
 
 use strict;
 use warnings;
 use DBI;
 use File::Basename;
 
+
+#-----------------------------------------------------------------------------#
+#             CONFIGURATION VARIABLES: Change to suit your needs...           #
+#-----------------------------------------------------------------------------#
+
 # The ever important debug-spew-enabler...
 my $debug = 0;
 
@@ -35,6 +59,10 @@
 my $newsauthor = 'fingermaster';
 my $newsposter = '/usr/local/bin/IcculusNews_post.pl';
 
+#-----------------------------------------------------------------------------#
+#     The rest is probably okay without you laying yer dirty mits on it.      #
+#-----------------------------------------------------------------------------#
+
 
 sub run_external_updater {
     my $u = shift;

diff --git a/IcculusFinger_daemon.pl b/IcculusFinger_daemon.pl
@@ -1,7 +1,7 @@
 #!/usr/bin/perl -w
 #-----------------------------------------------------------------------------
 #
-#  Copyright (C) 2000 Ryan C. Gordon (icculus@icculus.org)
+#  Copyright (C) 2002 Ryan C. Gordon (icculus@icculus.org)
 #
 #  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

diff --git a/IcculusFinger_planmove.pl b/IcculusFinger_planmove.pl
@@ -1,4 +1,23 @@
 #!/usr/bin/perl -w
+#-----------------------------------------------------------------------------
+#
+#  Copyright (C) 2002 Ryan C. Gordon (icculus@icculus.org)
+#
+#  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 Software Foundation; either version 2 of the License, or
+#  (at your option) any later version.
+#
+#  This program is distributed in the hope that it will be useful,
+#  but WITHOUT ANY WARRANTY; without even the implied warranty of
+#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#  GNU General Public License for more details.
+#
+#  You should have received a copy of the GNU General Public License
+#  along with this program; if not, write to the Free Software
+#  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
+#
+#-----------------------------------------------------------------------------
 
 use strict;
 use warnings;

diff --git a/IcculusFinger_webinterface.pl b/IcculusFinger_webinterface.pl
@@ -1,9 +1,32 @@
 #!/usr/bin/perl -w
+#-----------------------------------------------------------------------------
+#
+#  Copyright (C) 2000 Ryan C. Gordon (icculus@icculus.org)
+#
+#  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 Software Foundation; either version 2 of the License, or
+#  (at your option) any later version.
+#
+#  This program is distributed in the hope that it will be useful,
+#  but WITHOUT ANY WARRANTY; without even the implied warranty of
+#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#  GNU General Public License for more details.
+#
+#  You should have received a copy of the GNU General Public License
+#  along with this program; if not, write to the Free Software
+#  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
+#
+#-----------------------------------------------------------------------------
 
 use strict;
 use warnings;
 use IO::Socket;
 
+#-----------------------------------------------------------------------------#
+#             CONFIGURATION VARIABLES: Change to suit your needs...           #
+#-----------------------------------------------------------------------------#
+
 # Define which host(s) the finger request goes to. If $host == false,
 #  then users may finger any system on the Internet by specifying a hostname:
 #  user=dimwit@doofus.com, for example. Not setting $host at all like that
@@ -12,7 +35,6 @@
 #my $host = "icculus.org";  # limit queries to users @icculus.org
 my $host = $ENV{SERVER_NAME};  # This is good for VirtualHost setups.
 
-
 #-----------------------------------------------------------------------------#
 #     The rest is probably okay without you laying yer dirty mits on it.      #
 #-----------------------------------------------------------------------------#