summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lib/WWW/YNAB/UA.pm6
1 files changed, 4 insertions, 2 deletions
diff --git a/lib/WWW/YNAB/UA.pm b/lib/WWW/YNAB/UA.pm
index 8e8c980..47c9fcb 100644
--- a/lib/WWW/YNAB/UA.pm
+++ b/lib/WWW/YNAB/UA.pm
@@ -52,12 +52,14 @@ sub _request {
my $self = shift;
my ($method, $path, $params) = @_;
- warn "\U$method\E $path";
+ if (0) {
+ warn "\U$method\E $path";
+ }
my $base = $self->base_uri;
$base =~ s{/$}{};
$path =~ s{^/}{};
- my $uri = $self->base_uri . '/' . $path;
+ my $uri = "$base/$path";
my $response = $self->ua->$method(
$uri,