loncom/interface/londocs.pm - diff

Return to londocs.pm CVS log

Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/londocs.pm between versions 1.395 and 1.397

version 1.395, 2009/10/18 15:32:36	version 1.397, 2009/10/19 16:13:17
Line 2061 END	Line 2061 END
$url.='pagepath='.&escape($pagepath).	$url.='pagepath='.&escape($pagepath).
'&pagesymb='.&escape($symb).$cpinfo;	'&pagesymb='.&escape($symb).$cpinfo;
}	}
if ($external) {	if (($external) && ($allowed)) {
my $form = ($folder =~ /^default/)? 'newext' : 'supnewext';	my $form = ($folder =~ /^default/)? 'newext' : 'supnewext';
$external = ' <a class="LC_docs_ext_edit" href="javascript:edittext(\''.$form.'\',\''.$residx.'\',\''.&escape($title).'\',\''.&escape($orig_url).'\');" >'.&mt('Edit').'</a>';	$external = ' <a class="LC_docs_ext_edit" href="javascript:edittext(\''.$form.'\',\''.$residx.'\',\''.&escape($title).'\',\''.&escape($orig_url).'\');" >'.&mt('Edit').'</a>';
} else {	} else {
Line 3252 NGFFORM	Line 3252 NGFFORM
if($env{'form.pagepath'}) {	if($env{'form.pagepath'}) {

@specialdocumentsforma=(	@specialdocumentsforma=(
{'<img class="LC_noBorder LC_middle" align="left" src="/res/adm/pages/docspacer.gif" alt="pic32" />'=>$newsmpproblemform},	{'<img class="LC_noBorder LC_middle" align="left" src="/res/adm/pages/simpprob.png" alt="pic32" />'=>$newsmpproblemform},
{'<img class="LC_noBorder LC_middle" align="left" src="/res/adm/pages/docspacer.gif" alt="pic33" />'=>$newexuploadform}	{'<img class="LC_noBorder LC_middle" align="left" src="/res/adm/pages/scoreupfrm.png" alt="pic33" />'=>$newexuploadform}
);	);
$specialdocumentsform= create_form_ul(create_list_elements(@specialdocumentsforma));	$specialdocumentsform= create_form_ul(create_list_elements(@specialdocumentsforma));
}	}
Line 3379 SNAMFORM	Line 3379 SNAMFORM


my @specialdocs = (	my @specialdocs = (
{'<img class="LC_noBorder LC_middle" align="left" src="/res/adm/pages/docspacer.gif" alt="pic29" />'=>$supnewextform},	{'<img class="LC_noBorder LC_middle" align="left" src="/res/adm/pages/extres.png" alt="pic29" />'=>$supnewextform},
{'<img class="LC_noBorder LC_middle" align="left" src="/res/adm/pages/docspacer.gif" alt="pic30" />'=>$supnewsylform},	{'<img class="LC_noBorder LC_middle" align="left" src="/res/adm/pages/syllabus.png" alt="pic30" />'=>$supnewsylform},
{'<img class="LC_noBorder LC_middle" align="left" src="/res/adm/pages/docspacer.gif" alt="pic31" />'=>$supnewaboutmeform},	{'<img class="LC_noBorder LC_middle" align="left" src="/res/adm/pages/myaboutme.png" alt="pic31" />'=>$supnewaboutmeform},
);	);
my %suporderhash = (	my %suporderhash = (
'00' => ['Supnewfolder', $supnewfolderform],	'00' => ['Supnewfolder', $supnewfolderform],

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

Removed from v.1.395
changed lines
	Added in v.1.397