version 1.1, 2011/05/04 01:49:08
|
version 1.3, 2013/07/15 14:32:45
|
Line 52 sub handler {
|
Line 52 sub handler {
|
{'no_nav_bar' => 1})); |
{'no_nav_bar' => 1})); |
|
|
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['form','reslink']); |
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['form','reslink']); |
my $form='opener.document.'.$env{'form.form'}; |
my $form='opener.document.forms.'.$env{'form.form'}; |
my $reslink=$env{'form.reslink'}; |
my $reslink=$env{'form.reslink'}; |
|
|
$r->print('<form name="pickresource" action="/adm/pickresource">'); |
$r->print('<form name="pickresource" action="/adm/pickresource">'); |
$r->print(&Apache::lonstathelpers::problem_selector('.',undef,1,1,'resource')); |
$r->print(&Apache::lonstathelpers::problem_selector('.',undef,1,1,'resource')); |
|
$r->print(<<ENDGETVALUE); |
|
<script type="text/javascript"> |
|
function getCheckedValue(radioObj) { |
|
if(!radioObj) |
|
return ""; |
|
var radioLength = radioObj.length; |
|
if(radioLength == undefined) |
|
if(radioObj.checked) |
|
return radioObj.value; |
|
else |
|
return ""; |
|
for(var i = 0; i < radioLength; i++) { |
|
if(radioObj[i].checked) { |
|
return radioObj[i].value; |
|
} |
|
} |
|
return ""; |
|
} |
|
</script> |
|
ENDGETVALUE |
$r->print('<input type="button" value="'.&mt('Pick'). |
$r->print('<input type="button" value="'.&mt('Pick'). |
'" onClick="if (this.form.resourcesymb.value!=null) { '. |
'" onclick="val=getCheckedValue(this.form.resourcesymb);if (val) { '. |
$form.'.resourcesymb.value=this.form.resourcesymb.value;'. |
$form.'.resourcesymb.value=val;'. |
$form.".cmd.value='".$reslink."';} window.close();".'" />'); |
$form.".cmd.value='".$reslink."';". |
|
$form.".submit();} window.close();".'" />'); |
$r->print('</form>'); |
$r->print('</form>'); |
$r->print(&Apache::loncommon::end_page()); |
$r->print(&Apache::loncommon::end_page()); |
return OK; |
return OK; |