From 910ab67e01d99c6ce50727e24c5bff393e102639 Mon Sep 17 00:00:00 2001
From: Ryan Voots <simcop2387@simcop2387.info>
Date: Sun, 31 May 2020 12:41:01 -0400
Subject: [PATCH] Update plugin changes and dbs

---
 plugins/get.pm       | 4 ++--
 plugins/supereval.pm | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/plugins/get.pm b/plugins/get.pm
index 4696591..17c4fa6 100644
--- a/plugins/get.pm
+++ b/plugins/get.pm
@@ -40,13 +40,13 @@ sub {
 	}
     
   my @text;
-  my $document = HTML::TreeBuilder::XPath->new_from_content( $resp->content );
+  my $document = HTML::TreeBuilder::XPath->new_from_content( $resp->decoded_content );
   if (!$document) { 
       print "Could not parsinate that page!";
   }
   # just the xpath left
   if ($said->{body} =~ /^\s*\.\*\s*$/) {
-      print $resp->content;
+      print $resp->decoded_content;
   } elsif ($said->{body}) {
       @text = eval{
           $document->findvalues( $said->{body} );
diff --git a/plugins/supereval.pm b/plugins/supereval.pm
index 5b5a80f..53a8a9e 100644
--- a/plugins/supereval.pm
+++ b/plugins/supereval.pm
@@ -177,7 +177,7 @@ sub command {
     $code = "use ojo; ".$code if ($c =~ /m/);
   }
 
-  $code = "use utf8; ". $code if ($type =~ /^perl(5.(8|10|12|14|16|18|20|22|24|26))?$/);
+  $code = "use utf8; ". $code if ($type =~ /^perl(5.(8|10|12|14|16|18|20|22|24|26|28|30))?$/);
 
   $code =~ s/␤/\n/g;