--- loncom/interface/loncreatecourse.pm 2013/12/17 14:28:36 1.151
+++ loncom/interface/loncreatecourse.pm 2013/12/24 19:15:10 1.152
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Create a course
#
-# $Id: loncreatecourse.pm,v 1.151 2013/12/17 14:28:36 raeburn Exp $
+# $Id: loncreatecourse.pm,v 1.152 2013/12/24 19:15:10 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -317,8 +317,8 @@ END
$r->print(&Apache::lonhtmlcommon::row_headline()
.'
'.$lt{'iinf'}.'
'
.$lt{'stat'}.' '
- .&mt('Default credits can also be specified, if different from the domain defaults (official courses: [_1]; unofficial courses: [_2]).',
- $domdefaults{'officialcredits'},$domdefaults{'unofficialcredits'})
+ .&mt('Default credits can also be specified, if different from the domain defaults (official courses: [_1]; unofficial courses: [_2]; textbook courses: [_3]).',
+ $domdefaults{'officialcredits'},$domdefaults{'unofficialcredits'},$domdefaults{'textbookcredits'})
.&Apache::lonhtmlcommon::row_closure()
.&Apache::lonhtmlcommon::row_title($lt{'ccod'})
@@ -336,7 +336,7 @@ END
.'
('.$lt{'cscs'}.')'
.&Apache::lonhtmlcommon::row_closure()
);
- if ($domdefaults{'officialcredits'} || $domdefaults{'unofficialcredits'}) {
+ if ($domdefaults{'officialcredits'} || $domdefaults{'unofficialcredits'} || $domdefaults{'textbookcredits'}) {
$r->print(&Apache::lonhtmlcommon::row_title($lt{'ccre'})
.''
.'
('.$lt{'cred'}.')'
@@ -649,7 +649,7 @@ sub create_course {
};
if (($crstype eq 'Course') &&
- ($domdefaults{'officialcredits'} || $domdefaults{'unofficialcredits'})) {
+ ($domdefaults{'officialcredits'} || $domdefaults{'unofficialcredits'} || $domdefaults{'textbookcredits'})) {
$args->{'defaultcredits'} = $env{'form.defaultcredits'};
}