version 1.102, 2013/06/10 03:12:24
|
version 1.105, 2014/09/14 15:21:47
|
Line 373 ENDEXT
|
Line 373 ENDEXT
|
s/\<((?:input|select|button|textarea)[^\>]+)name\s*\=\s*[\'\"]*([^\'\"]+)[\'\"]*([^\>]*)\>/\<$1 name="$prefix$2" $3\>/gsi; |
s/\<((?:input|select|button|textarea)[^\>]+)name\s*\=\s*[\'\"]*([^\'\"]+)[\'\"]*([^\>]*)\>/\<$1 name="$prefix$2" $3\>/gsi; |
$output=~ |
$output=~ |
s/\<((?:input|select|button|textarea)[^\>]+)id\s*\=\s*[\'\"]*([^\'\"]+)[\'\"]*([^\>]*)\>/\<$1 id="$idprefix$2" $3\>/gsi; |
s/\<((?:input|select|button|textarea)[^\>]+)id\s*\=\s*[\'\"]*([^\'\"]+)[\'\"]*([^\>]*)\>/\<$1 id="$idprefix$2" $3\>/gsi; |
|
$output=~ |
|
s/(\Q<div id="msg_\E)(\Qsubmit_\E)([^"]*)(\Q" style="display:none">\E)/<input type="hidden" name="$prefix$2$3_pressed" id="$idprefix$2$3_pressed" value="" \/>$1$idprefix$2$3$4/g; |
|
$output=~ |
|
s/(\Q<td class="LC_status_\E)(\Qsubmit_\E)([^\"]*)(\s*[^\"]*"\>)/$1$idprefix$2$3$4/g; |
if ($nuploads) { |
if ($nuploads) { |
$output=~ |
$output=~ |
s/\<(input[^\>]+name=\"\Q$prefix\EHWFILE[^\>]+)\s*id\s*\=\s*[\'\"]*([^\'\"]+)[\'\"]*([^\)]*)\>/\<$1 id="$prefix$2" $3\>/gsi; |
s/\<(input[^\>]+name=\"\Q$prefix\EHWFILE[^\>]+)\s*id\s*\=\s*[\'\"]*([^\'\"]+)[\'\"]*([^\)]*)\>/\<$1 id="$prefix$2" $3\>/gsi; |
Line 457 ENDEXT
|
Line 461 ENDEXT
|
} |
} |
$fmtag .= ' action="'. |
$fmtag .= ' action="'. |
&Apache::lonenc::check_encrypt($requrl) |
&Apache::lonenc::check_encrypt($requrl) |
.'">'; |
.'" id="LC_page">'; |
$r->print($fmtag); |
$r->print($fmtag); |
} |
} |
} elsif (($target eq 'tex') || ($target eq 'tex_answer')) { |
} elsif (($target eq 'tex') || ($target eq 'tex_answer')) { |
Line 537 ENDEXT
|
Line 541 ENDEXT
|
$r->print('>'.$metainfo.'<embed src="'. |
$r->print('>'.$metainfo.'<embed src="'. |
$hash{'src_'.$rid}.'"></embed>'); |
$hash{'src_'.$rid}.'"></embed>'); |
} elsif (&Apache::lonnet::declutter($hash{'src_'.$rid}) !~/\.(sequence|page)$/) { |
} elsif (&Apache::lonnet::declutter($hash{'src_'.$rid}) !~/\.(sequence|page)$/) { |
$r->print($metainfo.'<b>'.$hash{'title_'.$rid}.'</b><br />'. |
$r->print($metainfo.'<b>'.$hash{'title_'.$rid}.'</b><br />'); |
&mt('It is recommended that you use an up-to-date virus scanner before handling this file.').'</p><p><table>'. |
unless ($cellemb{$rid} eq 'wrp') { |
&Apache::londocs::entryline(0,&mt("Click to download or use your browser's Save Link function"),'/'.&Apache::lonnet::declutter($hash{'src_'.$rid})).'</table></p><br />'); |
$r->print(&mt('It is recommended that you use an up-to-date virus scanner before handling this file.')); |
|
} |
|
$r->print('</p><p><table>'. |
|
&Apache::londocs::entryline(0, |
|
&mt("Click to download or use your browser's Save Link function"), |
|
'/'.&Apache::lonnet::declutter($hash{'src_'.$rid})). |
|
'</table></p><br />'); |
} |
} |
unless (($target eq 'tex') || ($target eq 'tex_answer')) { |
unless (($target eq 'tex') || ($target eq 'tex_answer')) { |
$r->print('</td>'); |
$r->print('</td>'); |
Line 564 ENDEXT
|
Line 574 ENDEXT
|
# ---------------------------------------------------------------- Submit, etc. |
# ---------------------------------------------------------------- Submit, etc. |
if ($nforms) { |
if ($nforms) { |
$r->print( |
$r->print( |
'<input name="all_submit" value="Submit All" type="'. |
'<input name="all_submit" value="'.&mt('Submit All').'" type="'. |
(($nforms>1)?'submit':'hidden').'"></input></form>'); |
(($nforms>1)?'submit':'hidden').'"></input></form>'); |
} |
} |
unless (($target eq 'tex') || ($target eq 'tex_answer')) { |
unless (($target eq 'tex') || ($target eq 'tex_answer')) { |