|
add ssh key add feature
|
1 |
<% |
|
fix bug that ssh key is not ...
|
2 |
my $user_id = param('user');
|
|
do success xt tests
|
3 |
|
|
fix bug that ssh key is not ...
|
4 |
my $keys = app->dbi->model('ssh_public_key')->select(
|
|
remove table __ prefix
|
5 |
where => {'user.id' => $user_id},
|
|
fix bug that ssh key is not ...
|
6 |
append => 'order by title' |
| 7 |
)->all; |
|
|
add ssh key add feature
|
8 |
my $keys_str = ''; |
| 9 |
for my $key (@$keys) {
|
|
| 10 |
$keys_str .= "$key->{key}\n";
|
|
| 11 |
} |
|
| 12 |
$self->render(text => $keys_str); |
|
| 13 |
return; |
|
| 14 |
%> |