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

www lon-capa-cvs@mail.lon-capa.org
Sat, 16 Aug 2003 18:48:24 -0000


www		Sat Aug 16 14:48:24 2003 EDT

  Modified files:              
    /loncom/interface	lonindexer.pm 
  Log:
  Use correct domain design.
  
  
Index: loncom/interface/lonindexer.pm
diff -u loncom/interface/lonindexer.pm:1.73 loncom/interface/lonindexer.pm:1.74
--- loncom/interface/lonindexer.pm:1.73	Mon Aug 11 13:27:24 2003
+++ loncom/interface/lonindexer.pm	Sat Aug 16 14:48:24 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Directory Indexer
 #
-# $Id: lonindexer.pm,v 1.73 2003/08/11 17:27:24 albertel Exp $
+# $Id: lonindexer.pm,v 1.74 2003/08/16 18:48:24 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -337,7 +337,9 @@
 
 </head>
 ENDHEADER
-$r->print(&Apache::loncommon::bodytag('Browse Resources'));
+my ($headerdom)=($uri=~/^\/res\/(\w+)\//);
+$r->print(&Apache::loncommon::bodytag('Browse Resources',undef,undef,undef,
+				      $headerdom));
 # - Evaluate actions from previous page (both cumulatively and chronologically)
         if ($ENV{'form.catalogmode'} eq 'groupimport') {
 	    my $acts=$ENV{'form.acts'};