$OpenBSD: patch-lib_Bio_ASN1_Sequence_pm,v 1.1 2019/08/09 16:03:10 cwen Exp $

Fix unescaped braces as it triggers a warning with Perl 5.28

Index: lib/Bio/ASN1/Sequence.pm
--- lib/Bio/ASN1/Sequence.pm.orig
+++ lib/Bio/ASN1/Sequence.pm
@@ -256,7 +256,7 @@ sub next_seq
   {
     chomp;
     next unless /\S/;
-    my $tmp = (/^\s*Seq-entry ::= set ({.*)/si)? $1 : "{" . $_; # get rid of the 'Seq-entry ::= set ' at the beginning of Sequence record
+    my $tmp = (/^\s*Seq-entry ::= set (\{.*)/si)? $1 : "{" . $_; # get rid of the 'Seq-entry ::= set ' at the beginning of Sequence record
     return $self->parse($tmp, $compact, 1); # 1 species no resetting line number
   }
 }
@@ -317,7 +317,7 @@ sub _parse
         elsif($data->{$id}) { $data->{$id} = [$data->{$id}, $value] } # hash value has a second terminal value now!
         else { $data->{$id} = $value } # the first terminal value
       }
-      elsif($self->{input} =~ /\G{/cg)
+      elsif($self->{input} =~ /\G\{/cg)
       {
         $self->{depth}++;
         push(@{$data->{$id}}, $self->_parse());
