File tree Expand file tree Collapse file tree 1 file changed +2
-10
lines changed Expand file tree Collapse file tree 1 file changed +2
-10
lines changed Original file line number Diff line number Diff line change @@ -272,10 +272,6 @@ my $user_set_from_csv = clone(
272
272
removeIDs($user_set );
273
273
delete $user_set -> {set_visible } unless defined ($user_set -> {set_visible });
274
274
275
- use Data::Dumper;
276
- print Dumper $user_set_from_csv ;
277
- print Dumper $user_set ;
278
-
279
275
is_deeply($user_set_from_csv , $user_set , ' getUserSet: get a user set from a course' );
280
276
281
277
# Get a merged UserSet
@@ -621,17 +617,13 @@ my $otto_quiz_info = {
621
617
username => ' otto'
622
618
};
623
619
624
- for my $u (@otto_user_sets ) {
625
- $u -> delete ;
626
- }
627
-
628
620
# Then add a new user set and test that it is merged correctly.
629
621
630
622
my $merged_set1 = clone(
631
623
(
632
624
grep {
633
- $_ -> {course_name } eq $otto_set_info2 -> {course_name }
634
- && $_ -> {set_name } eq $otto_set_info2 -> {set_name }
625
+ $_ -> {course_name } eq $otto_quiz_info -> {course_name }
626
+ && $_ -> {set_name } eq $otto_quiz_info -> {set_name }
635
627
} @all_problem_sets
636
628
)[0]
637
629
);
You can’t perform that action at this time.
0 commit comments