| 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 | |