loncom/interface/lonextresedit.pm - diff

Return to lonextresedit.pm CVS log

Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/lonextresedit.pm between versions 1.8 and 1.8.2.1

version 1.8, 2015/06/09 21:22:56	version 1.8.2.1, 2016/11/29 16:28:16
Line 201 sub process_changes {	Line 201 sub process_changes {
}	}

sub extedit_form {	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(	my %lt = &Apache::lonlocal::texthash(
ex => 'External Resource',	ex => 'External Resource',
ed => 'Edit',	ed => 'Edit',
Line 263 sub extedit_form {	Line 263 sub extedit_form {
$residx = 0;	$residx = 0;
$orig_url = 'http://';	$orig_url = 'http://';
$orig_title = $lt{'ex'};	$orig_title = $lt{'ex'};
$preview = '<input type="button" name="view" value="'.$lt{'pr'}.'" onclick="javascript:extUrlPreview('."'$urlid'".');" />';	$preview = '<input type="button" name="view" value="'.$lt{'pr'}.'" onclick="javascript:extUrlPreview('."'$urlid'".');"'.$disabled.' />';
$save = $lt{'al'};	$save = $lt{'al'};
$pathitem .= '<br />';	$pathitem .= '<br />';
}	}
Line 274 $legend	Line 274 $legend
$active	$active
<span$srcclass>	<span$srcclass>
$extsrc	$extsrc
<input type="text" size="$size" name="exturl" id="$urlid" value="$orig_url" />	<input type="text" size="$size" name="exturl" id="$urlid" value="$orig_url" $disabled />
$preview	$preview
</span>	</span>
<br />	<br />
<span$srcclass>	<span$srcclass>
$title	$title
<input type="text" size="$size" name="exttitle" value="$orig_title" />	<input type="text" size="$size" name="exttitle" value="$orig_title" $disabled />
<input type="hidden" name="importdetail" value="" />	<input type="hidden" name="importdetail" value="" />
$pathitem	$pathitem
$hiddenelem	$hiddenelem
<input type="button" value="$save" onclick="javascript:setExternal(this.form,'$residx');" />	<input type="button" value="$save" onclick="javascript:setExternal(this.form,'$residx');" $disabled />
</span>	</span>
</fieldset>	</fieldset>
</form>	</form>
Line 298 ENDFORM	Line 298 ENDFORM

sub display_editor {	sub display_editor {
my ($url,$folderpath,$symb,$idx) = @_;	my ($url,$folderpath,$symb,$idx) = @_;
my ($residx,$supplementalflag,$title,$pathitem,$output);	my ($residx,$supplementalflag,$title,$pathitem,$output,$js,$navmap);
if ($folderpath =~ /^supplemental/) {	if ($folderpath =~ /^supplemental/) {
$supplementalflag = 1;	$supplementalflag = 1;
$residx = $idx;	$residx = $idx;
Line 308 sub display_editor {	Line 308 sub display_editor {
(my $map,$residx,my $res) =	(my $map,$residx,my $res) =
&Apache::lonnet::decode_symb($symb);	&Apache::lonnet::decode_symb($symb);
$title = &Apache::lonnet::gettitle($symb);	$title = &Apache::lonnet::gettitle($symb);
my $path = &Apache::loncommon::symb_to_docspath($symb);	my $path = &Apache::loncommon::symb_to_docspath($symb,\$navmap);
$pathitem = '<input type="hidden" name="folderpath" value="'.&HTML::Entities::encode($path,'<>&"').'" />';	$pathitem = '<input type="hidden" name="folderpath" value="'.&HTML::Entities::encode($path,'<>&"').'" />';
}	}
my $js = &Apache::lonhtmlcommon::scripttag(&extedit_javascript());	$js = &Apache::lonhtmlcommon::scripttag(&extedit_javascript());
my $args = { 'force_register' => $env{'form.register'} };	my $args = { 'force_register' => $env{'form.register'} };
return &Apache::loncommon::start_page('External Resource Editor',$js,$args).	return &Apache::loncommon::start_page('External Resource Editor',$js,$args).
'<div class="LC_left_float">'.	'<div class="LC_left_float">'.

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.8
changed lines
	Added in v.1.8.2.1