[LON-CAPA-cvs] cvs: loncom /interface courseclassifier.pm
raeburn
raeburn at source.lon-capa.org
Wed Mar 15 10:37:12 EDT 2023
raeburn Wed Mar 15 14:37:12 2023 EDT
Modified files:
/loncom/interface courseclassifier.pm
Log:
- Add missing linefeed and remove some trailing whitespace.
Index: loncom/interface/courseclassifier.pm
diff -u loncom/interface/courseclassifier.pm:1.28 loncom/interface/courseclassifier.pm:1.29
--- loncom/interface/courseclassifier.pm:1.28 Sat Nov 5 06:00:07 2022
+++ loncom/interface/courseclassifier.pm Wed Mar 15 14:37:12 2023
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Utilities for classifying courses based on institutional code
#
-# $Id: courseclassifier.pm,v 1.28 2022/11/05 06:00:07 raeburn Exp $
+# $Id: courseclassifier.pm,v 1.29 2023/03/15 14:37:12 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -69,7 +69,8 @@
push @{$$idarrays{$$codetitles[2]}{$$codes{$cid}{$$codetitles[0]}}{$$codes{$cid}{$$codetitles[1]}}}, $$codes{$cid}{$$codetitles[2]};
}
} else {
- @{$$idarrays{$$codetitles[2]}{$$codes{$cid}{$$codetitles[0]}}{$$codes{$cid}{$$codetitles[1]}}} = ("$$codes{$cid}{$$codetitles[2]}"); }
+ @{$$idarrays{$$codetitles[2]}{$$codes{$cid}{$$codetitles[0]}}{$$codes{$cid}{$$codetitles[1]}}} = ("$$codes{$cid}{$$codetitles[2]}");
+ }
} else {
%{$$idarrays{$$codetitles[2]}{$$codes{$cid}{$$codetitles[0]}}} = ();
@{$$idarrays{$$codetitles[2]}{$$codes{$cid}{$$codetitles[0]}}{$$codes{$cid}{$$codetitles[1]}}} = ("$$codes{$cid}{$$codetitles[2]}");
@@ -529,11 +530,11 @@
%{$cat_order} = %{$instcats->{'cat_order'}};
$totcodes = scalar(keys(%{$codes}));
if ((!$totcodes) && (exists($instcats->{'totcodes'}))) {
- $totcodes = $instcats->{'totcodes'};
+ $totcodes = $instcats->{'totcodes'};
}
&build_code_selections($codes,$codetitles,$cat_titles,$cat_order,
\%idlist,\%idnums,\%idlist_titles);
- my ($scripttext,$longtitles) =
+ my ($scripttext,$longtitles) =
&javascript_definitions($codetitles,\%idlist,\%idlist_titles,
\%idnums,$cat_titles);
my $longtitles_str = join('","',@{$longtitles});
More information about the LON-CAPA-cvs
mailing list