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

albertel lon-capa-cvs-allow@mail.lon-capa.org
Fri, 17 Aug 2007 22:27:01 -0000


albertel		Fri Aug 17 18:27:01 2007 EDT

  Modified files:              
    /loncom/interface	lonindexer.pm 
  Log:
  - tabination
  - style 
  - &mt
  
  
Index: loncom/interface/lonindexer.pm
diff -u loncom/interface/lonindexer.pm:1.177 loncom/interface/lonindexer.pm:1.178
--- loncom/interface/lonindexer.pm:1.177	Fri Aug 17 17:33:19 2007
+++ loncom/interface/lonindexer.pm	Fri Aug 17 18:27:00 2007
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Directory Indexer
 #
-# $Id: lonindexer.pm,v 1.177 2007/08/17 21:33:19 banghart Exp $
+# $Id: lonindexer.pm,v 1.178 2007/08/17 22:27:00 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -477,29 +477,31 @@
 </tr>
 </table>
 <input type="hidden" name="attrs" value="1" />
-<label>
 END
-my @file_categories = &Apache::loncommon::filecategories();
-my %select_file_categories;
-my @select_form_order = ('');
-$select_file_categories{''} = 'All file types';
-foreach my $cat(@file_categories) {
-    my $types = join ",",&Apache::loncommon::filecategorytypes($cat);
-    $select_file_categories{$types} = $cat;
-    push(@select_form_order,$types);
-}
-$select_file_categories{'select_form_order'} = [@select_form_order];
-$r->print(&Apache::loncommon::select_form($typeselect,'only',
-			%select_file_categories
-			));
-$r->print(<<END);
-File Type Displayed</label>
+        my @file_categories = &Apache::loncommon::filecategories();
+        my %select_file_categories;
+        my @select_form_order = ('');
+        $select_file_categories{''} = 'All file types';
+        foreach my $cat (@file_categories) {
+	    my $types = join(",",&Apache::loncommon::filecategorytypes($cat));
+	    $select_file_categories{$types} = $cat;
+	    push(@select_form_order,$types);
+	}
+        $select_file_categories{'select_form_order'} = \@select_form_order;
+        my $type_element=
+	    &Apache::loncommon::select_form($typeselect,'only',
+					    %select_file_categories);
+        $type_element = '<label>'.&mt('File Type Displayed: [_1]',
+				      $type_element).'</label>';
+        $r->print(<<END);
+$type_element
 <br />
 <input type="submit" name="updatedisplay" value="$lt{'ud'}" />
 <input type="hidden" name="acts" value="" />
 $closebutton $groupimportbutton
 END
         $r->print(&Apache::loncommon::inhibit_menu_check('input'));
+   
 # -------------- Filter out sequence containment in crumbs and "recent folders"
 	my $storeuri=$uri;
 	$storeuri='/'.(split(/\.(page|sequence)\/\//,$uri))[-1];