r33143 - in /trunk/libsvn-hooks-perl: ./ debian/ lib/SVN/ lib/SVN/Hooks/ t/

angelabad-guest at users.alioth.debian.org angelabad-guest at users.alioth.debian.org
Mon Apr 13 13:07:19 UTC 2009 

Author: angelabad-guest
Date: Mon Apr 13 13:07:14 2009
New Revision: 33143

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=33143
Log:
New upstream release 0.16.52

Added:
    trunk/libsvn-hooks-perl/lib/SVN/Hooks/AllowPropChange.pm
      - copied unchanged from r33142, branches/upstream/libsvn-hooks-perl/current/lib/SVN/Hooks/AllowPropChange.pm
    trunk/libsvn-hooks-perl/t/02-allowpropchange.t
      - copied unchanged from r33142, branches/upstream/libsvn-hooks-perl/current/t/02-allowpropchange.t
Modified:
    trunk/libsvn-hooks-perl/Changes
    trunk/libsvn-hooks-perl/MANIFEST
    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/AllowLogChange.pm
    trunk/libsvn-hooks-perl/lib/SVN/Hooks/CheckProperty.pm
    trunk/libsvn-hooks-perl/lib/SVN/Hooks/CheckStructure.pm
    trunk/libsvn-hooks-perl/t/00-load.t

Modified: trunk/libsvn-hooks-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsvn-hooks-perl/Changes?rev=33143&op=diff
==============================================================================
--- trunk/libsvn-hooks-perl/Changes (original)
+++ trunk/libsvn-hooks-perl/Changes Mon Apr 13 13:07:14 2009
@@ -1,4 +1,12 @@
 Revision history for SVN-Hooks. -*- text -*-
+
+0.16    2009-04-12
+
+	Implements the AllowPropChange plugin.
+
+	Better document the CheckProperty plugin.
+
+	Accepts relative paths in CHECK_STRUCTURE. 
 
 0.15    2009-03-12
 

Modified: trunk/libsvn-hooks-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsvn-hooks-perl/MANIFEST?rev=33143&op=diff
==============================================================================
--- trunk/libsvn-hooks-perl/MANIFEST (original)
+++ trunk/libsvn-hooks-perl/MANIFEST Mon Apr 13 13:07:14 2009
@@ -2,6 +2,7 @@
 Changes
 lib/SVN/Hooks.pm
 lib/SVN/Hooks/AllowLogChange.pm
+lib/SVN/Hooks/AllowPropChange.pm
 lib/SVN/Hooks/CheckLog.pm
 lib/SVN/Hooks/CheckMimeTypes.pm
 lib/SVN/Hooks/CheckProperty.pm
@@ -18,11 +19,12 @@
 README
 t/00-load.t
 t/02-allowlogchange.t
+t/02-allowpropchange.t
 t/02-checklog.t
 t/02-checkmimetypes.t
 t/02-checkproperty.t
+t/02-checkstructurealone.t
 t/02-checkstructure.t
-t/02-checkstructurealone.t
 t/02-denychanges.t
 t/02-denyfilenames.t
 t/02-jiraacceptance.t

Modified: trunk/libsvn-hooks-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsvn-hooks-perl/META.yml?rev=33143&op=diff
==============================================================================
--- trunk/libsvn-hooks-perl/META.yml (original)
+++ trunk/libsvn-hooks-perl/META.yml Mon Apr 13 13:07:14 2009
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:                SVN-Hooks
-version:             0.15.41
+version:             0.16.52
 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=33143&op=diff
==============================================================================
--- trunk/libsvn-hooks-perl/README (original)
+++ trunk/libsvn-hooks-perl/README Mon Apr 13 13:07:14 2009
@@ -1,6 +1,6 @@
 Name:    SVN-Hooks
 What:    Framework for Subversion hooks
-Version: 0.15
+Version: 0.16
 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=33143&op=diff
==============================================================================
--- trunk/libsvn-hooks-perl/debian/changelog (original)
+++ trunk/libsvn-hooks-perl/debian/changelog Mon Apr 13 13:07:14 2009
@@ -1,3 +1,9 @@
+libsvn-hooks-perl (0.16.52-1) unstable; urgency=low
+
+  * New upstream release
+
+ -- Angel Abad (Ikusnet SLL) <angel at grupoikusnet.com>  Mon, 13 Apr 2009 14:56:39 +0200
+
 libsvn-hooks-perl (0.15.41-1) unstable; urgency=low
 
   [ Angel Abad (Ikusnet SLL) ]

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=33143&op=diff
==============================================================================
--- trunk/libsvn-hooks-perl/lib/SVN/Hooks.pm (original)
+++ trunk/libsvn-hooks-perl/lib/SVN/Hooks.pm Mon Apr 13 13:07:14 2009
@@ -15,11 +15,11 @@
 
 =head1 VERSION
 
-Version 0.15
+Version 0.16
 
 =cut
 
-our $VERSION = '0.15.' . (q$Revision: 41 $ =~ / (\d+) /)[0]; # bump from 38
+our $VERSION = '0.16.' . (q$Revision: 52 $ =~ / (\d+) /)[0]; # bump from 48
 
 =head1 SYNOPSIS
 

