From 3282be229999dc36c197b264d63063a18d136331 Mon Sep 17 00:00:00 2001
From: Andreas Brachold <vdr07@deltab.de>
Date: Sun, 11 Nov 2007 06:55:13 +0000
Subject: * Update installation list with required modules * Remove
 unused/doubled provided external perl moduls

---
 lib/Net/Amazon/Response/UPC.pm | 40 ----------------------------------------
 1 file changed, 40 deletions(-)
 delete mode 100644 lib/Net/Amazon/Response/UPC.pm

(limited to 'lib/Net/Amazon/Response/UPC.pm')

diff --git a/lib/Net/Amazon/Response/UPC.pm b/lib/Net/Amazon/Response/UPC.pm
deleted file mode 100644
index 4fba4ad..0000000
--- a/lib/Net/Amazon/Response/UPC.pm
+++ /dev/null
@@ -1,40 +0,0 @@
-######################################################################
-package Net::Amazon::Response::UPC;
-######################################################################
-use warnings;
-use strict;
-use base qw(Net::Amazon::Response);
-
-use Net::Amazon::Property;
-
-##################################################
-sub new {
-##################################################
-    my($class, %options) = @_;
-
-    my $self = $class->SUPER::new(%options);
-
-    bless $self, $class;   # reconsecrate
-}
-
-##################################################
-sub as_string {
-##################################################
-    my($self) = @_;
-
-    my($property) = $self->properties;
-    return $property->as_string();
-}
-
-##################################################
-sub properties {
-##################################################
-    my($self) = @_;
-
-    my $property = Net::Amazon::Property::factory(
-        xmlref => $self->{xmlref}->{Details}->[0]);
-
-    return ($property);
-}
-
-1;
-- 
cgit v1.2.3