1 |
<%init> |
<%init> |
2 |
my $landscapes = Transports::Model::LandscapeCollection->new(); |
my $landscapes = Transports::Model::LandscapeCollection->new(); |
3 |
$landscapes->unlimit; |
$landscapes->unlimit; |
4 |
|
|
5 |
|
sub admin_link { |
6 |
|
my $label = shift; |
7 |
|
my $url = join('', @_); |
8 |
|
if (Jifty->web->current_user->admin) { |
9 |
|
return Jifty->web->link( label => $label, url => $url ); |
10 |
|
} else { |
11 |
|
return $label; |
12 |
|
} |
13 |
|
} |
14 |
|
|
15 |
</%init> |
</%init> |
16 |
<&|/_elements/wrapper&> |
<&|/_elements/wrapper&> |
17 |
|
|
19 |
<% Jifty->web->redirect( '/login/landscapes' ) %> |
<% Jifty->web->redirect( '/login/landscapes' ) %> |
20 |
% } else { |
% } else { |
21 |
|
|
22 |
<ul> |
<div class="outer-landscapes"> |
23 |
|
|
24 |
% while (my $l = $landscapes->next) { |
% while (my $l = $landscapes->next) { |
25 |
<dt><% $l->name %> |
<div class="float-left boxed"> |
26 |
|
|
27 |
% if (Jifty->web->current_user->admin) { |
<b><% $l->name %></b> |
28 |
<% Jifty->web->link( label => 'edit', url => '/landscape/' .$l->id ) %> |
|
29 |
% } |
<br/><small> |
30 |
|
|
31 |
<dd>Source systems: |
Source systems: |
32 |
<% join(", ",sort map { $_->name } @{$l->sources->items_array_ref}) %> |
<ul> |
33 |
[<% $l->sources->count %>] |
% foreach my $s ( sort { $a->name cmp $b->name } @{$l->sources->items_array_ref} ) { |
34 |
|
<li><% admin_link( $s->name, '/source/' . $s->id ) %></li> |
35 |
<dd>Destination systems: |
% } |
36 |
<% join(", ",sort map { $_->name } @{$l->destinations->items_array_ref}) %> |
</ul> |
|
[<% $l->destinations->count %>] |
|
37 |
|
|
38 |
|
Destination systems: |
39 |
|
<ul> |
40 |
|
% foreach my $d ( sort { $a->name cmp $b->name } @{$l->destinations->items_array_ref} ) { |
41 |
|
<li><% admin_link( $d->name, '/destination/' . $d->id ) %></li> |
42 |
% } |
% } |
43 |
</ul> |
</ul> |
44 |
|
|
45 |
|
</small> |
46 |
|
|
47 |
|
</div> |
48 |
|
|
49 |
|
% } # while |
50 |
|
|
51 |
|
</div> |
52 |
|
|
53 |
% } |
% } |
54 |
|
|
55 |
</&> |
</&> |