r54057 - in /trunk/libsvn-hooks-perl: Changes META.yml README debian/changelog lib/SVN/Hooks.pm lib/SVN/Hooks/DenyChanges.pm t/02-denychanges.t
franck at users.alioth.debian.org
franck at users.alioth.debian.org
Wed Mar 10 23:34:45 UTC 2010
Author: franck
Date: Wed Mar 10 23:34:40 2010
New Revision: 54057
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=54057
Log:
Importing new upstream release into trunk.
Modified:
trunk/libsvn-hooks-perl/Changes
trunk/libsvn-hooks-perl/META.yml
trunk/libsvn-hooks-perl/README
trunk/libsvn-hooks-perl/debian/changelog
trunk/libsvn-hooks-perl/lib/SVN/Hooks.pm
trunk/libsvn-hooks-perl/lib/SVN/Hooks/DenyChanges.pm
trunk/libsvn-hooks-perl/t/02-denychanges.t
Modified: trunk/libsvn-hooks-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsvn-hooks-perl/Changes?rev=54057&op=diff
==============================================================================
--- trunk/libsvn-hooks-perl/Changes (original)
+++ trunk/libsvn-hooks-perl/Changes Wed Mar 10 23:34:40 2010
@@ -1,8 +1,13 @@
Revision history for SVN-Hooks. -*- text -*-
+0.27 2010-03-09
+
+ Substitutes DENY_EXCEPT_USERS for DENY_EXEMPT_USERS.
+ (My wife asked me to change it.)
+
0.26 2010-03-08
- Implements the DENY_EXEMP_USERS directive in DenyChanges.
+ Implements the DENY_EXEMPT_USERS directive in DenyChanges.
0.25 2010-01-19
Modified: trunk/libsvn-hooks-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsvn-hooks-perl/META.yml?rev=54057&op=diff
==============================================================================
--- trunk/libsvn-hooks-perl/META.yml (original)
+++ trunk/libsvn-hooks-perl/META.yml Wed Mar 10 23:34:40 2010
@@ -1,6 +1,6 @@
--- #YAML:1.0
name: SVN-Hooks
-version: 0.26
+version: 0.27
abstract: A framework for implementing Subversion hooks.
license: ~
author:
Modified: trunk/libsvn-hooks-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsvn-hooks-perl/README?rev=54057&op=diff
==============================================================================
--- trunk/libsvn-hooks-perl/README (original)
+++ trunk/libsvn-hooks-perl/README Wed Mar 10 23:34:40 2010
@@ -1,6 +1,6 @@
Name: SVN-Hooks
What: Framework for Subversion hooks
-Version: 0.26
+Version: 0.27
Author: Gustavo Chaves <gnustavo at cpan.org>
SVN-Hooks is a framework for creating Subversion hooks
Modified: trunk/libsvn-hooks-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsvn-hooks-perl/debian/changelog?rev=54057&op=diff
==============================================================================
--- trunk/libsvn-hooks-perl/debian/changelog (original)
+++ trunk/libsvn-hooks-perl/debian/changelog Wed Mar 10 23:34:40 2010
@@ -1,4 +1,4 @@
-libsvn-hooks-perl (0.26-1) unstable; urgency=low
+libsvn-hooks-perl (0.27-1) UNRELEASED; urgency=low
* New upstream release
* Standards-Version 3.8.4 (no changes)
Modified: trunk/libsvn-hooks-perl/lib/SVN/Hooks.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsvn-hooks-perl/lib/SVN/Hooks.pm?rev=54057&op=diff
==============================================================================
--- trunk/libsvn-hooks-perl/lib/SVN/Hooks.pm (original)
+++ trunk/libsvn-hooks-perl/lib/SVN/Hooks.pm Wed Mar 10 23:34:40 2010
@@ -15,11 +15,11 @@
=head1 VERSION
-Version 0.26
+Version 0.27
=cut
-our $VERSION = '0.26';
+our $VERSION = '0.27';
=head1 SYNOPSIS
Modified: trunk/libsvn-hooks-perl/lib/SVN/Hooks/DenyChanges.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsvn-hooks-perl/lib/SVN/Hooks/DenyChanges.pm?rev=54057&op=diff
==============================================================================
--- trunk/libsvn-hooks-perl/lib/SVN/Hooks/DenyChanges.pm (original)
+++ trunk/libsvn-hooks-perl/lib/SVN/Hooks/DenyChanges.pm Wed Mar 10 23:34:40 2010
@@ -7,7 +7,7 @@
use Exporter qw/import/;
my $HOOK = 'DENY_CHANGES';
-my @HOOKS = ('DENY_ADDITION', 'DENY_DELETION', 'DENY_UPDATE', 'DENY_EXEMPT_USERS');
+my @HOOKS = ('DENY_ADDITION', 'DENY_DELETION', 'DENY_UPDATE', 'DENY_EXCEPT_USERS');
our @EXPORT = @HOOKS;
our $VERSION = $SVN::Hooks::VERSION;
@@ -51,7 +51,7 @@
This directive receives a list of user names which are to be exempt
from the rules specified by the other directives.
- DENY_EXEMPT_USERS(qw/john mary/);
+ DENY_EXCEPT_USERS(qw/john mary/);
This rule exempts users C<john> and C<mary> from the other deny rules.
@@ -87,13 +87,13 @@
return _deny_change(update => @args);
}
-sub DENY_EXEMPT_USERS {
+sub DENY_EXCEPT_USERS {
my @users = @_;
my $conf = $SVN::Hooks::Confs->{$HOOK};
foreach my $user (@users) {
- croak "DENY_EXEMPT_USERS: all arguments must be strings\n"
+ croak "DENY_EXCEPT_USERS: all arguments must be strings\n"
if ref $user;
- $conf->{exempt}{$user} = undef;
+ $conf->{except}{$user} = undef;
}
return 1;
@@ -104,15 +104,15 @@
add => [],
delete => [],
update => [],
- exempt => {},
+ except => {},
};
};
sub pre_commit {
my ($self, $svnlook) = @_;
- # Exempt users
- return if %{$self->{exempt}} && exists $self->{exempt}{$svnlook->author()};
+ # Except users
+ return if %{$self->{except}} && exists $self->{except}{$svnlook->author()};
my @errors;
Modified: trunk/libsvn-hooks-perl/t/02-denychanges.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsvn-hooks-perl/t/02-denychanges.t?rev=54057&op=diff
==============================================================================
--- trunk/libsvn-hooks-perl/t/02-denychanges.t (original)
+++ trunk/libsvn-hooks-perl/t/02-denychanges.t Wed Mar 10 23:34:40 2010
@@ -88,10 +88,10 @@
set_conf(<<"EOS");
DENY_ADDITION(qr/add/);
-DENY_EXEMPT_USERS($author);
+DENY_EXCEPT_USERS($author);
EOS
-work_ok('exempt user', <<"EOS");
+work_ok('except user', <<"EOS");
touch $t/wc/add
svn add -q --no-auto-props $t/wc/add
svn ci -mx $t/wc/add
More information about the Pkg-perl-cvs-commits
mailing list