Log Message:
-----------
Implement Danny Glin's fix for set_location entries being left when
a set was deleted.
Modified Files:
--------------
webwork2/lib/WeBWorK:
DB.pm
Revision Data
-------------
Index: DB.pm
===================================================================
RCS file: /webwork/cvs/system/webwork2/lib/WeBWorK/DB.pm,v
retrieving revision 1.108
retrieving revision 1.109
diff -Llib/WeBWorK/DB.pm -Llib/WeBWorK/DB.pm -u -r1.108 -r1.109
--- lib/WeBWorK/DB.pm
+++ lib/WeBWorK/DB.pm
@@ -1099,6 +1099,7 @@
my ($self, $setID) = shift->checkArgs(\@_, "set_id$U");
$self->deleteUserSet(undef, $setID);
$self->deleteGlobalProblem($setID, undef);
+ $self->deleteGlobalSetLocation($setID, undef);
return $self->{set}->delete($setID);
}
|
