fix equality checks

alex-ameen · alex-ameen · commit 46df21506e90 · 2025-12-05T09:59:15.000-06:00
diff --git a/tools/mixed_language_module_map_extender/mixed_language_module_map_extender.pl b/tools/mixed_language_module_map_extender/mixed_language_module_map_extender.pl
@@ -17,7 +17,7 @@
 
 # Check arguments
 if ( @ARGV != 4 ||
-     ( @ARGV = 1 && ( $ARGV[0] == '-h' || $ARGV[0] == "--help" ) )
+     ( @ARGV == 1 && ( $ARGV[0] eq '-h' || $ARGV[0] eq "--help" ) )
    )
   {
     my $msg = "USAGE: $0 <output> <modulemap> <module_name> " .

Original file line number	Diff line number	Diff line change
`@@ -17,7 +17,7 @@`
`17`	`17`
`18`	`18`	`# Check arguments`
`19`	`19`	`if ( @ARGV != 4 \|\|`
`20`		`- ( @ARGV = 1 && ( $ARGV[0] == '-h' \|\| $ARGV[0] == "--help" ) )`
	`20`	`+ ( @ARGV == 1 && ( $ARGV[0] eq '-h' \|\| $ARGV[0] eq "--help" ) )`
`21`	`21`	`)`
`22`	`22`	`{`
`23`	`23`	`my $msg = "USAGE: $0 <output> <modulemap> <module_name> " .`