--- loncom/interface/lonextresedit.pm 2015/06/09 21:22:56 1.8 +++ loncom/interface/lonextresedit.pm 2016/11/29 16:28:16 1.8.2.1 @@ -1,7 +1,7 @@ # The LearningOnline Network # Documents # -# $Id: lonextresedit.pm,v 1.8 2015/06/09 21:22:56 damieng Exp $ +# $Id: lonextresedit.pm,v 1.8.2.1 2016/11/29 16:28:16 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -201,7 +201,7 @@ sub process_changes { } sub extedit_form { - my ($supplementalflag,$residx,$orig_url,$orig_title,$pathitem,$helpitem,$caller,$symb) = @_; + my ($supplementalflag,$residx,$orig_url,$orig_title,$pathitem,$helpitem,$caller,$symb,$disabled) = @_; my %lt = &Apache::lonlocal::texthash( ex => 'External Resource', ed => 'Edit', @@ -263,7 +263,7 @@ sub extedit_form { $residx = 0; $orig_url = 'http://'; $orig_title = $lt{'ex'}; - $preview = ''; + $preview = ''; $save = $lt{'al'}; $pathitem .= '
'; } @@ -274,17 +274,17 @@ $legend $active $extsrc - + $preview
$title - + $pathitem $hiddenelem - + @@ -298,7 +298,7 @@ ENDFORM sub display_editor { my ($url,$folderpath,$symb,$idx) = @_; - my ($residx,$supplementalflag,$title,$pathitem,$output); + my ($residx,$supplementalflag,$title,$pathitem,$output,$js,$navmap); if ($folderpath =~ /^supplemental/) { $supplementalflag = 1; $residx = $idx; @@ -308,10 +308,10 @@ sub display_editor { (my $map,$residx,my $res) = &Apache::lonnet::decode_symb($symb); $title = &Apache::lonnet::gettitle($symb); - my $path = &Apache::loncommon::symb_to_docspath($symb); + my $path = &Apache::loncommon::symb_to_docspath($symb,\$navmap); $pathitem = ''; } - my $js = &Apache::lonhtmlcommon::scripttag(&extedit_javascript()); + $js = &Apache::lonhtmlcommon::scripttag(&extedit_javascript()); my $args = { 'force_register' => $env{'form.register'} }; return &Apache::loncommon::start_page('External Resource Editor',$js,$args). '
'.