[LON-CAPA-cvs] cvs: loncom(version_1_3_X) /interface lonsearchcat.pm

[albertel]

albertel		Fri Apr  1 15:01:33 2005 EDT

  Modified files:              (Branch: version_1_3_X)
    /loncom/interface	lonsearchcat.pm 
  Log:
  - backport 1.242
  
  
Index: loncom/interface/lonsearchcat.pm
diff -u loncom/interface/lonsearchcat.pm:1.237 loncom/interface/lonsearchcat.pm:1.237.2.1
--- loncom/interface/lonsearchcat.pm:1.237	Wed Feb  2 17:02:41 2005
+++ loncom/interface/lonsearchcat.pm	Fri Apr  1 15:01:32 2005
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Search Catalog
 #
-# $Id: lonsearchcat.pm,v 1.237 2005/02/02 22:02:41 albertel Exp $
+# $Id: lonsearchcat.pm,v 1.237.2.1 2005/04/01 20:01:32 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2469,8 +2469,8 @@
                 delete ($Server_status{$server});
                 next;
             }
-            $status=~/^([\.\w]+)$/; 
-       	    my $datafile=$r->dir_config('lonDaemons').'/tmp/'.$1;
+            $status=~s|/||g; 
+       	    my $datafile=$r->dir_config('lonDaemons').'/tmp/'.$status;
             if (-e $datafile && ! -e "$datafile.end") {
                 &update_status($r,&mt('Receiving results from [_1]',$server));
                 next;