[LON-CAPA-cvs] cvs: loncom(loncapaMITrelate_1) /interface lonfeedback.pm

raeburn raeburn at source.lon-capa.org
Sun Jun 17 11:35:16 EDT 2012


raeburn		Sun Jun 17 15:35:16 2012 EDT

  Modified files:              (Branch: loncapaMITrelate_1)
    /loncom/interface	lonfeedback.pm 
  Log:
  - Customization for MITrelate.
    - Backport 1.357.
  
  
Index: loncom/interface/lonfeedback.pm
diff -u loncom/interface/lonfeedback.pm:1.290.2.7.2.5 loncom/interface/lonfeedback.pm:1.290.2.7.2.6
--- loncom/interface/lonfeedback.pm:1.290.2.7.2.5	Tue May  1 15:56:16 2012
+++ loncom/interface/lonfeedback.pm	Sun Jun 17 15:35:15 2012
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Feedback
 #
-# $Id: lonfeedback.pm,v 1.290.2.7.2.5 2012/05/01 15:56:16 raeburn Exp $
+# $Id: lonfeedback.pm,v 1.290.2.7.2.6 2012/06/17 15:35:15 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1070,8 +1070,8 @@
                 next if ($contrib{$idx.':deleted'});
                 next if ($contrib{$idx.':hidden'});
                 unless ((($hiddens{$idx}) && (!$seehidden)) || ($deletions{$idx}) || (!$contrib{$idx.':message'})) {
+                    push(@theselikes,$likes{$symb.':'.$idx.':likes'});
                     if ($likes{$symb.':'.$idx.':likes'} ne '') {
-                        push(@theselikes,$likes{$symb.':'.$idx.':likes'});
                         if (ref($likes{$symb.':'.$idx.':likers'}) eq 'HASH') {
                             if (exists($likes{$symb.':'.$idx.':likers'}{$thisuser})) {
                                 $userlikes{$idx} = 1;




More information about the LON-CAPA-cvs mailing list