regcharclass.pl: Rmv unused variable

Perl · Aug 7, 2021 · 741c1a9 · 741c1a9
1 parent cef3e2d
commit 741c1a9
Show file tree

Hide file tree

Showing 2 changed files with 1 addition and 3 deletions.
diff --git a/regcharclass.h b/regcharclass.h
@@ -3765,6 +3765,6 @@
  * 696e706fddd3ce8cd48c7ea91caf4c9edf5c296432d320aa7b78631f69aa9eac lib/unicore/mktables
  * 50b85a67451145545a65cea370dab8d3444fbfe07e9c34cef560c5b7da9d3eef lib/unicore/version
  * 0a6b5ab33bb1026531f816efe81aea1a8ffcd34a27cbea37dd6a70a63d73c844 regen/charset_translations.pl
- * caaecefabe09ed616a050deda95a866f399770bde5f5e2158cec7ba77a8ed794 regen/regcharclass.pl
+ * 1738139306d9ade7fcff636a38c9bf6c1889b98c63c8d7f8928e275ee5944afc regen/regcharclass.pl
  * b2f896452d2b30da3e04800f478c60c1fd0b03d6b668689b020f1e3cf1f1cdd9 regen/regcharclass_multi_char_folds.pl
  * ex: set ro: */
diff --git a/regen/regcharclass.pl b/regen/regcharclass.pl
@@ -1157,8 +1157,6 @@ sub _cond_as_str {
             $ranges[$i] = "( $test >= " . $self->val_fmt($ranges[0]->[0]) . " )";
         }
         else {
-            my $output = "";
-
             # Well-formed UTF-8 continuation bytes on ascii platforms must be
             # in the range 0x80 .. 0xBF.  If we know that the input is
             # well-formed (indicated by not trying to be 'safe'), we can omit