28 |
my $url = $self->url_for( 'Reservation/create_as_markup' ); |
my $url = $self->url_for( 'Reservation/create_as_markup' ); |
29 |
|
|
30 |
return |
return |
31 |
App::RoomReservation::Room->new->room_markup |
App::RoomReservation::Room->new->room_as_markup |
32 |
. qq|<a target="App::RoomReservation::Reservation" href="$url">seat reservation</a>| |
. qq|<a target="App::RoomReservation::Reservation" href="$url">seat reservation</a>| |
33 |
; |
; |
34 |
} |
} |
46 |
Class::MOP::load_class( $class ); |
Class::MOP::load_class( $class ); |
47 |
die "$class doesn't implement $method" unless $class->meta->has_method($method); |
die "$class doesn't implement $method" unless $class->meta->has_method($method); |
48 |
|
|
49 |
return "http://192.168.1.13:3000/$app"; |
return |
50 |
|
$self->request_url->scheme . '://' . $self->request_url->authority . '/' . $app; |
51 |
} |
} |
52 |
|
|
53 |
__PACKAGE__->meta->make_immutable; |
__PACKAGE__->meta->make_immutable; |