From 20f767e2f26fe0457b60c06081fc74f4a6ee437e Mon Sep 17 00:00:00 2001 From: Pragmatic Software Date: Fri, 17 Jan 2020 23:00:55 -0800 Subject: [PATCH] RegistryCommands: fix `regfind` --- PBot/RegistryCommands.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/PBot/RegistryCommands.pm b/PBot/RegistryCommands.pm index e410a586..d2a7f6c5 100644 --- a/PBot/RegistryCommands.pm +++ b/PBot/RegistryCommands.pm @@ -210,7 +210,7 @@ sub regfind { my ($section, $showvalues); $section = $1 if $arguments =~ s/-section\s+([^\b\s]+)//i; - $showvalues = 1 if $arguments =~ s/-showvalues//i; + $showvalues = 1 if $arguments =~ s/-showvalues?//i; $arguments =~ s/^\s+//; $arguments =~ s/\s+$//; @@ -220,7 +220,7 @@ sub regfind { return $usage; } - $section = lc $section; + $section = lc $section if defined $section;; my ($text, $last_item, $last_section, $i); $last_section = "";