Merge branch 'master' of http://git.ankarstrom.se/perlisdead

1 files changed, 3 insertions, 3 deletions

diff --git a/run/irc b/run/irc
index 89ae4fa..0e9f041 100755
--- a/run/irc
+++ b/run/irc
@@ -10,11 +10,11 @@ $ua->ssl_opts(verify_hostname => 0);
 $ua->env_proxy;
 $ua->agent('');
 
-my $u = 'https://netsplit.de/channels/details.php?room=%23perl&net=freenode';
+my $u = 'https://netsplit.de/channels/details.php?room=%23perl&net=Libera.Chat';
 my $r = $ua->get($u);
 
-my $i = '/tmp/channels/irc-stats-712-40793320.png';
-my $d = '#perl freenode - Graph about the amount of users during the last weeks';
+my $i = '/tmp/channels/irc-stats-7842-45163956.png';
+my $d = '#perl Libera.Chat - Graph about the amount of users during the last weeks';
 $r->decoded_content =~ m{<img border="0" src="(/tmp/channels/[^"<>]*?\.png)" alt="([^"<>]*?)"} if $r->is_success;
 $i = $1 if $1;
 $d = $2 if $2;