r77938 - in /branches/upstream/libsvn-hooks-perl/current: Changes META.yml Makefile.PL README lib/SVN/Hooks.pm

angelabad-guest at users.alioth.debian.org angelabad-guest at users.alioth.debian.org
Thu Jul 28 08:42:24 UTC 2011


Author: angelabad-guest
Date: Thu Jul 28 08:42:23 2011
New Revision: 77938

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=77938
Log:
[svn-upgrade] new version libsvn-hooks-perl (1.02)

Modified:
    branches/upstream/libsvn-hooks-perl/current/Changes
    branches/upstream/libsvn-hooks-perl/current/META.yml
    branches/upstream/libsvn-hooks-perl/current/Makefile.PL
    branches/upstream/libsvn-hooks-perl/current/README
    branches/upstream/libsvn-hooks-perl/current/lib/SVN/Hooks.pm

Modified: branches/upstream/libsvn-hooks-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsvn-hooks-perl/current/Changes?rev=77938&op=diff
==============================================================================
--- branches/upstream/libsvn-hooks-perl/current/Changes (original)
+++ branches/upstream/libsvn-hooks-perl/current/Changes Thu Jul 28 08:42:23 2011
@@ -1,4 +1,11 @@
 Revision history for SVN-Hooks. -*- text -*-
+
+1.02	2011-07-27
+
+	Porting Makefile.PL to Windows.
+	Adjusting dependency from SVN::Look version.
+	Supporting absolute file names for SVN::Hooks configuration files.
+	Adding URI::file to the dependencies.
 
 1.01	2011-07-21
 

Modified: branches/upstream/libsvn-hooks-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsvn-hooks-perl/current/META.yml?rev=77938&op=diff
==============================================================================
--- branches/upstream/libsvn-hooks-perl/current/META.yml (original)
+++ branches/upstream/libsvn-hooks-perl/current/META.yml Thu Jul 28 08:42:23 2011
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:               SVN-Hooks
-version:            1.01
+version:            1.02
 abstract:           A framework for implementing Subversion hooks.
 author:
     - Gustavo Chaves <gnustavo at cpan.org>
@@ -15,9 +15,10 @@
     Email::Simple:        0
     Email::Simple::Creator:  0
     JIRA::Client:         0
-    SVN::Look:            0
+    SVN::Look:            0.21
     SVN::Notify:          0
     Test::More:           0
+    URI::file:            0
     XMLRPC::Lite:         0
 no_index:
     directory:

Modified: branches/upstream/libsvn-hooks-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsvn-hooks-perl/current/Makefile.PL?rev=77938&op=diff
==============================================================================
--- branches/upstream/libsvn-hooks-perl/current/Makefile.PL (original)
+++ branches/upstream/libsvn-hooks-perl/current/Makefile.PL Thu Jul 28 08:42:23 2011
@@ -1,11 +1,14 @@
 use strict;
 use warnings;
+use File::Spec::Functions;
 use ExtUtils::MakeMaker qw(WriteMakefile prompt);
 use IO::Socket ();
 use Getopt::Long  qw(GetOptions);
 
 # clean up the testing flag files.
-unlink('t/online.enabled', 't/author.enabled');
+my $t_online = catfile('t', 'online.enabled');
+my $t_author = catfile('t', 'author.enabled');
+unlink($t_online, $t_author);
 
 my $usage        = "$0 [--online-tests] [--author-tests]\n";
 my $online_tests = 0;
@@ -37,28 +40,31 @@
 }
 
 if ($online_tests) {
-    open(ENABLED, ">t/online.enabled") or die "Can't touch ./t/online.enabled: $!";
-    close(ENABLED)                     or die "Can't touch ./t/online.enabled: $!";
+    open(ENABLED, '>', $t_online) or die "Can't touch $t_online: $!\n";
+    close(ENABLED)                or die "Can't touch $t_online: $!\n";
 }
 
 if ($author_tests) {
-    open(ENABLED, ">t/author.enabled") or die "Can't touch ./t/author.enabled: $!";
-    close(ENABLED)                     or die "Can't touch ./t/author.enabled: $!";
+    open(ENABLED, '>', $t_author) or die "Can't touch $t_author: $!\n";
+    close(ENABLED)                or die "Can't touch $t_author: $!\n";
 }
+
+my $hooks_pm = catfile('lib', 'SVN', 'Hooks.pm');
 
 WriteMakefile(
     NAME                => 'SVN::Hooks',
     AUTHOR              => 'Gustavo Chaves <gnustavo at cpan.org>',
-    VERSION_FROM        => 'lib/SVN/Hooks.pm',
-    ABSTRACT_FROM       => 'lib/SVN/Hooks.pm',
+    VERSION_FROM        => $hooks_pm,
+    ABSTRACT_FROM       => $hooks_pm,
     PL_FILES            => {},
     PREREQ_PM => {
 	'Email::Send'   => 0,
 	'Email::Simple' => 0,
 	'Email::Simple::Creator' => 0,
-	'SVN::Look'     => 0,
+	'SVN::Look'     => '0.21',
 	'SVN::Notify'   => 0,
         'Test::More'    => 0,
+	'URI::file'     => 0,
 	'XMLRPC::Lite'  => 0,
 	'JIRA::Client'  => 0,
     },

Modified: branches/upstream/libsvn-hooks-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsvn-hooks-perl/current/README?rev=77938&op=diff
==============================================================================
--- branches/upstream/libsvn-hooks-perl/current/README (original)
+++ branches/upstream/libsvn-hooks-perl/current/README Thu Jul 28 08:42:23 2011
@@ -1,6 +1,6 @@
 Name:    SVN-Hooks
 What:    Framework for Subversion hooks
-Version: 1.01
+Version: 1.02
 Author:  Gustavo Chaves <gnustavo at cpan.org>
 
 SVN-Hooks is a framework for creating Subversion hooks

Modified: branches/upstream/libsvn-hooks-perl/current/lib/SVN/Hooks.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsvn-hooks-perl/current/lib/SVN/Hooks.pm?rev=77938&op=diff
==============================================================================
--- branches/upstream/libsvn-hooks-perl/current/lib/SVN/Hooks.pm (original)
+++ branches/upstream/libsvn-hooks-perl/current/lib/SVN/Hooks.pm Thu Jul 28 08:42:23 2011
@@ -18,11 +18,11 @@
 
 =head1 VERSION
 
-Version 1.01
+Version 1.02
 
 =cut
 
-our $VERSION = '1.01';
+our $VERSION = '1.02';
 
 our @Conf_Files = (catfile('conf', 'svn-hooks.conf'));
 our $Repo       = undef;
@@ -39,7 +39,7 @@
 
     # Reload all configuration files
     foreach my $conf (@Conf_Files) {
-	my $conffile = catfile($Repo, $conf);
+	my $conffile = file_name_is_absolute($conf) ? $conf : catfile($Repo, $conf);
 	next unless -e $conffile; # Configuration files are optional
 	package main;
 	unless (my $return = do $conffile) {




More information about the Pkg-perl-cvs-commits mailing list