--- trunk/webwork-modperl/lib/WeBWorK/ContentGenerator/Instructor/ProblemSetEditor.pm	2003/05/31 00:02:46	960
+++ trunk/webwork-modperl/lib/WeBWorK/ContentGenerator/Instructor/ProblemSetEditor.pm	2003/06/02 06:51:35	962
@@ -191,6 +191,8 @@
 	my ($self, @components) = @_;
 	my $r = $self->{r};
 	my $db = $self->{db};
+	my $ce = $self->{ce};
+	my $courseName = $ce->{courseName};
 	my $setName = $self->getSetName(@components);
 	my $setRecord = $db->getGlobalSet($setName);
 	my @editForUser = $r->param('editForUser');
@@ -265,7 +267,7 @@
 		
 		print CGI::Tr({}, 
 			CGI::td({}, [
-				$problemID,
+				CGI::a({href=>"/webwork/$courseName/instructor/pgProblemEditor/".$setName.'/'.$problemID.'?'.$self->url_authen_args}, $problemID),
 				($forUsers ? (
 					problemElementHTML("problem_${problemID}_status", $userProblemRecord->status, "7"),
 					problemElementHTML("problem_${problemID}_problem_seed", $userProblemRecord->problem_seed, "7"),