[system] / trunk / webwork2 / lib / WeBWorK / ContentGenerator.pm Repository:
ViewVC logotype

Diff of /trunk/webwork2/lib/WeBWorK/ContentGenerator.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 1474 Revision 1475
… …
510 my ($set, $prob) = @components; 510 my ($set, $prob) = @components;
511 my $instructor = "$root/$courseName/instructor/?" . $self->url_authen_args(); 511 my $instructor = "$root/$courseName/instructor/?" . $self->url_authen_args();
512 my $sets = "$root/$courseName/instructor/sets/?" . $self->url_authen_args(); 512 my $sets = "$root/$courseName/instructor/sets/?" . $self->url_authen_args();
513 my $users = "$root/$courseName/instructor/users/?" . $self->url_authen_args(); 513 my $users = "$root/$courseName/instructor/users/?" . $self->url_authen_args();
514 my $email = "$root/$courseName/instructor/send_mail/?" . $self->url_authen_args(); 514 my $email = "$root/$courseName/instructor/send_mail/?" . $self->url_authen_args();
515 my $scoring = "$root/$courseName/instructor/scoring/?" . $self->url_authen_args();
515 my $statsRoot = "$root/$courseName/instructor/stats"; 516 my $statsRoot = "$root/$courseName/instructor/stats";
516 my $stats = $statsRoot. '/?'.$self->url_authen_args(); 517 my $stats = $statsRoot. '/?'.$self->url_authen_args();
517 518
518 519
519 # Add direct links to sets e.g. 3:4 for set3 problem 4 520 # Add direct links to sets e.g. 3:4 for set3 problem 4
… …
528 CGI::hr(), 529 CGI::hr(),
529 CGI::a({-href=>$instructor}, "Instructor") , CGI::br(), 530 CGI::a({-href=>$instructor}, "Instructor") , CGI::br(),
530 '  ',CGI::a({-href=>$sets}, "Edit Sets") ,':', $setProb, CGI::br(), 531 '  ',CGI::a({-href=>$sets}, "Edit Sets") ,':', $setProb, CGI::br(),
531 '  ',CGI::a({-href=>$users}, "Edit Class") , CGI::br(), 532 '  ',CGI::a({-href=>$users}, "Edit Class") , CGI::br(),
532 '  ',CGI::a({-href=>$email}, "Send Email") , CGI::br(), 533 '  ',CGI::a({-href=>$email}, "Send Email") , CGI::br(),
534 '  ',CGI::a({-href=>$scoring}, "Score Sets") , CGI::br(),
533 '  ',CGI::a({-href=>$stats}, 'Statistics'),CGI::br(), 535 '  ',CGI::a({-href=>$stats}, 'Statistics'),CGI::br(),
534 (defined($set)) ? 536 (defined($set)) ?
535 '    '.CGI::a({-href=>"$statsRoot/set/$set/?".$self->url_authen_args}, "set:$set").CGI::br() 537 '    '.CGI::a({-href=>"$statsRoot/set/$set/?".$self->url_authen_args}, "set:$set").CGI::br()
536 : '', 538 : '',
537 (defined($userName)) ? 539 (defined($userName)) ?
Legend:
Removed from v.1474  
changed lines
  Added in v.1475
aubreyja at gmail dot com
 ViewVC Help
Powered by ViewVC 1.0.9