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

[raeburn]

raeburn		Sat Oct 31 05:47:10 2009 EDT

  Modified files:              
    /loncom/interface	loncommon.pm 
  Log:
  - Accommodate Communities.
  
  
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.905 loncom/interface/loncommon.pm:1.906
--- loncom/interface/loncommon.pm:1.905	Fri Oct 30 04:44:56 2009
+++ loncom/interface/loncommon.pm	Sat Oct 31 05:47:10 2009
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.905 2009/10/30 04:44:56 raeburn Exp $
+# $Id: loncommon.pm,v 1.906 2009/10/31 05:47:10 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -764,6 +764,9 @@
    my $linktext = &mt('Select Course');
    if ($selecttype eq 'Community') {
        $linktext = &mt('Select Community'); 
+   } elsif ($selecttype eq 'Course/Community') {
+       $linktext = &mt('Select Course/Community');
+       $selecttype = 'Course';
    }
    return '<span class="LC_nobreak">'
          ."<a href='"