From: Sven Dowideit <[email protected]>
---
AnyData/Format/XML.pm | 3 ++-
Changes | 1 +
2 files changed, 3 insertions(+), 1 deletion(-)
diff --git a/AnyData/Format/XML.pm b/AnyData/Format/XML.pm
index e46271e..e3dd535 100644
--- a/AnyData/Format/XML.pm
+++ b/AnyData/Format/XML.pm
@@ -681,11 +681,12 @@ paste into parent record_tag__
sub get_data {
my $self = shift;
- my $fh_or_str = shift || return;
+ my $fh_or_str = shift;
my $url = $self->{url};
if ( $url ) {
$fh_or_str = AnyData::Storage::RAM::get_remote_data({},$url);
}
+ return if( ! defined( $fh_or_str ) );
my $col_names = shift || [];
$col_names = []; #### IGNORE USER COLUMN NAMES FOR NOW
my $flags;
diff --git a/Changes b/Changes
index f51a7df..a916a97 100644
--- a/Changes
+++ b/Changes
@@ -6,6 +6,7 @@ version 0.11, released Aug 2012
* new maintainer Sven Dowideit
* use Test::More
+ * Fails to retrieve XML data over HTTP (debian#421884) Bart Martens
<[email protected]>
*
version 0.10, released 19 April 2004
--
1.7.10.4
