version 1.152, 2014/11/28 18:23:03
|
version 1.153.2.1, 2017/10/04 13:00:41
|
Line 134 package Apache::edit;
|
Line 134 package Apache::edit;
|
|
|
use strict; |
use strict; |
use Apache::lonnet; |
use Apache::lonnet; |
|
use Apache::loncommon; |
use HTML::Entities(); |
use HTML::Entities(); |
use Apache::lonlocal; |
use Apache::lonlocal; |
use lib '/home/httpd/lib/perl/'; |
use lib '/home/httpd/lib/perl/'; |
Line 164 sub tag_start {
|
Line 165 sub tag_start {
|
$description=&mt(&Apache::lonxml::description($token)); |
$description=&mt(&Apache::lonxml::description($token)); |
if (!$description) { $description="<$tag>"; } |
if (!$description) { $description="<$tag>"; } |
} |
} |
$result.= &start_table($token)."<tr><td>$description</td> |
$result.= &start_table($token)."<tr><td>".&Apache::loncommon::insert_folding_button(). |
<td>".&mt('Delete?').' '. |
" $description</td><td>".&mt('Delete?')." ".&deletelist($target,$token). |
&deletelist($target,$token) |
"</td><td>".&insertlist($target,$token); |
."</td> |
|
<td>". |
|
&insertlist($target,$token); |
|
#<td>". |
#<td>". |
# &movebuttons($target,$token). |
# &movebuttons($target,$token). |
# "</tr><tr><td colspan=\"3\">\n"; |
# "</tr><tr><td colspan=\"3\">\n"; |
Line 232 sub end_table {
|
Line 230 sub end_table {
|
return $result; |
return $result; |
} |
} |
|
|
sub start_spanning_row { return '<tr><td colspan="5" bgcolor="#F0F0F0">';} |
sub start_spanning_row { |
|
return '<tr name="foldblock_'.$Apache::lonxml::curdepth. |
|
'" style="visibility: \'\'"><td colspan="5" bgcolor="#F0F0F0">'; |
|
} |
sub start_row { return '<tr><td bgcolor="#DDDDDD">'; } |
sub start_row { return '<tr><td bgcolor="#DDDDDD">'; } |
sub end_row { return '</td></tr>'; } |
sub end_row { return '</td></tr>'; } |
|
|
Line 788 sub element_change_detection {
|
Line 789 sub element_change_detection {
|
|
|
sub submit_ask_anyway { |
sub submit_ask_anyway { |
my ($extra_action) = @_; |
my ($extra_action) = @_; |
return ' onclick="still_ask=true;'.$extra_action.'" '; |
my $resource = &Apache::loncommon::escape_single($env{'request.ambiguous'}); |
|
return ' onclick="saveScrollPosition(\''.$resource.'\');still_ask=true;'.$extra_action.';" '; |
} |
} |
|
|
sub submit_dont_ask { |
sub submit_dont_ask { |
my ($extra_action) = @_; |
my ($extra_action) = @_; |
return ' onclick="is_submit=true;'.$extra_action.'" '; |
my $resource = &Apache::loncommon::escape_single($env{'request.ambiguous'}); |
|
return ' onclick="saveScrollPosition(\''.$resource.'\');is_submit=true;'.$extra_action.';" '; |
} |
} |
|
|
sub js_update_linknum { |
sub js_update_linknum { |