[Catalyst-commits] r9007 - in
Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk: .
lib/Catalyst/Authentication/Credential/HTTP t
t0m at dev.catalyst.perl.org
t0m at dev.catalyst.perl.org
Sun Jan 4 21:43:10 GMT 2009
Author: t0m
Date: 2009-01-04 21:43:10 +0000 (Sun, 04 Jan 2009)
New Revision: 9007
Added:
Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/.shipit
Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/t/pod_spelling.t
Modified:
Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/Changes
Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/MANIFEST
Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/Makefile.PL
Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/lib/Catalyst/Authentication/Credential/HTTP/Proxy.pm
Log:
Checking in changes prior to tagging of version 0.05. Changelog diff is:
=== Changes
==================================================================
--- Changes (revision 8586)
+++ Changes (local)
@@ -1,3 +1,9 @@
+0.05 2009-01-04
+ - Start releasing using ShipIt
+ - Remove use of _config accessor, which I'd stupidly cargo-culted.
+ - Fix MANIFEST
+ - Add pod spelling test
+
0.04 2008-09-25
- Change namespace to remove ::Plugin:: for new auth framework.
- Gutted most of the code in the module by subclassing
Added: Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/.shipit
===================================================================
--- Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/.shipit (rev 0)
+++ Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/.shipit 2009-01-04 21:43:10 UTC (rev 9007)
@@ -0,0 +1,9 @@
+# auto-generated shipit config file.
+steps = FindVersion, ChangeVersion, CheckChangeLog, DistTest, Commit, Tag, MakeDist, UploadCPAN
+
+svk.tagpattern = //mirror/Catalyst-Authentication-Credential-HTTP-Proxy/1.000/tags/%v
+
+# svn.tagpattern = MyProj-%v
+# svn.tagpattern = http://code.example.com/svn/tags/MyProj-%v
+
+CheckChangeLog.files = Changes
Modified: Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/Changes
===================================================================
--- Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/Changes 2009-01-04 21:32:48 UTC (rev 9006)
+++ Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/Changes 2009-01-04 21:43:10 UTC (rev 9007)
@@ -1,3 +1,9 @@
+0.05 2009-01-04
+ - Start releasing using ShipIt
+ - Remove use of _config accessor, which I'd stupidly cargo-culted.
+ - Fix MANIFEST
+ - Add pod spelling test
+
0.04 2008-09-25
- Change namespace to remove ::Plugin:: for new auth framework.
- Gutted most of the code in the module by subclassing
Modified: Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/MANIFEST
===================================================================
--- Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/MANIFEST 2009-01-04 21:32:48 UTC (rev 9006)
+++ Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/MANIFEST 2009-01-04 21:43:10 UTC (rev 9007)
@@ -12,6 +12,7 @@
inc/Module/Install/WriteAll.pm
lib/Catalyst/Authentication/Credential/HTTP/Proxy.pm
lib/Catalyst/Authentication/Credential/HTTP/Proxy/User.pm
+lib/Catalyst/Authentication/Credential/HTTP/User.pm
Makefile.PL
MANIFEST This list of files
META.yml
@@ -21,4 +22,5 @@
t/mock.t
t/pod.t
t/pod_coverage.t
+t/pod_spelling.t
t/use.t
Modified: Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/Makefile.PL
===================================================================
--- Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/Makefile.PL 2009-01-04 21:32:48 UTC (rev 9006)
+++ Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/Makefile.PL 2009-01-04 21:43:10 UTC (rev 9007)
@@ -5,7 +5,7 @@
requires 'Catalyst::Runtime';
requires 'Catalyst::Plugin::Authentication';
-requires 'Catalyst::Authentication::Credential::HTTP' => '1.005';
+requires 'Catalyst::Authentication::Credential::HTTP' => '1.009';
requires 'LWP::Simple';
build_requires 'Test::MockObject';
build_requires 'Test::Exception';
Modified: Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/lib/Catalyst/Authentication/Credential/HTTP/Proxy.pm
===================================================================
--- Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/lib/Catalyst/Authentication/Credential/HTTP/Proxy.pm 2009-01-04 21:32:48 UTC (rev 9006)
+++ Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/lib/Catalyst/Authentication/Credential/HTTP/Proxy.pm 2009-01-04 21:43:10 UTC (rev 9007)
@@ -8,12 +8,16 @@
use URI::Escape ();
use Catalyst::Authentication::Credential::HTTP::Proxy::User;
-our $VERSION = "0.04";
+our $VERSION = "0.05";
+__PACKAGE__->mk_accessors(qw/
+ url
+/);
+
sub init {
my ($self) = @_;
- my $type = $self->_config->{'type'} ||= 'basic';
+ my $type = $self->type || 'basic';
if (!$self->_config->{url}) {
Catalyst::Exception->throw(__PACKAGE__ . " configuration does not include a 'url' key, cannot proceed");
@@ -22,6 +26,7 @@
if (!grep /^$type$/, ('basic')) {
Catalyst::Exception->throw(__PACKAGE__ . " used with unsupported authentication type: " . $type);
}
+ $self->type($type);
}
sub authenticate_basic {
@@ -34,7 +39,7 @@
if ( my ( $user, $password ) = $headers->authorization_basic ) {
my $ua = Catalyst::Authentication::Credential::HTTP::Proxy::User->new;
$ua->credentials($user, $password);
- my $resp = $ua->get($self->_config->{url});
+ my $resp = $ua->get($self->url);
if ( $resp->is_success ) {
# Config username_field TODO
my $user_obj = $realm->find_user( { username => $user }, $c);
@@ -57,6 +62,8 @@
}
}
+1;
+
__END__
=pod
@@ -102,7 +109,7 @@
=head1 DESCRIPTION
-This moduule lets you use HTTP Proxy authentication with
+This module lets you use HTTP Proxy authentication with
L<Catalyst::Plugin::Authentication>.
Currently this module only supports the Basic scheme, but upon request Digest
Added: Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/t/pod_spelling.t
===================================================================
--- Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/t/pod_spelling.t (rev 0)
+++ Catalyst-Authentication-Credential-HTTP-Proxy/1.000/trunk/t/pod_spelling.t 2009-01-04 21:43:10 UTC (rev 9007)
@@ -0,0 +1,25 @@
+use strict;
+use warnings;
+use Test::More;
+
+eval 'use Test::Spelling 0.11';
+plan skip_all => 'Test::Spelling 0.11 not installed' if $@;
+plan skip_all => 'set TEST_SPELLING to enable this test' unless $ENV{TEST_SPELLING};
+
+set_spell_cmd('aspell list');
+
+add_stopwords(<DATA>);
+
+all_pod_files_spelling_ok();
+
+__DATA__
+Initializes
+Doran
+Ramberg
+Catlayst
+url
+username
+auth
+authorization
+init
+
More information about the Catalyst-commits
mailing list