[LON-CAPA-cvs] cvs: loncom /interface loncreateuser.pm
raeburn
lon-capa-cvs-allow@mail.lon-capa.org
Wed, 05 Dec 2007 17:31:28 -0000
raeburn Wed Dec 5 12:31:28 2007 EDT
Modified files:
/loncom/interface loncreateuser.pm
Log:
- For existing users, in "Log-in Data" call to loncommon::start_data_table_row() for "Do not change" row first, so colors alternate correctly in data table.
- Missing an &end_data_table_row()
Index: loncom/interface/loncreateuser.pm
diff -u loncom/interface/loncreateuser.pm:1.199 loncom/interface/loncreateuser.pm:1.200
--- loncom/interface/loncreateuser.pm:1.199 Wed Dec 5 12:13:34 2007
+++ loncom/interface/loncreateuser.pm Wed Dec 5 12:31:28 2007
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Create a user
#
-# $Id: loncreateuser.pm,v 1.199 2007/12/05 17:13:34 raeburn Exp $
+# $Id: loncreateuser.pm,v 1.200 2007/12/05 17:31:28 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1198,6 +1198,10 @@
}
} else { # Authentication type is valid
&initialize_authen_forms($ccdomain,$currentauth);
+ my $authformnop_row;
+ if (&Apache::lonnet::allowed('mau',$ccdomain)) {
+ $authformnop_row = &Apache::loncommon::start_data_table_row();
+ }
my ($authformcurrent,$authform_other,$can_modify) =
&modify_login_block($ccdomain,$currentauth);
if (&Apache::lonnet::allowed('mau',$ccdomain)) {
@@ -1213,7 +1217,7 @@
'</script>'."\n".
'<h3>'.$lt{'ld'}.'</h3>'.
&Apache::loncommon::start_data_table().
- &Apache::loncommon::start_data_table_row().
+ $authformnop_row.
'<td>'.$authformnop;
if ($can_modify) {
$outcome .= '</td>'."\n".
@@ -1222,7 +1226,8 @@
'<td>'.$authformcurrent.'</td>'.
&Apache::loncommon::end_data_table_row()."\n";
} else {
- $outcome .= ' ('.$authformcurrent.')</td>';
+ $outcome .= ' ('.$authformcurrent.')</td>'.
+ &Apache::loncommon::end_data_table_row()."\n";
}
if ($authform_other ne '') {
$outcome .= $authform_other;