This is an automated email from the git hooks/post-receive script. js pushed a commit to annotated tag debian/1.163200-1 in repository libmagpie-perl.
commit 12494fe7070c5720305fa9f70421c0578761d981 Author: Kip Hampton <[email protected]> Date: Mon Nov 14 17:29:42 2016 -0800 Code cleanup, removed noisy debugging warnings. --- lib/Magpie/Resource/DBIC.pm | 7 +++---- t/dbic.t | 6 +++--- 2 files changed, 6 insertions(+), 7 deletions(-) diff --git a/lib/Magpie/Resource/DBIC.pm b/lib/Magpie/Resource/DBIC.pm index 24b6221..91c345d 100644 --- a/lib/Magpie/Resource/DBIC.pm +++ b/lib/Magpie/Resource/DBIC.pm @@ -49,7 +49,7 @@ sub _build_data_source { } catch { my $error = "Could not connect to DBIC data source: $_\n"; - warn "DOUBLE NOPE " . $error; + warn $error; $self->set_error( { status_code => 500, reason => $error } ); }; }; @@ -88,8 +88,7 @@ sub GET { return OK; } - #use Data::Dumper; - warn "got data " . p($data); + #warn "got data " . p($data); $self->data($data); return OK; @@ -108,7 +107,7 @@ sub POST { if ( $self->has_data ) { $args = $self->data; - warn "HAS DATA " . p($args); + #warn "HAS DATA " . p($args); $self->clear_data; } else { diff --git a/t/dbic.t b/t/dbic.t index 9bdfef6..aac600d 100644 --- a/t/dbic.t +++ b/t/dbic.t @@ -58,7 +58,7 @@ test_psgi my $created_url = undef; { my $res = $cb->( POST $url => \%user ); - warn "RES: " . $res->content; + #warn "RES: " . $res->content; is $res->code, 201, "correct response code"; $created_url = $res->header('Location'); @@ -84,7 +84,7 @@ test_psgi my $res2 = $cb->( GET $created_url); is $res2->code, 200, "correct GET response."; like $res2->content, qr|roy|, 'Updated JSON serialized'; - warn $res2->content; + #warn $res2->content; } else { fail "GET to follow-on URL failed." @@ -97,7 +97,7 @@ test_psgi my $res2 = $cb->( GET $created_url); is $res2->code, 404, "correct GET response for deleted entity."; - warn $res2->content; + #warn $res2->content; } -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libmagpie-perl.git _______________________________________________ Pkg-perl-cvs-commits mailing list [email protected] http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits
