[LON-CAPA-cvs] cvs: loncom /automation batchcreatecourse.pm
bisitz
bisitz@source.lon-capa.org
Sat, 30 Jan 2010 22:16:50 -0000
bisitz Sat Jan 30 22:16:50 2010 EDT
Modified files:
/loncom/automation batchcreatecourse.pm
Log:
Corrected typo in rev. 1.34
Index: loncom/automation/batchcreatecourse.pm
diff -u loncom/automation/batchcreatecourse.pm:1.34 loncom/automation/batchcreatecourse.pm:1.35
--- loncom/automation/batchcreatecourse.pm:1.34 Sat Jan 30 15:47:01 2010
+++ loncom/automation/batchcreatecourse.pm Sat Jan 30 22:16:50 2010
@@ -1,5 +1,5 @@
#
-# $Id: batchcreatecourse.pm,v 1.34 2010/01/30 15:47:01 raeburn Exp $
+# $Id: batchcreatecourse.pm,v 1.35 2010/01/30 22:16:50 bisitz Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -320,7 +320,7 @@
@{$$details{$num}{'users'}{$userkey}{'roles'}} = ();
} elsif ("@state" eq "class users user email") {
$$details{$num}{'users'}{$userkey}{'emailaddr'} = $text;
- $$details{$num}{'users'}{$userkey}{'emailenc'} = &LONCAPA:escape($text);
+ $$details{$num}{'users'}{$userkey}{'emailenc'} = &LONCAPA::escape($text);
} elsif ("@state" eq "class users user roles role start") {
if (grep(/^\Q$role\E$/,@possroles)) {
$$details{$num}{'users'}{$userkey}{$role}{'start'} = &process_date($text);