@@ -1,5 +1,17 @@
Revision history for SVN-Hooks. -*- text -*-
+1.28 2015-02-18 09:33:41-02:00 America/Sao_Paulo
+
+ [Internal changes]
+
+ - Clean up module prerequisite list in dist.ini.
+
+ - Use Dist::Zilla::Plugin::MetaProvide to insert provides into META.yml.
+
+ - Replace README with brian d foy's README.pod template.
+
+ - Update documentation.
+
1.27 2014-08-09 17:04:45 America/Sao_Paulo
[Fixes]
@@ -1,4 +1,4 @@
-This software is copyright (c) 2014 by CPqD.
+This software is copyright (c) 2015 by CPqD <www.cpqd.com.br>.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
@@ -12,7 +12,7 @@ b) the "Artistic License"
--- The GNU General Public License, Version 1, February 1989 ---
-This software is Copyright (c) 2014 by CPqD.
+This software is Copyright (c) 2015 by CPqD <www.cpqd.com.br>.
This is free software, licensed under:
@@ -22,7 +22,7 @@ This is free software, licensed under:
Version 1, February 1989
Copyright (C) 1989 Free Software Foundation, Inc.
- 51 Franklin St, Suite 500, Boston, MA 02110-1335 USA
+ 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
Everyone is permitted to copy and distribute verbatim copies
of this license document, but changing it is not allowed.
@@ -272,7 +272,7 @@ That's all there is to it!
--- The Artistic License 1.0 ---
-This software is Copyright (c) 2014 by CPqD.
+This software is Copyright (c) 2015 by CPqD <www.cpqd.com.br>.
This is free software, licensed under:
@@ -1,10 +1,10 @@
-# This file was automatically generated by Dist::Zilla::Plugin::Manifest v5.008.
+# This file was automatically generated by Dist::Zilla::Plugin::Manifest v5.031.
Changes
LICENSE
MANIFEST
META.yml
Makefile.PL
-README
+README.pod
TODO
dist.ini
examples/README.txt
@@ -3,36 +3,87 @@ abstract: 'Framework for implementing Subversion hooks'
author:
- 'Gustavo L. de M. Chaves <gnustavo@cpan.org>'
build_requires:
- File::Copy: 0
- Test::More: 0
- URI::file: 0
- lib: 0
+ Config: '0'
+ File::Compare: '0'
+ File::Copy: '0'
+ Test::More: '0'
+ URI::file: '0'
+ lib: '0'
configure_requires:
- ExtUtils::MakeMaker: 6.30
+ ExtUtils::MakeMaker: '0'
dynamic_config: 0
-generated_by: 'Dist::Zilla version 5.008, CPAN::Meta::Converter version 2.133380'
+generated_by: 'Dist::Zilla version 5.031, CPAN::Meta::Converter version 2.143240'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
- version: 1.4
+ version: '1.4'
name: SVN-Hooks
+provides:
+ SVN::Hooks:
+ file: lib/SVN/Hooks.pm
+ version: '1.28'
+ SVN::Hooks::AllowLogChange:
+ file: lib/SVN/Hooks/AllowLogChange.pm
+ version: '1.28'
+ SVN::Hooks::AllowPropChange:
+ file: lib/SVN/Hooks/AllowPropChange.pm
+ version: '1.28'
+ SVN::Hooks::CheckCapability:
+ file: lib/SVN/Hooks/CheckCapability.pm
+ version: '1.28'
+ SVN::Hooks::CheckJira:
+ file: lib/SVN/Hooks/CheckJira.pm
+ version: '1.28'
+ SVN::Hooks::CheckLog:
+ file: lib/SVN/Hooks/CheckLog.pm
+ version: '1.28'
+ SVN::Hooks::CheckMimeTypes:
+ file: lib/SVN/Hooks/CheckMimeTypes.pm
+ version: '1.28'
+ SVN::Hooks::CheckProperty:
+ file: lib/SVN/Hooks/CheckProperty.pm
+ version: '1.28'
+ SVN::Hooks::CheckStructure:
+ file: lib/SVN/Hooks/CheckStructure.pm
+ version: '1.28'
+ SVN::Hooks::DenyChanges:
+ file: lib/SVN/Hooks/DenyChanges.pm
+ version: '1.28'
+ SVN::Hooks::DenyFilenames:
+ file: lib/SVN/Hooks/DenyFilenames.pm
+ version: '1.28'
+ SVN::Hooks::Generic:
+ file: lib/SVN/Hooks/Generic.pm
+ version: '1.28'
+ SVN::Hooks::JiraAcceptance:
+ file: lib/SVN/Hooks/JiraAcceptance.pm
+ version: '1.28'
+ SVN::Hooks::Mailer:
+ file: lib/SVN/Hooks/Mailer.pm
+ version: '1.28'
+ SVN::Hooks::Notify:
+ file: lib/SVN/Hooks/Notify.pm
+ version: '1.28'
+ SVN::Hooks::UpdateConfFile:
+ file: lib/SVN/Hooks/UpdateConfFile.pm
+ version: '1.28'
requires:
- Carp: 0
- Cwd: 0
- Data::Util: 0
- Exporter: 0
- File::Basename: 0
- File::Path: 0
- File::Spec::Functions: 0
- File::Temp: 0
- JIRA::Client: 0
- SVN::Look: 0
- SVN::Notify: 0
- XMLRPC::Lite: 0
- strict: 0
- warnings: 0
+ Carp: '0'
+ Cwd: '0'
+ Data::Util: '0'
+ Exporter: '0'
+ File::Basename: '0'
+ File::Path: '0'
+ File::Spec::Functions: '0'
+ File::Temp: '0'
+ JIRA::Client: '0'
+ SVN::Look: '0'
+ SVN::Notify: '0'
+ XMLRPC::Lite: '0'
+ strict: '0'
+ warnings: '0'
resources:
bugtracker: https://github.com/gnustavo/SVN-Hooks/issues
- homepage: http://search.cpan.org/dist/SVN-Hooks/
+ homepage: https://metacpan.org/release/SVN-Hooks
repository: git://github.com/gnustavo/SVN-Hooks.git
-version: 1.27
+version: '1.28'
@@ -1,20 +1,19 @@
-# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker v5.008.
+# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker v5.031.
use strict;
use warnings;
-use ExtUtils::MakeMaker 6.30;
+use ExtUtils::MakeMaker;
my %WriteMakefileArgs = (
"ABSTRACT" => "Framework for implementing Subversion hooks",
"AUTHOR" => "Gustavo L. de M. Chaves <gnustavo\@cpan.org>",
- "BUILD_REQUIRES" => {},
"CONFIGURE_REQUIRES" => {
- "ExtUtils::MakeMaker" => "6.30"
+ "ExtUtils::MakeMaker" => 0
},
"DISTNAME" => "SVN-Hooks",
"EXE_FILES" => [],
@@ -37,12 +36,14 @@ my %WriteMakefileArgs = (
"warnings" => 0
},
"TEST_REQUIRES" => {
+ "Config" => 0,
+ "File::Compare" => 0,
"File::Copy" => 0,
"Test::More" => 0,
"URI::file" => 0,
"lib" => 0
},
- "VERSION" => "1.27",
+ "VERSION" => "1.28",
"test" => {
"TESTS" => "t/*.t"
}
@@ -51,10 +52,13 @@ my %WriteMakefileArgs = (
my %FallbackPrereqs = (
"Carp" => 0,
+ "Config" => 0,
"Cwd" => 0,
"Data::Util" => 0,
"Exporter" => 0,
+ "ExtUtils::MakeMaker" => 0,
"File::Basename" => 0,
+ "File::Compare" => 0,
"File::Copy" => 0,
"File::Path" => 0,
"File::Spec::Functions" => 0,
@@ -1,26 +0,0 @@
-SVN::Hooks - Framework for implementing Subversion hooks
-
-It comes with a bunch of plugins (actually, sub-modules of SVN::Hooks)
-that implement some of the most used standalone Subversion hooks
-available, such as pre-commit hooks for enforcing:
-
- * the log message format,
- * property settings,
- * the repository structure,
- * restrictions on the modification of repository areas (e.g., /tags)
- * restrictions on filenames, and
- * the integration with ticketing systems.
-
-It also comes with post-commit hooks for
-
- * sending commit emails, and
- * updating configuration files in the server from changes made in the repository.
-
-But as a framework, it can be extended to implement all types of hooks.
-
-Copyright (c) 2008-2014 by CPqD (http://www.cpqd.com.br/)
-
-This is free software; you can redistribute it and/or modify it under
-the same terms as the Perl 5 programming language system itself.
-
-Home page: http://search.cpan.org/dist/SVN-Hooks/
@@ -0,0 +1,103 @@
+=pod
+
+=encoding utf8
+
+=head1 The SVN::Hooks module
+
+L<SVN hooks|http://svnbook.red-bean.com/nightly/en/svn.reposadmin.create.html> are
+programs you install in SVN repositories in order to augment SVN's
+functionality.
+
+The SVN::Hooks module is a framework to make it easier to implement SVN
+hooks.
+
+=head2 Documentation
+
+To read about L<SVN::Hooks>, look at the embedded documentation in the
+module itself. Inside the distribution, you can format it with
+L<perldoc|http://perldoc.perl.org/perldoc.html>:
+
+ $ perldoc lib/SVN/Hooks.pm
+
+If you have already installed the module, you can specify the module name
+instead of the file location:
+
+ $ perldoc SVN::Hooks
+
+You can read the documentation and inspect the meta data on one of the CPAN
+web interfaces, such as L<CPAN Search|http://search.cpan.org/dist/SVN-Hooks>
+or L<MetaCPAN|http://metacpan.org/release/SVN::Hooks>:
+
+=over 4
+
+=item * L<http://search.cpan.org/dist/SVN-Hooks>
+
+=item * L<http://metacpan.org/release/SVN::Hooks>
+
+=back
+
+The standard module documentation has example uses in the SYNOPSIS section,
+but you can also look in the I<examples/> directory (if it's there), or look
+at the test files in I<t/>.
+
+=head2 Installation
+
+You can install this module with a CPAN client, which will resolve
+and install the dependencies:
+
+ $ cpan SVN::Hooks
+ $ cpanm SVN::Hooks
+
+SVN::Hooks is packaged with L<Dist::Zilla>, so that you can't install it
+directly from the repository.
+
+=head2 Source location
+
+The meta data, such as the source repository and bug tracker, is in
+I<Makefile.PL> or the I<META.*> files it creates. You can find that on
+those CPAN web interfaces, but you can also look at files directly in
+the source repository:
+
+=over 4
+
+=item * L<https://github.com/gnustavo/SVN-Hooks>
+
+=back
+
+If you find a problem, file a ticket in the L<issue
+tracker|https://github.com/gnustavo/SVN-Hooks/issues>:
+
+=over 4
+
+=item * L<https://github.com/gnustavo/SVN-Hooks/issues>
+
+=back
+
+=head2 Getting help
+
+Although I'm happy to hear from module users in private email, that's the
+best way for me to forget to do something.
+
+Besides the issue trackers, you can find help at
+L<Perlmonks|http://www.perlmonks.org> or
+L<Stackoverflow|http://www.stackoverflow.com>, both of which have many
+competent Perlers who can answer your question, almost in real time. They
+might not know the particulars of this module, but they can help you
+diagnose your problem.
+
+You might like to read L<brian's Guide to Solving Any Perl
+Problem|http://archive.oreilly.com/pub/a/perl/excerpts/9780596527242/brians-guide.html>.
+
+=head2 Copyright and License
+
+You should have received a I<LICENSE> file, but the license is also noted in
+the module files. About the only thing you can't do is pretend that you
+wrote code that you didn't.
+
+=head2 Good luck!
+
+Enjoy,
+
+Gustavo Chaves, gnustavo@cpan.org
+
+=cut
@@ -3,7 +3,7 @@
name = SVN-Hooks
author = Gustavo L. de M. Chaves <gnustavo@cpan.org>
license = Perl_5
-copyright_holder = CPqD
+copyright_holder = CPqD <www.cpqd.com.br>
[GatherDir]
exclude_match = ~$
@@ -16,8 +16,14 @@ exclude_match = ~$
[NextRelease]
[@Git]
+[MetaProvides::Package]
+
[AutoPrereqs]
+[Prereqs / TestRequires]
+Config = 0
+File::Compare = 0
+
[PodWeaver]
[Git::NextVersion]
@@ -1,9 +1,6 @@
package SVN::Hooks::AllowLogChange;
-{
- $SVN::Hooks::AllowLogChange::VERSION = '1.27';
-}
# ABSTRACT: Allow changes in revision log messages.
-
+$SVN::Hooks::AllowLogChange::VERSION = '1.28';
use strict;
use warnings;
@@ -67,7 +64,7 @@ SVN::Hooks::AllowLogChange - Allow changes in revision log messages.
=head1 VERSION
-version 1.27
+version 1.28
=head1 SYNOPSIS
@@ -115,7 +112,7 @@ Gustavo L. de M. Chaves <gnustavo@cpan.org>
=head1 COPYRIGHT AND LICENSE
-This software is copyright (c) 2014 by CPqD.
+This software is copyright (c) 2015 by CPqD <www.cpqd.com.br>.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
@@ -1,9 +1,6 @@
package SVN::Hooks::AllowPropChange;
-{
- $SVN::Hooks::AllowPropChange::VERSION = '1.27';
-}
# ABSTRACT: Allow changes in revision properties.
-
+$SVN::Hooks::AllowPropChange::VERSION = '1.28';
use strict;
use warnings;
@@ -84,7 +81,7 @@ SVN::Hooks::AllowPropChange - Allow changes in revision properties.
=head1 VERSION
-version 1.27
+version 1.28
=head1 SYNOPSIS
@@ -146,7 +143,7 @@ Gustavo L. de M. Chaves <gnustavo@cpan.org>
=head1 COPYRIGHT AND LICENSE
-This software is copyright (c) 2014 by CPqD.
+This software is copyright (c) 2015 by CPqD <www.cpqd.com.br>.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
@@ -1,9 +1,6 @@
package SVN::Hooks::CheckCapability;
-{
- $SVN::Hooks::CheckCapability::VERSION = '1.27';
-}
# ABSTRACT: Check the svn client capabilities.
-
+$SVN::Hooks::CheckCapability::VERSION = '1.28';
use strict;
use warnings;
@@ -26,7 +23,7 @@ sub CHECK_CAPABILITY {
}
sub start_commit {
- my ($repo_path, $user, $capabilities) = @_;
+ my ($repo_path, $user, $capabilities, $txt_name) = @_;
$capabilities ||= ''; # pre 1.5 svn clients don't pass the capabilities
@@ -58,7 +55,7 @@ SVN::Hooks::CheckCapability - Check the svn client capabilities.
=head1 VERSION
-version 1.27
+version 1.28
=head1 SYNOPSIS
@@ -90,7 +87,7 @@ Gustavo L. de M. Chaves <gnustavo@cpan.org>
=head1 COPYRIGHT AND LICENSE
-This software is copyright (c) 2014 by CPqD.
+This software is copyright (c) 2015 by CPqD <www.cpqd.com.br>.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
@@ -1,9 +1,6 @@
package SVN::Hooks::CheckJira;
-{
- $SVN::Hooks::CheckJira::VERSION = '1.27';
-}
# ABSTRACT: Integrate Subversion with the JIRA ticketing system.
-
+$SVN::Hooks::CheckJira::VERSION = '1.28';
use strict;
use warnings;
@@ -251,7 +248,7 @@ SVN::Hooks::CheckJira - Integrate Subversion with the JIRA ticketing system.
=head1 VERSION
-version 1.27
+version 1.28
=head1 DESCRIPTION
@@ -478,7 +475,7 @@ Gustavo L. de M. Chaves <gnustavo@cpan.org>
=head1 COPYRIGHT AND LICENSE
-This software is copyright (c) 2014 by CPqD.
+This software is copyright (c) 2015 by CPqD <www.cpqd.com.br>.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
@@ -1,9 +1,6 @@
package SVN::Hooks::CheckLog;
-{
- $SVN::Hooks::CheckLog::VERSION = '1.27';
-}
# ABSTRACT: Check log messages in commits.
-
+$SVN::Hooks::CheckLog::VERSION = '1.28';
use strict;
use warnings;
@@ -62,7 +59,7 @@ SVN::Hooks::CheckLog - Check log messages in commits.
=head1 VERSION
-version 1.27
+version 1.28
=head1 SYNOPSIS
@@ -93,7 +90,7 @@ Gustavo L. de M. Chaves <gnustavo@cpan.org>
=head1 COPYRIGHT AND LICENSE
-This software is copyright (c) 2014 by CPqD.
+This software is copyright (c) 2015 by CPqD <www.cpqd.com.br>.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
@@ -1,9 +1,6 @@
package SVN::Hooks::CheckMimeTypes;
-{
- $SVN::Hooks::CheckMimeTypes::VERSION = '1.27';
-}
# ABSTRACT: Require the svn:mime-type property.
-
+$SVN::Hooks::CheckMimeTypes::VERSION = '1.28';
use strict;
use warnings;
@@ -85,7 +82,7 @@ SVN::Hooks::CheckMimeTypes - Require the svn:mime-type property.
=head1 VERSION
-version 1.27
+version 1.28
=head1 SYNOPSIS
@@ -121,7 +118,7 @@ Gustavo L. de M. Chaves <gnustavo@cpan.org>
=head1 COPYRIGHT AND LICENSE
-This software is copyright (c) 2014 by CPqD.
+This software is copyright (c) 2015 by CPqD <www.cpqd.com.br>.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
@@ -1,9 +1,6 @@
package SVN::Hooks::CheckProperty;
-{
- $SVN::Hooks::CheckProperty::VERSION = '1.27';
-}
# ABSTRACT: Check properties in added files.
-
+$SVN::Hooks::CheckProperty::VERSION = '1.28';
use strict;
use warnings;
@@ -90,7 +87,7 @@ SVN::Hooks::CheckProperty - Check properties in added files.
=head1 VERSION
-version 1.27
+version 1.28
=head1 SYNOPSIS
@@ -148,7 +145,7 @@ Gustavo L. de M. Chaves <gnustavo@cpan.org>
=head1 COPYRIGHT AND LICENSE
-This software is copyright (c) 2014 by CPqD.
+This software is copyright (c) 2015 by CPqD <www.cpqd.com.br>.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
@@ -1,9 +1,6 @@
package SVN::Hooks::CheckStructure;
-{
- $SVN::Hooks::CheckStructure::VERSION = '1.27';
-}
# ABSTRACT: Check the structure of a repository.
-
+$SVN::Hooks::CheckStructure::VERSION = '1.28';
use strict;
use warnings;
@@ -129,7 +126,7 @@ SVN::Hooks::CheckStructure - Check the structure of a repository.
=head1 VERSION
-version 1.27
+version 1.28
=head1 SYNOPSIS
@@ -274,7 +271,7 @@ Gustavo L. de M. Chaves <gnustavo@cpan.org>
=head1 COPYRIGHT AND LICENSE
-This software is copyright (c) 2014 by CPqD.
+This software is copyright (c) 2015 by CPqD <www.cpqd.com.br>.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
@@ -1,9 +1,6 @@
package SVN::Hooks::DenyChanges;
-{
- $SVN::Hooks::DenyChanges::VERSION = '1.27';
-}
# ABSTRACT: Deny some changes in a repository.
-
+$SVN::Hooks::DenyChanges::VERSION = '1.28';
use strict;
use warnings;
@@ -117,7 +114,7 @@ SVN::Hooks::DenyChanges - Deny some changes in a repository.
=head1 VERSION
-version 1.27
+version 1.28
=head1 SYNOPSIS
@@ -166,7 +163,7 @@ Gustavo L. de M. Chaves <gnustavo@cpan.org>
=head1 COPYRIGHT AND LICENSE
-This software is copyright (c) 2014 by CPqD.
+This software is copyright (c) 2015 by CPqD <www.cpqd.com.br>.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
@@ -1,9 +1,6 @@
package SVN::Hooks::DenyFilenames;
-{
- $SVN::Hooks::DenyFilenames::VERSION = '1.27';
-}
# ABSTRACT: Deny some file names.
-
+$SVN::Hooks::DenyFilenames::VERSION = '1.28';
use strict;
use warnings;
@@ -101,7 +98,7 @@ SVN::Hooks::DenyFilenames - Deny some file names.
=head1 VERSION
-version 1.27
+version 1.28
=head1 SYNOPSIS
@@ -175,7 +172,7 @@ Gustavo L. de M. Chaves <gnustavo@cpan.org>
=head1 COPYRIGHT AND LICENSE
-This software is copyright (c) 2014 by CPqD.
+This software is copyright (c) 2015 by CPqD <www.cpqd.com.br>.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
@@ -1,9 +1,6 @@
package SVN::Hooks::Generic;
-{
- $SVN::Hooks::Generic::VERSION = '1.27';
-}
# ABSTRACT: Implement generic checks for all Subversion hooks.
-
+$SVN::Hooks::Generic::VERSION = '1.28';
use strict;
use warnings;
@@ -55,7 +52,7 @@ SVN::Hooks::Generic - Implement generic checks for all Subversion hooks.
=head1 VERSION
-version 1.27
+version 1.28
=head1 SYNOPSIS
@@ -100,7 +97,7 @@ The function signatures are the following:
=item pre-unlock(repos-path, path, username, lock-token, break-unlock-flag)
-=item start-commit(repos-path, username, capabilities)
+=item start-commit(repos-path, username, capabilities, txt-name)
=back
@@ -112,7 +109,7 @@ performing the Subversion action which triggered the hook.
The sketch below shows how this directive could be used.
sub my_start_commit {
- my ($repo_path, $username, $capabilities) = @_;
+ my ($repo_path, $username, $capabilities, $txt_name) = @_;
# ...
}
@@ -132,7 +129,7 @@ Gustavo L. de M. Chaves <gnustavo@cpan.org>
=head1 COPYRIGHT AND LICENSE
-This software is copyright (c) 2014 by CPqD.
+This software is copyright (c) 2015 by CPqD <www.cpqd.com.br>.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
@@ -1,9 +1,6 @@
package SVN::Hooks::JiraAcceptance;
-{
- $SVN::Hooks::JiraAcceptance::VERSION = '1.27';
-}
# ABSTRACT: Integrate Subversion with the JIRA ticketing system.
-
+$SVN::Hooks::JiraAcceptance::VERSION = '1.28';
use strict;
use warnings;
@@ -150,7 +147,7 @@ SVN::Hooks::JiraAcceptance - Integrate Subversion with the JIRA ticketing system
=head1 VERSION
-version 1.27
+version 1.28
=head1 SYNOPSIS
@@ -221,7 +218,7 @@ Gustavo L. de M. Chaves <gnustavo@cpan.org>
=head1 COPYRIGHT AND LICENSE
-This software is copyright (c) 2014 by CPqD.
+This software is copyright (c) 2015 by CPqD <www.cpqd.com.br>.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
@@ -1,9 +1,6 @@
package SVN::Hooks::Mailer;
-{
- $SVN::Hooks::Mailer::VERSION = '1.27';
-}
# ABSTRACT: Send emails after successful commits.
-
+$SVN::Hooks::Mailer::VERSION = '1.28';
use strict;
use warnings;
@@ -50,7 +47,7 @@ SVN::Hooks::Mailer - Send emails after successful commits.
=head1 VERSION
-version 1.27
+version 1.28
=head1 SYNOPSIS
@@ -71,7 +68,7 @@ Gustavo L. de M. Chaves <gnustavo@cpan.org>
=head1 COPYRIGHT AND LICENSE
-This software is copyright (c) 2014 by CPqD.
+This software is copyright (c) 2015 by CPqD <www.cpqd.com.br>.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
@@ -1,9 +1,6 @@
package SVN::Hooks::Notify;
-{
- $SVN::Hooks::Notify::VERSION = '1.27';
-}
# ABSTRACT: Subversion activity notification.
-
+$SVN::Hooks::Notify::VERSION = '1.28';
use strict;
use warnings;
@@ -63,7 +60,7 @@ SVN::Hooks::Notify - Subversion activity notification.
=head1 VERSION
-version 1.27
+version 1.28
=head1 SYNOPSIS
@@ -121,7 +118,7 @@ Gustavo L. de M. Chaves <gnustavo@cpan.org>
=head1 COPYRIGHT AND LICENSE
-This software is copyright (c) 2014 by CPqD.
+This software is copyright (c) 2015 by CPqD <www.cpqd.com.br>.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
@@ -1,9 +1,6 @@
package SVN::Hooks::UpdateConfFile;
-{
- $SVN::Hooks::UpdateConfFile::VERSION = '1.27';
-}
# ABSTRACT: Maintain the repository configuration versioned.
-
+$SVN::Hooks::UpdateConfFile::VERSION = '1.28';
use strict;
use warnings;
@@ -277,7 +274,7 @@ SVN::Hooks::UpdateConfFile - Maintain the repository configuration versioned.
=head1 VERSION
-version 1.27
+version 1.28
=head1 SYNOPSIS
@@ -431,7 +428,7 @@ Gustavo L. de M. Chaves <gnustavo@cpan.org>
=head1 COPYRIGHT AND LICENSE
-This software is copyright (c) 2014 by CPqD.
+This software is copyright (c) 2015 by CPqD <www.cpqd.com.br>.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
@@ -1,9 +1,6 @@
package SVN::Hooks;
-{
- $SVN::Hooks::VERSION = '1.27';
-}
# ABSTRACT: Framework for implementing Subversion hooks
-
+$SVN::Hooks::VERSION = '1.28';
use strict;
use warnings;
@@ -38,10 +35,8 @@ sub run_hook {
# The configuration file must be evaluated in the main:: namespace
package main;
-{
- $main::VERSION = '1.27';
-}
- unless (my $return = do $conffile) {
+$main::VERSION = '1.28';
+unless (my $return = do $conffile) {
die "couldn't parse '$conffile': $@\n" if $@;
die "couldn't do '$conffile': $!\n" unless defined $return;
die "couldn't run '$conffile'\n" unless $return;
@@ -139,7 +134,7 @@ sub PRE_UNLOCK (&) {
return;
}
-# start-commit(repos-path, username, capabilities)
+# start-commit(repos-path, username, capabilities, txt-name)
sub START_COMMIT (&) {
my ($hook) = @_;
@@ -163,7 +158,7 @@ SVN::Hooks - Framework for implementing Subversion hooks
=head1 VERSION
-version 1.27
+version 1.28
=head1 SYNOPSIS
@@ -174,7 +169,7 @@ A single script can implement several hooks:
use SVN::Hooks;
START_COMMIT {
- my ($repo_path, $username, $capabilities) = @_;
+ my ($repo_path, $username, $capabilities, $txt_name) = @_;
# ...
};
@@ -351,7 +346,7 @@ L<SVN::Look> documentation to know how to use it.)
=item * PRE_UNLOCK(repos-path, path, username, lock-token, break-unlock-flag)
-=item * START_COMMIT(repos-path, username, capabilities)
+=item * START_COMMIT(repos-path, username, capabilities, txt-name)
=back
@@ -364,7 +359,7 @@ This is an example of a script implementing two hooks:
# ...
START_COMMIT {
- my ($repos_path, $username, $capabilities) = @_;
+ my ($repos_path, $username, $capabilities, $txt_name) = @_;
exists $committers{$username}
or die "User '$username' is not allowed to commit.\n";
@@ -560,7 +555,7 @@ called, like this:
=over
-=item * start-commit repo-path user capabilities
+=item * start-commit repo-path user capabilities txt-name
=item * pre-commit repo-path txn
@@ -585,13 +580,17 @@ the hooks, you usually call C<run_hook> like this:
run_hook($0, @ARGV);
+=head1 REPOSITORY
+
+L<https://github.com/gnustavo/SVN-Hooks>
+
=head1 AUTHOR
Gustavo L. de M. Chaves <gnustavo@cpan.org>
=head1 COPYRIGHT AND LICENSE
-This software is copyright (c) 2014 by CPqD.
+This software is copyright (c) 2015 by CPqD <www.cpqd.com.br>.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
@@ -6,7 +6,12 @@ BEGIN {
}
}
-# this test was generated with Dist::Zilla::Plugin::Test::Kwalitee 2.07
+# this test was generated with Dist::Zilla::Plugin::Test::Kwalitee 2.11
use strict;
use warnings;
-use Test::Kwalitee;
+use Test::More 0.88;
+use Test::Kwalitee 1.21 'kwalitee_ok';
+
+kwalitee_ok();
+
+done_testing;
@@ -9,14 +9,7 @@ BEGIN {
# This file was automatically generated by Dist::Zilla::Plugin::PodCoverageTests.
-use Test::More;
-
-eval "use Test::Pod::Coverage 1.08";
-plan skip_all => "Test::Pod::Coverage 1.08 required for testing POD coverage"
- if $@;
-
-eval "use Pod::Coverage::TrustPod";
-plan skip_all => "Pod::Coverage::TrustPod required for testing POD coverage"
- if $@;
+use Test::Pod::Coverage 1.08;
+use Pod::Coverage::TrustPod;
all_pod_coverage_ok({ coverage_class => 'Pod::Coverage::TrustPod' });
@@ -9,8 +9,6 @@ BEGIN {
# This file was automatically generated by Dist::Zilla::Plugin::PodSyntaxTests.
use Test::More;
-
-eval "use Test::Pod 1.41";
-plan skip_all => "Test::Pod 1.41 required for testing POD" if $@;
+use Test::Pod 1.41;
all_pod_files_ok();