Make the lists inactive.

[moira.git] / regtape / grouper.pl

diff --git a/regtape/grouper.pl b/regtape/grouper.pl
index d3be88703507ca8953d410d6154140c3f6378d59..950a9d70d69590e6aeb60cad1a560f8af742e9de 100755 (executable)
--- a/regtape/grouper.pl
+++ b/regtape/grouper.pl
@@ -65,7 +65,7 @@ foreach $class (@$classes) {
                 "*** DO NOT MODIFY *** Automatically-created registered students list for $class");
      &check_list("$base-others", $staff, 0,
                 "Non-registered students and miscellaneous people list for $class");
-     &check_list($base, $staff, 0,
+     &check_list($base, $staff, 1,
                 "*** DO NOT MODIFY *** Automatically-created participants list for $class");
      if (!$lists{$base}) {
         &add_member($staff, LIST, $base);
@@ -135,7 +135,7 @@ sub check_list {
     my ( $name, $owner, $export, $desc ) = @_;
     if (!$lists{$name}) {
        print LOG "Creating $name\n";
-       print MRTEST "qy alis $name 1 0 1 $export $export \"create unique GID\" 0 LIST $owner NONE NONE \"$desc\"\n";
+       print MRTEST "qy alis $name 0 0 1 $export $export \"create unique GID\" 0 LIST $owner NONE NONE \"$desc\"\n";
     }
 }