From 6319ed28454066f9530ab9c758ce85faedb6d6f9 Mon Sep 17 00:00:00 2001
From: Peter Palfrader <peter@palfrader.org>
Date: Tue, 2 Jul 2002 17:36:20 +0000
Subject: Include fetch in get_addresses

---
 Echolot/Storage/File.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/Echolot/Storage/File.pm b/Echolot/Storage/File.pm
index 5498255..8e03bb1 100644
--- a/Echolot/Storage/File.pm
+++ b/Echolot/Storage/File.pm
@@ -1,7 +1,7 @@
 package Echolot::Storage::File;
 
 # (c) 2002 Peter Palfrader <peter@palfrader.org>
-# $Id: File.pm,v 1.16 2002/07/02 17:03:42 weasel Exp $
+# $Id: File.pm,v 1.17 2002/07/02 17:36:20 weasel Exp $
 #
 
 =pod
@@ -509,6 +509,7 @@ sub get_addresses($) {
 		$tmp{'status'} = $self->{'METADATA'}->{'addresses'}->{$_}->{'status'};
 		$tmp{'id'} = $self->{'METADATA'}->{'addresses'}->{$_}->{'id'};
 		$tmp{'address'} = $_;
+		$tmp{'fetch'} = $self->{'METADATA'}->{'addresses'}->{$_}->{'fetch'};
 		\%tmp;
 		} @addresses;
 	return @return_data;
-- 
cgit v1.2.3