# Copyright (c) 2010 bivio Software, Inc. All Rights Reserved. # # Visit http://www.bivio.biz for more info. # # This library is free software; you can redistribute it and/or modify # it under the terms of the GNU Lesser General Public License as # published by the Free Software Foundation; either version 2.1 of the # License, or (at your option) any later version. # # This library is distributed in the hope that it will be useful, but # WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU # Lesser General Public License for more details. # # You should have received a copy of the GNU Lesser General Public # License along with this library; If not, you may get a copy from: # http://www.opensource.org/licenses/lgpl-license.html # # $Id: TimeZoneList.bunit,v 1.3 2010/05/26 03:39:36 schellj Exp $ ListModel(); req()->setup_facade; [ load_all => [ [] => not_die(), ], { method => 'find_row_by', compute_return => sub { my(undef, $actual) = @_; return [$actual->[0]->get('display_name')]; }, } => [ [enum => TimeZone('UTC')] => 'UTC', [enum => TimeZone('PACIFIC_HONOLULU')] => 'Pacific/Honolulu', ], enum_for_display_name => [ 'Pacific/Honolulu' => [TimeZone('PACIFIC_HONOLULU')], ], display_name_for_enum => [ [TimeZone('AMERICA_DENVER')] => 'America/Denver', ], unsafe_enum_for_display_name => [ 'Pacific/Honolulu' => [TimeZone('PACIFIC_HONOLULU')], 'this_time_zone_doesnt_exist' => undef, ], ];