App::Dthumb::Data get: Return undef for invalid files

1 files changed, 3 insertions, 2 deletions

diff --git a/lib/App/Dthumb/Data.pm.PL b/lib/App/Dthumb/Data.pm.PL
index 6ebea05..eaf914e 100644
--- a/lib/App/Dthumb/Data.pm.PL
+++ b/lib/App/Dthumb/Data.pm.PL
@@ -123,7 +123,8 @@ sub list_archived {
 
 =head2 get($filename)
 
-Returns the exact content of share/$filename.
+Returns the exact content of share/$filename (undef if no such file was
+saved).
 
 =cut
 
@@ -133,7 +134,7 @@ sub get {
 	my $data = $self->section_data($name);
 
 	if (not $data) {
-		die("No such data: ${name}\n");
+		return undef;
 	}
 
 	$data = ${$data};