Modified: trunk/libsvn-hooks-perl/lib/SVN/Hooks/AllowLogChange.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsvn-hooks-perl/lib/SVN/Hooks/AllowLogChange.pm?rev=33143&op=diff
==============================================================================
--- trunk/libsvn-hooks-perl/lib/SVN/Hooks/AllowLogChange.pm (original)
+++ trunk/libsvn-hooks-perl/lib/SVN/Hooks/AllowLogChange.pm Mon Apr 13 13:07:14 2009
@@ -18,6 +18,8 @@
 
 This SVN::Hooks plugin is used to allow revision log changes by some
 users.
+
+It's deprecated. You should use SVN::Hooks::AllowPropChange instead.
 
 It's active in the C<pre-revprop-change> hook.
 

Modified: trunk/libsvn-hooks-perl/lib/SVN/Hooks/CheckProperty.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsvn-hooks-perl/lib/SVN/Hooks/CheckProperty.pm?rev=33143&op=diff
==============================================================================
--- trunk/libsvn-hooks-perl/lib/SVN/Hooks/CheckProperty.pm (original)
+++ trunk/libsvn-hooks-perl/lib/SVN/Hooks/CheckProperty.pm Mon Apr 13 13:07:14 2009
@@ -34,8 +34,30 @@
 The PROPERTY argument is the name of the property that must be set for
 the files matching WHERE.
 
-The VALUE argument is an optional STRING. Use it to require a specific
-value for PROPERTY.
+The optional VALUE argument specifies the value for PROPERTY depending
+on its type:
+
+=over
+
+=item UNDEF or not present
+
+The PROPERTY must be set.
+
+=item NUMBER
+
+If non-zero, the PROPERTY must be set. If zero, the PROPERTY must NOT be set.
+
+=item STRING
+
+The PROPERTY must be set with a value equal to the string.
+
+=item qr/Regexp/
+
+The PROPERTY must be set with a value that matches the Regexp.
+
+=back
+
+Example:
 
 	CHECK_PROPERTY(qr/\.(?:do[ct]|od[bcfgimpst]|ot[ghpst]|pp[st]|xl[bst])$/i
 	       => 'svn:needs-lock');

Modified: trunk/libsvn-hooks-perl/lib/SVN/Hooks/CheckStructure.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsvn-hooks-perl/lib/SVN/Hooks/CheckStructure.pm?rev=33143&op=diff
==============================================================================
--- trunk/libsvn-hooks-perl/lib/SVN/Hooks/CheckStructure.pm (original)
+++ trunk/libsvn-hooks-perl/lib/SVN/Hooks/CheckStructure.pm Mon Apr 13 13:07:14 2009
@@ -214,7 +214,7 @@
 SVN::Hooks::CheckStructure exports a function to allow for the
 verification of path structures outside the context of a Subversion
 hook. (It would probably be better to take this function to its own
-module and use that module here.)
+module and use that module here. We'll take care of that eventually.)
 
 The function check_structure takes two arguments. The first is a
 STRUCT_DEF exactly the same as specified for the CHECK_STRUCTURE
@@ -224,13 +224,19 @@
 The function returns true if the check succeeds and dies with a proper
 message otherwise.
 
+The funcion is intended to check paths as they're shown by the 'svn
+ls' command, i.e., with no leading slashes and with a trailing slash
+to indicate directories. The leading slash is assumed if it's missing,
+but the trailing slash is needed to indicate directories.
+
 =cut
 
 sub check_structure {
     my ($structure, $path) = @_;
+    $path = "/$path" unless $path =~ m@^/@; # make sure it's an absolute path
     my @path = split '/', $path, -1; # preserve trailing empty components
     my ($code, $error) = _check_structure($structure, \@path);
-    die "$path: $error\n" if $code == 0;
+    die "$error: $path\n" if $code == 0;
     1;
 }
 
@@ -298,7 +304,7 @@
 
 =head1 COPYRIGHT & LICENSE
 
-Copyright 2008 CPqD, all rights reserved.
+Copyright 2008-2009 CPqD, all rights reserved.
 
 This program is free software; you can redistribute it and/or modify
 it under the same terms as Perl itself.

Modified: trunk/libsvn-hooks-perl/t/00-load.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsvn-hooks-perl/t/00-load.t?rev=33143&op=diff
==============================================================================
--- trunk/libsvn-hooks-perl/t/00-load.t (original)
+++ trunk/libsvn-hooks-perl/t/00-load.t Mon Apr 13 13:07:14 2009
@@ -15,14 +15,17 @@
 my $t = reset_repo();
 
 set_hook(<<'EOS');
-use SVN::Hooks::CheckMimeTypes;
-use SVN::Hooks::DenyChanges;
+use SVN::Hooks::AllowLogChange;
+use SVN::Hooks::AllowPropChange;
+use SVN::Hooks::CheckLog;
 use SVN::Hooks::CheckMimeTypes;
 use SVN::Hooks::CheckProperty;
 use SVN::Hooks::CheckStructure;
+use SVN::Hooks::DenyChanges;
 use SVN::Hooks::DenyFilenames;
 use SVN::Hooks::JiraAcceptance;
 use SVN::Hooks::Mailer;
+use SVN::Hooks::Notify;
 use SVN::Hooks::UpdateConfFile;
 EOS

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