SF.net SVN: geany:[4150] trunk/scripts/changelist.pl

[ntrel at users.sourceforge.net]

Revision: 4150
          http://geany.svn.sourceforge.net/geany/?rev=4150&view=rev
Author:   ntrel
Date:     2009-09-04 11:21:29 +0000 (Fri, 04 Sep 2009)

Log Message:
-----------
Minor edits: list FSF, use $0 for scriptname.

Modified Paths:
--------------
    trunk/scripts/changelist.pl

Modified: trunk/scripts/changelist.pl
===================================================================
--- trunk/scripts/changelist.pl	2009-09-03 12:14:58 UTC (rev 4149)
+++ trunk/scripts/changelist.pl	2009-09-04 11:21:29 UTC (rev 4150)
@@ -1,6 +1,6 @@
 #!/usr/bin/env perl
 # Copyright:	2008-2009, Nick Treleaven
-# License:		GNU GPL V2 or later
+# License:		GNU GPL V2 or later, as published by the Free Software Foundation, USA.
 # Warranty:		NONE
 
 # Searches a ChangeLog file for a line matching 'matchstring', then matches
@@ -24,12 +24,11 @@
 use strict;
 use warnings;
 
-my $scriptname = "changelist.pl";
 my $argc = $#ARGV + 1;
 
 ($argc == 2) or die <<END;
 Usage:
-$scriptname matchstring changelogfile >outfile
+$0 matchstring changelogfile >outfile
 
   matchstring is not case sensitive.
 END


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.