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

[bisitz]

bisitz		Fri Nov 30 16:03:07 2012 EDT

  Modified files:              
    /loncom/interface	lonuserutils.pm 
  Log:
  - Label for "Open in a new window" link
  - actionbox for "Display User Lists" after action
  - Corrected wording (no "...for for..." anymore)
  
  
  
Index: loncom/interface/lonuserutils.pm
diff -u loncom/interface/lonuserutils.pm:1.143 loncom/interface/lonuserutils.pm:1.144
--- loncom/interface/lonuserutils.pm:1.143	Thu Oct  4 13:41:10 2012
+++ loncom/interface/lonuserutils.pm	Fri Nov 30 16:03:07 2012
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Utility functions for managing LON-CAPA user accounts
 #
-# $Id: lonuserutils.pm,v 1.143 2012/10/04 13:41:10 bisitz Exp $
+# $Id: lonuserutils.pm,v 1.144 2012/11/30 16:03:07 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2579,7 +2579,11 @@
             if ($env{'form.userwin'}) {
                 $checkwin = ' checked="checked"';
             }
-            $output .= '</td><td valign="top"  style="border-left: 1px solid;"><span class="LC_nobreak"><input type="checkbox" name="userwin" value="1"'.$checkwin.' />'.$lt{'owin'}.'</span></td></tr></table></fieldset></div>';
+            $output .=
+                '</td><td valign="top"  style="border-left: 1px solid;">'
+               .'<span class="LC_nobreak"><label>'
+               .'<input type="checkbox" name="userwin" value="1"'.$checkwin.' />'.$lt{'owin'}
+               .'</label></span></td></tr></table></fieldset></div>';
         }
         $output .= "\n".'<br clear="all" />'."\n".
                   &Apache::loncommon::start_data_table().
@@ -4926,7 +4930,7 @@
             }
         }
     }
-    $r->print('<p><b>'.&mt("$result_text{'ok'}{$choice} for [quant,_1,user role,user roles,no user roles].",$count).'</b></p>');
+    $r->print('<p><b>'.&mt("$result_text{'ok'}{$choice} [quant,_1,user role,user roles,no user roles].",$count).'</b></p>');
     if ($count > 0) {
         if ($choice eq 'revoke' || $choice eq 'drop') {
             $r->print('<p>'.&mt('Re-enabling will re-activate data for the role.').'</p>');
@@ -4943,7 +4947,10 @@
     if ($choice eq 'drop') {
         $linktext = &mt('Display current class roster');
     }
-    $r->print('<a href="javascript:document.studentform.submit()">'.$linktext.'</a></form>'."\n");
+    $r->print(
+        &Apache::lonhtmlcommon::actionbox(
+            ['<a href="javascript:document.studentform.submit()">'.$linktext.'</a>'])
+       .'</form>'."\n");
 }
 
 sub dates_feedback {