Use File::Spec in validate_commands
authorJacob Bachmeyer <jcb@gnu.org>
Sat, 29 Oct 2022 03:08:16 +0000 (22:08 -0500)
committerJacob Bachmeyer <jcb@gnu.org>
Sat, 29 Oct 2022 03:08:16 +0000 (22:08 -0500)
gatekeeper.pl

index 6ac1abc2d43942b2f82e6071bc5f53f79839f6e7..d94e99ebf9dc010322c479354ac39aaaed70035b 100755 (executable)
@@ -1912,7 +1912,7 @@ sub validate_commands {
   }
 
   # Configuration must exist for the package
-  -d $package_config_base . '/' . $op_header->{package}
+  -d File::Spec->catdir($package_config_base, $op_header->{package})
     or fatal("no configuration directory for package $op_header->{package}",0);
 
   # Check that we actually have at least one command in the directive