No need to mention perlmonks anymore as the incident happened years ago

charsbar · charsbar · commit b0d689e8632a · 2025-05-03T16:12:56.000+09:00
diff --git a/lib/pause_2017/PAUSE/Web/Plugin/ConfigPerRequest.pm b/lib/pause_2017/PAUSE/Web/Plugin/ConfigPerRequest.pm
@@ -79,7 +79,7 @@ sub _retrieve_user {
       $sth7->execute($user);
       my $error;
       if ($sth7->rows > 0) {
-        $error = "User '$user' set to nologin. Many users with an insecure password have got their password reset recently because of an incident on perlmonks.org. Please talk to modules\@perl.org to find out how to proceed";
+        $error = "User '$user' set to nologin. Many users with an insecure password have got their password reset recently. Please talk to modules\@perl.org to find out how to proceed";
       } else {
         $error = "User '$user' not known";
       }

Original file line number	Diff line number	Diff line change
`@@ -79,7 +79,7 @@ sub _retrieve_user {`
`79`	`79`	`$sth7->execute($user);`
`80`	`80`	`my $error;`
`81`	`81`	`if ($sth7->rows > 0) {`
`82`		`- $error = "User '$user' set to nologin. Many users with an insecure password have got their password reset recently because of an incident on perlmonks.org. Please talk to modules\@perl.org to find out how to proceed";`
	`82`	`+ $error = "User '$user' set to nologin. Many users with an insecure password have got their password reset recently. Please talk to modules\@perl.org to find out how to proceed";`
`83`	`83`	`} else {`
`84`	`84`	`$error = "User '$user' not known";`
`85`	`85`	`}`