[LON-CAPA-cvs] cvs: loncom /interface loncreatecourse.pm
bisitz
lon-capa-cvs-allow@mail.lon-capa.org
Wed, 08 Oct 2008 11:03:53 -0000
bisitz Wed Oct 8 07:03:53 2008 EDT
Modified files:
/loncom/interface loncreatecourse.pm
Log:
Course Content table:
- Use LON-CAPA standard table styles
- Added 'or' to stress the difference between _new_ course and _clone_ course
Index: loncom/interface/loncreatecourse.pm
diff -u loncom/interface/loncreatecourse.pm:1.109 loncom/interface/loncreatecourse.pm:1.110
--- loncom/interface/loncreatecourse.pm:1.109 Thu Sep 25 13:44:11 2008
+++ loncom/interface/loncreatecourse.pm Wed Oct 8 07:03:53 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Create a course
#
-# $Id: loncreatecourse.pm,v 1.109 2008/09/25 17:44:11 bisitz Exp $
+# $Id: loncreatecourse.pm,v 1.110 2008/10/08 11:03:53 bisitz Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -127,6 +127,7 @@
'navi' => "Navigate",
'cid' => "Course ID",
'dmn' => "Domain",
+ 'dsh' => "Date Shift",
'asov' => "Additional settings, if specified below, will override cloned settings",
'ncd' => "Do not clone date parameters",
'prd' => 'Clone date parameters as-is',
@@ -223,8 +224,8 @@
'Create_Course',undef,
'Create_Courses');
$r->print($start_page.$crumbs);
- if ($crstype eq 'Course') {
+ if ($crstype eq 'Course') {
$r->print('<form action="/adm/createcourse" method="post" name="ccrs">'
.&Apache::lonhtmlcommon::start_pick_box()
@@ -263,63 +264,84 @@
.'<input type="text" size="30" name="crsxlist" />'
.'<br />('.$lt{'cscs'}.')'
.&Apache::lonhtmlcommon::row_closure()
+ );
- .&Apache::lonhtmlcommon::row_headline()
+ # Table: New Course / Clone Course
+ $r->print(&Apache::lonhtmlcommon::row_headline()
.'<h3>'.$lt{'crco'}.'</h3>'
- );
- $r->print(<<MYEND);
-<table border="2">
-<tr><th>$lt{'cncr'}</th><th>$lt{'cecr'}</th></tr>
-<tr><td>
-<p>
-<label>
- <b>$lt{'map'}:</b>
- <input type="text" size="50" name="topmap" />
-</label>
-<a href="javascript:openbrowser('ccrs','topmap')">$lt{'smap'}</a>
-</p><p>
-<label for="nonstd"><b>$lt{'sacr'}</b></label>
-<br />
-($lt{'ocik'}):
-<input id="nonstd" type="checkbox" name="nonstandard" />
-</p><p>
-<b>$lt{'fres'}</b><br />($lt{'stco'}):
-<label>
- <input type="radio" name="firstres" value="blank" />$lt{'blnk'}
-</label>
-
-<label>
- <input type="radio" name="firstres" value="syl" checked="checked" />$lt{'sllb'}
-</label>
-
-<label>
- <input type="radio" name="firstres" value="nav" />$lt{'navi'}
-</label>
-</p>
-</td><td>
-<label>
- $lt{'cid'}: <input type="text" size="25" name="clonecourse" value="" />
-</label>
-<br />
-<label>
- $lt{'dmn'}: $cloneform
-</label>
-<br />
- <label><input type="radio" name="datemode" value="delete" /> $lt{'ncd'}</label><br />
- <label><input type="radio" name="datemode" value="preserve" /> $lt{'prd'}</label><br />
- <label><input type="radio" name="datemode" value="shift" checked="checked" /> $lt{'shd'}</label>
- <input type="text" size="5" name="dateshift" value="365" /><br />
- <br />
-$lt{'asov'}.
-</td></tr>
-</table>
-MYEND
+ .&Apache::loncommon::start_data_table()
+ .&Apache::loncommon::start_data_table_header_row()
+ .'<th>'.$lt{'cncr'}.'</th>'
+ .'<th> '.&mt('or').' </th>'
+ .'<th>'.$lt{'cecr'}.'</th>'
+ .&Apache::loncommon::end_data_table_header_row()
+ .&Apache::loncommon::start_data_table_row()
-
-$r->print(' '
+ # New Course:
+ .'<td>'
+ .&Apache::lonhtmlcommon::start_pick_box()
+ .&Apache::lonhtmlcommon::row_title($lt{'map'})
+ .'<input type="text" size="50" name="topmap" />'
+ .'<a href="javascript:openbrowser(\'ccrs\',\'topmap\')">'.$lt{'smap'}.'</a>'
+ .&Apache::lonhtmlcommon::row_closure()
+ .&Apache::lonhtmlcommon::row_title('<label for="nonstd">'.$lt{'sacr'}.'</label>')
+ .'<input id="nonstd" type="checkbox" name="nonstandard" />'
+ .'<br />('.$lt{'ocik'}.')'
.&Apache::lonhtmlcommon::row_closure()
+ .&Apache::lonhtmlcommon::row_title($lt{'fres'})
+ .'<label>'
+ .'<input type="radio" name="firstres" value="blank" />'.$lt{'blnk'}
+ .'</label>'
+ .' '
+ .'<label>'
+ .'<input type="radio" name="firstres" value="syl" checked="checked" />'.$lt{'sllb'}
+ .'</label>'
+ .' '
+ .'<label>'
+ .'<input type="radio" name="firstres" value="nav" />'.$lt{'navi'}
+ .'</label>'
+ .'<br />('.$lt{'stco'}.')'
+ .&Apache::lonhtmlcommon::row_closure(1)
+ .&Apache::lonhtmlcommon::end_pick_box()
+
+ .'<td> </td>'
+ # Clone Course:
+ .'<td>'
+ .&Apache::lonhtmlcommon::start_pick_box()
+ .&Apache::lonhtmlcommon::row_title($lt{'cid'})
+ .'<label>'
+ .'<input type="text" size="25" name="clonecourse" value="" />'
+ .'</label>'
+ .&Apache::lonhtmlcommon::row_closure(1)
+ .&Apache::lonhtmlcommon::row_title($lt{'dmn'})
+ .'<label>'
+ .$cloneform
+ .'</label>'
+ .&Apache::lonhtmlcommon::row_closure()
+ .&Apache::lonhtmlcommon::row_title($lt{'dsh'})
+ .'<label>'
+ .'<input type="radio" name="datemode" value="delete" /> '.$lt{'ncd'}
+ .'</label><br />'
+ .'<label>'
+ .'<input type="radio" name="datemode" value="preserve" /> '.$lt{'prd'}
+ .'</label><br />'
+ .'<label>'
+ .'<input type="radio" name="datemode" value="shift" checked="checked" /> '.$lt{'shd'}
+ .'</label>'
+ .' <input type="text" size="5" name="dateshift" value="365" />'
+ .&Apache::lonhtmlcommon::row_closure()
.&Apache::lonhtmlcommon::row_headline()
+ .$lt{'asov'}
+ .&Apache::lonhtmlcommon::row_closure(1)
+ .&Apache::lonhtmlcommon::end_pick_box()
+ .'</td>'
+ .&Apache::loncommon::end_data_table_row()
+ .&Apache::loncommon::end_data_table()
+ .&Apache::lonhtmlcommon::row_closure()
+ );
+
+ $r->print(&Apache::lonhtmlcommon::row_headline()
.'<h3>'.$lt{'assp'}.'</h3>'
.&Apache::lonhtmlcommon::row_closure()
@@ -440,7 +462,7 @@
.&Apache::lonhtmlcommon::row_closure(1)
.&Apache::lonhtmlcommon::end_pick_box()
- );
+ );
$r->print(<<ENDDOCUMENT);
<p>