===================================================================
RCS file: /cvs/HOPE/Net-OpenAMD/lib/Net/OpenAMD.pm,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -r1.9 -r1.10
--- HOPE/Net-OpenAMD/lib/Net/OpenAMD.pm	2010/06/27 04:45:07	1.9
+++ HOPE/Net-OpenAMD/lib/Net/OpenAMD.pm	2010/06/27 04:59:32	1.10
@@ -1,6 +1,6 @@
 package Net::OpenAMD;
 
-# $AFresh1: OpenAMD.pm,v 1.8 2010/06/27 03:23:27 andrew Exp $
+# $AFresh1: OpenAMD.pm,v 1.9 2010/06/27 03:45:07 andrew Exp $
 
 use warnings;
 use strict;
@@ -8,7 +8,7 @@
 
 use version; our $VERSION = qv('0.0.1');
 
-my $BASE_URL = 'https://api.hope.net/api/';
+my $BASE_URI = 'https://api.hope.net/api/';
 
 use Scalar::Util qw( refaddr );
 *_ident = \&refaddr;
@@ -20,7 +20,7 @@
 
 {
 
-    my @attr_refs = \( my %base_url_of, my %ua_of, my %auth_of, );
+    my @attr_refs = \( my %base_uri_of, my %ua_of, my %auth_of, );
 
     sub new {
         my ( $class, $options ) = @_;
@@ -31,7 +31,7 @@
 
         croak 'Options should be a hashref' if ref $options ne 'HASH';
 
-        $base_url_of{$ident} = $options->{base_url} || $BASE_URL;
+        $base_uri_of{$ident} = $options->{base_uri} || $BASE_URI;
         $ua_of{$ident}       = $options->{ua}       || LWP::UserAgent->new();
 
         # XXX Authenticate
@@ -43,7 +43,7 @@
         my ( $self, $action, $query ) = @_;
         my $ident = _ident($self);
 
-        my $uri = URI->new_abs( $action, $base_url_of{$ident} );
+        my $uri = URI->new_abs( $action, $base_uri_of{$ident} );
         $uri->query($query);
 
         my $response = $ua_of{$ident}->get($uri);
@@ -124,7 +124,7 @@
 
 =over
 
-=item base_url
+=item base_uri
 
 A URL to the API, currently defaults to https://api.hope.net/api/