Log Message:
-----------
Allow periods in set names. This has been tested for a while without
ill effects. Such sets already exist - they can be created
in the Library Browser, but when they were exported, they could not be
re-imported.
Modified Files:
--------------
webwork-modperl/lib/WeBWorK/ContentGenerator/Instructor:
ProblemSetList.pm
Revision Data
-------------
Index: ProblemSetList.pm
===================================================================
RCS file: /webwork/cvs/system/webwork-modperl/lib/WeBWorK/ContentGenerator/Instructor/ProblemSetList.pm,v
retrieving revision 1.79
retrieving revision 1.80
diff -Llib/WeBWorK/ContentGenerator/Instructor/ProblemSetList.pm -Llib/WeBWorK/ContentGenerator/Instructor/ProblemSetList.pm -u -r1.79 -r1.80
--- lib/WeBWorK/ContentGenerator/Instructor/ProblemSetList.pm
+++ lib/WeBWorK/ContentGenerator/Instructor/ProblemSetList.pm
@@ -82,7 +82,7 @@
use CGI qw();
use WeBWorK::Utils qw(readFile listFilesRecursive cryptPassword sortByName);
-use constant HIDE_SETS_THRESHOLD => 50;
+use constant HIDE_SETS_THRESHOLD => 500;
use constant DEFAULT_PUBLISHED_STATE => 1;
use constant ONE_WEEK => 60*60*24*7;
@@ -1395,7 +1395,7 @@
my $setName = '';
- if ($fileName =~ m|^set([\w-]+)\.def$|) {
+ if ($fileName =~ m|^set([.\w-]+)\.def$|) {
$setName = $1;
} else {
warn qq{The setDefinition file name must begin with <CODE>set</CODE>},
|
