[system] / branches / rel-2-4-dev / webwork-modperl / lib / WeBWorK / ContentGenerator / Instructor / SetMaker.pm Repository:
ViewVC logotype

Diff of /branches/rel-2-4-dev/webwork-modperl/lib/WeBWorK/ContentGenerator/Instructor/SetMaker.pm

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

Revision 2015 Revision 2021
1################################################################################ 1################################################################################
2# WeBWorK Online Homework Delivery System 2# WeBWorK Online Homework Delivery System
3# Copyright © 2000-2003 The WeBWorK Project, http://openwebwork.sf.net/ 3# Copyright © 2000-2003 The WeBWorK Project, http://openwebwork.sf.net/
4# $CVSHeader:$ 4# $CVSHeader: $
5# 5#
6# This program is free software; you can redistribute it and/or modify it under 6# This program is free software; you can redistribute it and/or modify it under
7# the terms of either: (a) the GNU General Public License as published by the 7# the terms of either: (a) the GNU General Public License as published by the
8# Free Software Foundation; either version 2, or (at your option) any later 8# Free Software Foundation; either version 2, or (at your option) any later
9# version, or (b) the "Artistic License" which comes with this package. 9# version, or (b) the "Artistic License" which comes with this package.
361 my $try_link = CGI::a({href=>$self->systemLink( $urlpath->new(type=>'problem_detail', 361 my $try_link = CGI::a({href=>$self->systemLink( $urlpath->new(type=>'problem_detail',
362 args=>{courseID =>$urlpath->arg("courseID"), 362 args=>{courseID =>$urlpath->arg("courseID"),
363 setID=>"Undefined_Set", problemID=>"1"} 363 setID=>"Undefined_Set", problemID=>"1"}
364 ), 364 ),
365 params =>{effectiveUser => $self->r->param('user'), 365 params =>{effectiveUser => $self->r->param('user'),
366 editMode => "temporaryFile", 366 editMode => "SetMaker",
367 sourceFilePath => "$sourceFileName"} )}, "Try it"); 367 sourceFilePath => "$sourceFileName"} )}, "Try it");
368 368
369 369
370 370
371 print CGI::Tr({-align=>"left"}, CGI::td( 371 print CGI::Tr({-align=>"left"}, CGI::td(
372 372
373 CGI::div({-style=>"background-color: #DDDDDD"},"File name: $sourceFileName ", 373 CGI::div({-style=>"background-color: #DDDDDD"},"File name: $sourceFileName ",
374 $edit_link, " ", $try_link 374 #$edit_link, " ",
375 $try_link
375 ), 376 ),
376 377
377 378
378 379
379 380

Legend:
Removed from v.2015  
changed lines
  Added in v.2021

aubreyja at gmail dot com
ViewVC Help
Powered by ViewVC 1.0.9