loncom/interface/londocs.pm - diff

Return to londocs.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.584, 2014/08/25 01:42:30	version 1.586, 2014/10/15 07:24:43
Line 2810 sub editor {	Line 2810 sub editor {
my ($name,$url)=split(/\:/,$LONCAPA::map::resources[$res]);	my ($name,$url)=split(/\:/,$LONCAPA::map::resources[$res]);
$name=&LONCAPA::map::qtescape($name);	$name=&LONCAPA::map::qtescape($name);
$url=&LONCAPA::map::qtescape($url);	$url=&LONCAPA::map::qtescape($url);
next unless ($name && $url);	next unless $url;
my %denied =	my %denied =
&action_restrictions($coursenum,$coursedom,$url,	&action_restrictions($coursenum,$coursedom,$url,
$env{'form.folderpath'},\%curr_groups);	$env{'form.folderpath'},\%curr_groups);
Line 3358 sub entryline {	Line 3358 sub entryline {

$renametitle=~s/\\/\\\\/g;	$renametitle=~s/\\/\\\\/g;
$renametitle=~s/\&quot\;/\\\"/g;	$renametitle=~s/\&quot\;/\\\"/g;
	$renametitle=~s/"/%22/g;
$renametitle=~s/ /%20/g;	$renametitle=~s/ /%20/g;
$oldtitle = $renametitle;	$oldtitle = $renametitle;
$renametitle=~s/\'/\\\'/g;	$renametitle=~s/\'/\\\'/g;