[LON-CAPA-cvs] cvs: loncom /interface londocs.pm
raeburn
raeburn@source.lon-capa.org
Thu, 21 Jan 2010 23:19:17 -0000
raeburn Thu Jan 21 23:19:17 2010 EDT
Modified files:
/loncom/interface londocs.pm
Log:
- IMS Export.
- Eliminate unnecessary computations of: $count + $startcount + $boards
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.415 loncom/interface/londocs.pm:1.416
--- loncom/interface/londocs.pm:1.415 Thu Jan 21 19:22:03 2010
+++ loncom/interface/londocs.pm Thu Jan 21 23:19:17 2010
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Documents
#
-# $Id: londocs.pm,v 1.415 2010/01/21 19:22:03 raeburn Exp $
+# $Id: londocs.pm,v 1.416 2010/01/21 23:19:17 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -423,33 +423,29 @@
$ressymb = 'bulletin___'.$3.'___adm/wrapper/adm/'.$1.'/'.$2.'/'.$3.'/bulletinboard';
}
}
+ my $currelem = $count+$boards+$startcount;
$display .= &Apache::loncommon::start_data_table_row()
.'<td>'."\n"
.'<input type="checkbox" name="archive" value="'.$count.'" ';
if (($curRes->is_sequence()) || ($curRes->is_page())) {
- my $checkitem = $count + $boards + $startcount;
- $display .= 'onclick="javascript:propagateCheck('."'$checkitem'".')"';
+ $lastcontainer = $currelem;
+ $display .= 'onclick="javascript:propagateCheck('."'$currelem'".')"';
}
$display .= ' />'."\n";
for (my $i=0; $i<$depth; $i++) {
- $display .= '<img src="/adm/lonIcons/whitespace1.gif" class="LC_docs_spacer" alt="" />'
- .'<img src="/adm/lonIcons/whitespace1.gif" class="LC_docs_spacer" alt="" />'."\n";
+ $display .= ('<img src="/adm/lonIcons/whitespace1.gif" class="LC_docs_spacer" alt="" />' x2)."\n";
}
if ($curRes->is_sequence()) {
$display .= '<img src="/adm/lonIcons/navmap.folder.open.gif" alt="" /> '."\n";
- $lastcontainer = $count + $startcount + $boards;
} elsif ($curRes->is_page()) {
$display .= '<img src="/adm/lonIcons/navmap.page.open.gif" alt="" /> '."\n";
- $lastcontainer = $count + $startcount + $boards;
}
- my $currelem = $count+$boards+$startcount;
$children{$parent{$depth}} .= $currelem.':';
$display .= ' '.$curRes->title().'</td>'."\n";
# Existing discussion posts?
if ($discussiontime{$ressymb} > 0) {
$boards ++;
- $currelem = $count+$boards+$startcount;
$display .= '<td align="right">'
.'<input type="checkbox" name="discussion" value="'.$count.'" />'
.'</td>'."\n";