version 1.153, 2015/01/19 15:35:53
|
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 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) = @_; |
my $resource = $env{'request.ambiguous'}; |
my $resource = &Apache::loncommon::escape_single($env{'request.ambiguous'}); |
return ' onclick="saveScrollPosition(\''.$resource.'\');still_ask=true;'.$extra_action.';" '; |
return ' onclick="saveScrollPosition(\''.$resource.'\');still_ask=true;'.$extra_action.';" '; |
} |
} |
|
|
sub submit_dont_ask { |
sub submit_dont_ask { |
my ($extra_action) = @_; |
my ($extra_action) = @_; |
my $resource = $env{'request.ambiguous'}; |
my $resource = &Apache::loncommon::escape_single($env{'request.ambiguous'}); |
return ' onclick="saveScrollPosition(\''.$resource.'\');is_submit=true;'.$extra_action.';" '; |
return ' onclick="saveScrollPosition(\''.$resource.'\');is_submit=true;'.$extra_action.';" '; |
} |
} |
|
|