From 95a44c07d26b25818fd1a4ae62f57440e4fe7aa2 Mon Sep 17 00:00:00 2001
From: tilpner
Date: Sun, 17 May 2020 20:43:49 +0200
Subject: html5_events: port to Regexp::Assemble

---
 html5_events/html5_events.pl | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'html5_events')

diff --git a/html5_events/html5_events.pl b/html5_events/html5_events.pl
index 0406ff1..cee2568 100644
--- a/html5_events/html5_events.pl
+++ b/html5_events/html5_events.pl
@@ -3,7 +3,7 @@ use strict;
 
 require LWP::UserAgent;
 use LWP::Simple;
-use Regexp::List;
+use Regexp::Assemble;
 use File::stat;
 use File::Basename;
 use List::MoreUtils qw(uniq);
@@ -69,8 +69,9 @@ sub create_re
   print OUT join("\n", @all_events);
   close OUT;
 
-  my $l  = Regexp::List->new;
-  my $re = $l->list2re(@all_events);
+  my $l  = Regexp::Assemble->new;
+  $l->add(@all_events);
+  my $re = $l->re;
   $re =~ s/\(\?[-^]\w+:(.*)\)/$1/;
 
   open (OUT, ">$cache");
-- 
cgit v1.2.3