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

www lon-capa-cvs@mail.lon-capa.org
Fri, 17 Jun 2005 18:18:39 -0000


www		Fri Jun 17 14:18:39 2005 EDT

  Modified files:              
    /loncom/interface	lonindexer.pm 
  Log:
  Bug #4131 - extra linebreak in sequence display
  
  
Index: loncom/interface/lonindexer.pm
diff -u loncom/interface/lonindexer.pm:1.133 loncom/interface/lonindexer.pm:1.134
--- loncom/interface/lonindexer.pm:1.133	Thu Apr  7 02:56:23 2005
+++ loncom/interface/lonindexer.pm	Fri Jun 17 14:18:38 2005
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Directory Indexer
 #
-# $Id: lonindexer.pm,v 1.133 2005/04/07 06:56:23 albertel Exp $
+# $Id: lonindexer.pm,v 1.134 2005/06/17 18:18:38 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -970,10 +970,6 @@
 	}
 # Filetype icons
 	$r->print("<img src='$iconname' border='0' />\n");
-# Close form to open/close sequence
-	if ($filelink=~/\.(page|sequence)$/) {
-	    $r->print('</form>');
-	}
 	my $quotable_filelink = &Apache::loncommon::escape_single($filelink);
 
 
@@ -984,6 +980,10 @@
 	$r->print (" (<a href=\"javascript:openWindow('".$quotable_filelink.
 		   ".meta', 'metadatafile', '500', '550', 'no', 'yes','no')\"; ".
 		   "TARGET=_self>metadata</a>) ");
+# Close form to open/close sequence
+	if ($filelink=~/\.(page|sequence)$/) {
+	    $r->print('</form>');
+	}
 	$r->print("</td>\n");
 	if ($hash{'display_attrs_0'} == 1) {
 	    my $title = &Apache::lonnet::gettitle($filelink,'title');