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

matthew lon-capa-cvs@mail.lon-capa.org
Thu, 16 Sep 2004 19:42:10 -0000


matthew		Thu Sep 16 15:42:10 2004 EDT

  Modified files:              (Branch: version_1_2_X)
    /loncom/interface	lonfeedback.pm 
  Log:
  - my backport wasn't correct
  
  
Index: loncom/interface/lonfeedback.pm
diff -u loncom/interface/lonfeedback.pm:1.99.2.8 loncom/interface/lonfeedback.pm:1.99.2.9
--- loncom/interface/lonfeedback.pm:1.99.2.8	Wed Sep 15 16:35:16 2004
+++ loncom/interface/lonfeedback.pm	Thu Sep 16 15:42:09 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Feedback
 #
-# $Id: lonfeedback.pm,v 1.99.2.8 2004/09/15 20:35:16 albertel Exp $
+# $Id: lonfeedback.pm,v 1.99.2.9 2004/09/16 19:42:09 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -223,8 +223,8 @@
 #		    my $plainname=&Apache::loncommon::nickname(
 #					    $contrib{$idx.':sendername'},
 #					    $contrib{$idx.':senderdomain'});
-		    ($$screenname,$$plainname)=($$contrib{$idx.':screenname'},
-						$$contrib{$idx.':plainname'});
+		    my ($screenname,$plainname)=($contrib{$idx.':screenname'},
+						 $contrib{$idx.':plainname'});
 		    my $sender=&mt('Anonymous');
 		    if ((!$contrib{$idx.':anonymous'}) || ($seeid)) {
 			$sender=&Apache::loncommon::aboutmewrapper(