[LON-CAPA-cvs] cvs: loncom /interface londocs.pm
raeburn
raeburn at source.lon-capa.org
Wed Oct 31 00:59:11 EDT 2012
raeburn Wed Oct 31 04:59:11 2012 EDT
Modified files:
/loncom/interface londocs.pm
Log:
- Remove unused $cpinfo.
- Changes to paste buffer in rev. 1.281 meant value no longer set for $cpinfo.
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.498 loncom/interface/londocs.pm:1.499
--- loncom/interface/londocs.pm:1.498 Tue Oct 2 18:08:12 2012
+++ loncom/interface/londocs.pm Wed Oct 31 04:59:11 2012
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Documents
#
-# $Id: londocs.pm,v 1.498 2012/10/02 18:08:12 bisitz Exp $
+# $Id: londocs.pm,v 1.499 2012/10/31 04:59:11 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -322,7 +322,6 @@
@folders=split('&',$env{'form.folderpath'});
}
my $folderpath;
- my $cpinfo='';
my $plain='';
my $randompick=-1;
my $isencrypted=0;
@@ -355,7 +354,7 @@
$name = &mt('Supplemental '.$crstype.' Content');
}
&Apache::lonhtmlcommon::add_breadcrumb(
- {'href'=>$url.$cpinfo,
+ {'href'=>$url,
'title'=>$name,
'text'=>$name,
'no_mt'=>1,
@@ -2152,7 +2151,6 @@
$path = &HTML::Entities::encode($env{'form.pagepath'},'<>&"');
$symb=&escape($env{'form.pagesymb'});
}
- my $cpinfo='';
if ($allowed) {
my $incindex=$index+1;
my $selectbox='';
@@ -2286,12 +2284,12 @@
$line.=(<<END);
<td>
<div class="LC_docs_entry_move">
- <a href='/adm/coursedocs?cmd=up_$index&${type}path=$esc_path&${type}symb=$symb$cpinfo'>
+ <a href='/adm/coursedocs?cmd=up_$index&${type}path=$esc_path&${type}symb=$symb'>
<img src="${iconpath}move_up.gif" alt='$lt{'up'}' class="LC_icon" />
</a>
</div>
<div class="LC_docs_entry_move">
- <a href='/adm/coursedocs?cmd=down_$index&${type}path=$esc_path&${type}symb=$symb$cpinfo'>
+ <a href='/adm/coursedocs?cmd=down_$index&${type}path=$esc_path&${type}symb=$symb'>
<img src="${iconpath}move_down.gif" alt='$lt{'dw'}' class="LC_icon" />
</a>
</div>
@@ -2397,7 +2395,7 @@
'parameter_encrypturl'))[0]=~/^yes$/i)
.':'.((&LONCAPA::map::getparameter($orderidx,
'parameter_randomorder'))[0]=~/^yes$/i);
- $url.='folderpath='.&escape($folderpath).$cpinfo;
+ $url.='folderpath='.&escape($folderpath);
my $rpicknum = (&LONCAPA::map::getparameter($orderidx,
'parameter_randompick'))[0];
my $rpckchk;
@@ -2436,7 +2434,7 @@
$path.$pagearg.'.page');
}
$url.='pagepath='.&escape($pagepath).
- '&pagesymb='.&escape($symb).$cpinfo;
+ '&pagesymb='.&escape($symb);
}
if (($external) && ($allowed)) {
my $form = ($folder =~ /^default/)? 'newext' : 'supnewext';
More information about the LON-CAPA-cvs
mailing list