[LON-CAPA-cvs] cvs: loncom /auth lontokacc.pm /interface groupsort.pm londocs.pm lonindexer.pm lonsearchcat.pm rat lonambiguous.pm lonpageflip.pm

[albertel]

albertel		Tue Feb  7 14:46:31 2006 EDT

  Modified files:              
    /rat	lonpageflip.pm lonambiguous.pm 
    /loncom/auth	lontokacc.pm 
    /loncom/interface	lonindexer.pm londocs.pm lonsearchcat.pm 
                     	groupsort.pm 
  Log:
  - Apache 2 doesn't like it when PerlCleanupHandlers don't return an Apache::Constant (like OK or DECLINED ...)
  
  
Index: rat/lonpageflip.pm
diff -u rat/lonpageflip.pm:1.62 rat/lonpageflip.pm:1.63
--- rat/lonpageflip.pm:1.62	Mon Jan  9 13:51:26 2006
+++ rat/lonpageflip.pm	Tue Feb  7 14:46:08 2006
@@ -2,7 +2,7 @@
 #
 # Page flip handler
 #
-# $Id: lonpageflip.pm,v 1.62 2006/01/09 18:51:26 albertel Exp $
+# $Id: lonpageflip.pm,v 1.63 2006/02/07 19:46:08 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -46,6 +46,7 @@
 	    &Apache::lonnet::logthis('Failed cleanup pageflip: hash');
         }
     }
+    return OK;
 }
 
 sub addrid {
Index: rat/lonambiguous.pm
diff -u rat/lonambiguous.pm:1.16 rat/lonambiguous.pm:1.17
--- rat/lonambiguous.pm:1.16	Thu Apr  7 02:56:27 2005
+++ rat/lonambiguous.pm	Tue Feb  7 14:46:08 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to resolve ambiguous file locations
 #
-# $Id: lonambiguous.pm,v 1.16 2005/04/07 06:56:27 albertel Exp $
+# $Id: lonambiguous.pm,v 1.17 2006/02/07 19:46:08 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -44,6 +44,7 @@
 	    &Apache::lonnet::logthis('Failed cleanup ambiguous: bighash');
         }
     }
+    return OK;
 }
 
 # ----------------------------------------------------------- Could not resolve
Index: loncom/auth/lontokacc.pm
diff -u loncom/auth/lontokacc.pm:1.15 loncom/auth/lontokacc.pm:1.16
--- loncom/auth/lontokacc.pm:1.15	Thu Mar  3 00:44:51 2005
+++ loncom/auth/lontokacc.pm	Tue Feb  7 14:46:26 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Access Handler for User File Transfers
 #
-# $Id: lontokacc.pm,v 1.15 2005/03/03 05:44:51 albertel Exp $
+# $Id: lontokacc.pm,v 1.16 2006/02/07 19:46:26 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -80,6 +80,7 @@
     } else {
         &Apache::lonnet::logthis('Failed to transfer '.$r->filename);
     }
+    return OK;
 }
 1;
 __END__
Index: loncom/interface/lonindexer.pm
diff -u loncom/interface/lonindexer.pm:1.137 loncom/interface/lonindexer.pm:1.138
--- loncom/interface/lonindexer.pm:1.137	Mon Nov 14 18:17:12 2005
+++ loncom/interface/lonindexer.pm	Tue Feb  7 14:46:30 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Directory Indexer
 #
-# $Id: lonindexer.pm,v 1.137 2005/11/14 23:17:12 albertel Exp $
+# $Id: lonindexer.pm,v 1.138 2006/02/07 19:46:30 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1241,6 +1241,7 @@
     if (tied(%hash)){
 	&Apache::lonnet::logthis('Cleanup indexer: hash');
     }
+    return OK;
 }
 
 
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.220 loncom/interface/londocs.pm:1.221
--- loncom/interface/londocs.pm:1.220	Fri Jan 27 18:14:20 2006
+++ loncom/interface/londocs.pm	Tue Feb  7 14:46:30 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Documents
 #
-# $Id: londocs.pm,v 1.220 2006/01/27 23:14:20 albertel Exp $
+# $Id: londocs.pm,v 1.221 2006/02/07 19:46:30 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1667,6 +1667,7 @@
 sub untiehash {
     if ($hashtied) { untie %hash; }
     $hashtied=0;
+    return OK;
 }
 
 # --------------------------------------------------------------- check on this
Index: loncom/interface/lonsearchcat.pm
diff -u loncom/interface/lonsearchcat.pm:1.251 loncom/interface/lonsearchcat.pm:1.252
--- loncom/interface/lonsearchcat.pm:1.251	Sun Feb  5 15:56:57 2006
+++ loncom/interface/lonsearchcat.pm	Tue Feb  7 14:46:30 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Search Catalog
 #
-# $Id: lonsearchcat.pm,v 1.251 2006/02/05 20:56:57 www Exp $
+# $Id: lonsearchcat.pm,v 1.252 2006/02/07 19:46:30 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3739,6 +3739,7 @@
     }
     &untiehash();
     &Apache::lonmysql::disconnect_from_db();
+    return OK;
 }
 
 __END__
Index: loncom/interface/groupsort.pm
diff -u loncom/interface/groupsort.pm:1.38 loncom/interface/groupsort.pm:1.39
--- loncom/interface/groupsort.pm:1.38	Fri Jun 10 21:06:54 2005
+++ loncom/interface/groupsort.pm	Tue Feb  7 14:46:30 2006
@@ -2,7 +2,7 @@
 # The LON-CAPA group sort handler
 # Allows for sorting prior to import into RAT.
 #
-# $Id: groupsort.pm,v 1.38 2005/06/11 01:06:54 www Exp $
+# $Id: groupsort.pm,v 1.39 2006/02/07 19:46:30 albertel Exp $
 # 
 # Copyright Michigan State University Board of Trustees
 #
@@ -195,6 +195,7 @@
 	    &Apache::lonnet::logthis('Failed cleanup groupsort: hash');
         }
     }
+    return OK;
 }
 
 # -------------------------------------------------------------- Read from file