Author: ranger
Date: Thu Feb 14 20:17:27 2008
New Revision: 1127

URL: 
http://svn.finkproject.org/websvn/listing.php?sc=1&rev=1127&repname=user%3a+ranger
Log:
rework the maintainers and revision

Modified:
    trunk/experimental/scripts/tree-diff.pl   (contents, props changed)

Modified: trunk/experimental/scripts/tree-diff.pl
URL: 
http://svn.finkproject.org/websvn/diff.php?path=/trunk/experimental/scripts/tree-diff.pl&rev=1127&repname=user%3a+ranger
==============================================================================
--- trunk/experimental/scripts/tree-diff.pl (original)
+++ trunk/experimental/scripts/tree-diff.pl Thu Feb 14 20:17:27 2008
@@ -22,10 +22,15 @@
        $TREE
        $TREE_FILES
 
+       $REVISION
+       $MAINTAINERS
+
        $FROM_FILES
        $TO_FILES
        $ALL_FILES
 );
+
+($REVISION) = q$Revision$ =~ /(\d+)/;
 
 $HANDLE = IO::Handle->new();
 $OUTPUT = IO::Handle->new();
@@ -85,7 +90,15 @@
                while (<$HANDLE>) {
                        $text .= $_;
                        if (/^\s*maintainer\s*:\s*\'?\"?([^\<]+?)\'?\"?\s*</i) {
-                               push(@categories, "Maintained By $1|$1") if 
(defined $1 and $1 !~ /^\s*$/);
+                               if (defined $1 and $1 !~ /^\s*$/) {
+                                       $maintainer = $1;
+                                       if (exists 
$MAINTAINERS->{lc($maintainer)}) {
+                                               $maintainer = 
$MAINTAINERS->{lc($maintainer)};
+                                       } else {
+                                               $MAINTAINERS->{lc($maintainer)} 
= $maintainer;
+                                       }
+                                       push(@categories, "Maintained By 
$maintainer|$maintainer");
+                               }
                        }
                }
                close($HANDLE);
@@ -128,7 +141,7 @@
     <title>$file</title>
     <id>$ID</id>
     <revision>
-      <id>3</id>
+      <id>$REVISION</id>
       <timestamp>2008-02-14T16:52:31Z</timestamp>
       <contributor>
         <ip>24.225.84.3</ip>

Propchange: trunk/experimental/scripts/tree-diff.pl
------------------------------------------------------------------------------
    svn:keywords = Revision


-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Fink-commits mailing list
Fink-commits@lists.sourceforge.net
http://news.gmane.org/gmane.os.apple.fink.cvs

Reply via email to