67 |
my $u = Transports::Model::User->new(); |
my $u = Transports::Model::User->new(); |
68 |
$u->load_by_cols( id => $id ); |
$u->load_by_cols( id => $id ); |
69 |
|
|
70 |
|
set user_id => $id; |
71 |
|
|
72 |
set user => Jifty->web->new_action( |
set user => Jifty->web->new_action( |
73 |
class => $u->id ? 'UpdateUser' : 'CreateUser', |
class => $u->id ? 'UpdateUser' : 'CreateUser', |
74 |
record => $u |
record => $u |
75 |
); |
); |
76 |
|
|
77 |
|
my $s = Transports::Model::UserOnSourceCollection->new; |
78 |
|
$s->limit( |
79 |
|
column => 'user_on', |
80 |
|
value => $id, |
81 |
|
quote_value => 0, |
82 |
|
); |
83 |
|
$s->order_by( { column => 'source' } ); |
84 |
|
set sources => $s; |
85 |
|
|
86 |
show('/user_form'); |
show('/user_form'); |
87 |
} else { |
} else { |
88 |
my $u = Transports::Model::UserCollection->new(); |
my $u = Transports::Model::UserCollection->new(); |