From f00e2765b2271e10cf7b283202bbc1ddb577a4da Mon Sep 17 00:00:00 2001 From: Martin Mares Date: Mon, 31 Dec 2012 21:17:43 +0100 Subject: [PATCH] UCW::Implemented try_get method --- gal/UCW/Gallery.pm | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/gal/UCW/Gallery.pm b/gal/UCW/Gallery.pm index 2773fa1..ad1117f 100644 --- a/gal/UCW/Gallery.pm +++ b/gal/UCW/Gallery.pm @@ -70,6 +70,11 @@ sub get($$) { } } +sub try_get($$) { + my ($self, $key) = @_; + return $self->{cfg}->{$key}; +} + sub def($@) { my $self = shift; while (my $key = shift @_) { -- 2.39.2