[LON-CAPA-cvs] cvs: loncom / lond

raeburn raeburn@source.lon-capa.org
Thu, 22 Jul 2010 22:08:06 -0000


raeburn		Thu Jul 22 22:08:06 2010 EDT

  Modified files:              
    /loncom	lond 
  Log:
  - $clientversion is not provided by remote clients running pre-2.9 versions.
  - For those clients use value from local %Apache::lonnet::loncaparevs hash,
    which is populated from /home/httpd/lonTabs/loncaparevs.tab 
    (rebuilt by nightly loncron).  
  
  
Index: loncom/lond
diff -u loncom/lond:1.448 loncom/lond:1.449
--- loncom/lond:1.448	Tue Jul 20 02:42:27 2010
+++ loncom/lond	Thu Jul 22 22:08:06 2010
@@ -2,7 +2,7 @@
 # The LearningOnline Network
 # lond "LON Daemon" Server (port "LOND" 5663)
 #
-# $Id: lond,v 1.448 2010/07/20 02:42:27 raeburn Exp $
+# $Id: lond,v 1.449 2010/07/22 22:08:06 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -58,7 +58,7 @@
 my $status='';
 my $lastlog='';
 
-my $VERSION='$Revision: 1.448 $'; #' stupid emacs
+my $VERSION='$Revision: 1.449 $'; #' stupid emacs
 my $remoteVERSION;
 my $currenthostid="default";
 my $currentdomainid;
@@ -1800,8 +1800,12 @@
                 if (ref($hostedsession) eq 'HASH') {
                     $hosted = $hostedsession->{'hosted'};
                 }
+                my $loncaparev = $clientversion;
+                if ($loncaparev eq '') {
+                    $loncaparev = $Apache::lonnet::loncaparevs{$clientname};
+                }
                 $canhost = &Apache::lonnet::can_host_session($udom,$clientname,
-                                                             $clientversion,
+                                                             $loncaparev,
                                                              $remote,$hosted);
             }
         }