Only mailman 3 adds the domain name to the list name #3

virtualmin · May 12, 2024 · b1d4926 · b1d4926
1 parent 2d2fdf9
commit b1d4926
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/virtualmin-mailman-lib.pl b/virtualmin-mailman-lib.pl
@@ -93,9 +93,12 @@ sub list_lists
 &read_file($lists_file, \%lists);
 opendir(DIR, $lists_dir);
 my ($f, $fdom);
+my $ver = &get_mailman_version();
 while($f = readdir(DIR)) {
 	next if ($f eq "." || $f eq "..");
-	($f, $fdom) = split(/\./, $f, 2);
+	if ($ver >= 3) {
+		($f, $fdom) = split(/\./, $f, 2);
+		}
 	next if (!$lists{$f});
 	my ($dom, $desc) = split(/\t+/, $lists{$f}, 2);
 	if (!$desc && $f eq 'mailman') {