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