[LON-CAPA-cvs] cvs: loncom /interface lonnavmaps.pm

[raeburn]

raeburn		Sat Jan 12 00:04:36 2008 EDT

  Modified files:              
    /loncom/interface	lonnavmaps.pm 
  Log:
  bug 5578. Need to be explicit about requesting a scalar from &Apache::lonnet::EXT() following changes in lonnet.pm rev 1.927 put in place to address bug 5513.
  
  
Index: loncom/interface/lonnavmaps.pm
diff -u loncom/interface/lonnavmaps.pm:1.408 loncom/interface/lonnavmaps.pm:1.409
--- loncom/interface/lonnavmaps.pm:1.408	Thu Jan 10 11:49:58 2008
+++ loncom/interface/lonnavmaps.pm	Sat Jan 12 00:04:35 2008
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Navigate Maps Handler
 #
-# $Id: lonnavmaps.pm,v 1.408 2008/01/10 16:49:58 raeburn Exp $
+# $Id: lonnavmaps.pm,v 1.409 2008/01/12 05:04:35 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3890,10 +3890,11 @@
 sub weight { 
     my $self = shift; my $part = shift;
     if (!defined($part)) { $part = '0'; }
-    return &Apache::lonnet::EXT('resource.'.$part.'.weight',
-				$self->symb(), $env{'user.domain'},
-				$env{'user.name'}, 
-				$env{'request.course.sec'});
+    my $weight = &Apache::lonnet::EXT('resource.'.$part.'.weight',
+                                $self->symb(), $env{'user.domain'},
+                                $env{'user.name'},
+                                $env{'request.course.sec'});
+    return $weight;
 }
 sub part_display {
     my $self= shift(); my $partID = shift();