| … | |
… | |
| 54 | $userProblem->set_id($globalProblem->set_id); |
54 | $userProblem->set_id($globalProblem->set_id); |
| 55 | $userProblem->problem_id($globalProblem->problem_id); |
55 | $userProblem->problem_id($globalProblem->problem_id); |
| 56 | |
56 | |
| 57 | initializeUserProblem($userProblem); |
57 | initializeUserProblem($userProblem); |
| 58 | eval {$db->addUserProblem($userProblem)}; |
58 | eval {$db->addUserProblem($userProblem)}; |
|
|
59 | warn $@ if $@; |
| 59 | } |
60 | } |
| 60 | |
61 | |
| 61 | sub assignSetToUser { |
62 | sub assignSetToUser { |
| 62 | my ($self, $user, $globalSet) = @_; |
63 | my ($self, $user, $globalSet) = @_; |
| 63 | my $db = $self->{db}; |
64 | my $db = $self->{db}; |