Parent Directory | Revision Log
Simple object schema for room reservation example application
1 | package App::RoomReservation; |
2 | use Moose; |
3 | |
4 | extends 'Frey'; |
5 | with 'Frey::Web'; |
6 | #with 'Frey::Storage'; |
7 | |
8 | with 'App::RoomReservation::Room'; |
9 | |
10 | sub as_markup { |
11 | my ($self) = @_; |
12 | |
13 | $self->room_markup |
14 | } |
15 | |
16 | 1; |
ViewVC Help | |
Powered by ViewVC 1.1.26 |