Browse Source

Add comments regarding potential string arguments.

master
poikilos 5 years ago
parent
commit
a0e29da146
  1. 15
      utilities/mtcompile-program-local.pl

15
utilities/mtcompile-program-local.pl

@ -342,7 +342,8 @@ sub Main
#--------------------------------------------------------------------- #---------------------------------------------------------------------
# Command-line option flags. # Command-line option flags.
my $MT_SRC = FALSE ;
#my $MT_DST = FALSE ;
my $FlagBuild = FALSE ; my $FlagBuild = FALSE ;
my $FlagClient = FALSE ; my $FlagClient = FALSE ;
my $FlagDebug = FALSE ; my $FlagDebug = FALSE ;
@ -405,6 +406,8 @@ sub Main
"safe" => \$FlagSafe , "safe" => \$FlagSafe ,
"server" => \$FlagServer , "server" => \$FlagServer ,
"usage" => \$FlagHelp , "usage" => \$FlagHelp ,
#"MT_SRC" => \$MT_SRC ,
#"MT_DST" => \$MT_DST ,
); );
# Handle usage-text exit # Handle usage-text exit
&UsageText() if !$FlagBuild || $FlagHelp || scalar (@ARGV); &UsageText() if !$FlagBuild || $FlagHelp || scalar (@ARGV);
@ -652,12 +655,14 @@ rm -fr "$PRODDIR" minetest-newline* || exit 1
mkdir "$PRODDIR" minetest-newline || exit 1 mkdir "$PRODDIR" minetest-newline || exit 1
rmdir "$PRODDIR" minetest-newline || exit 1 rmdir "$PRODDIR" minetest-newline || exit 1
END END
my $CUSTOM_MT_SRC = "$ENV{'HOME'}/git/minetest"; my $MT_SRC = "$ENV{'HOME'}/git/minetest";
if (-d $CUSTOM_MT_SRC) { if (-d $MT_SRC) {
print("Using CUSTOM_MT_SRC $CUSTOM_MT_SRC as $PRODDIR\n"); # if ($MT_SRC) {
print("Using MT_SRC $MT_SRC as $PRODDIR\n");
$cmd = << "END"; $cmd = << "END";
rm -fr "$PRODDIR" minetest-newline* || exit 1 rm -fr "$PRODDIR" minetest-newline* || exit 1
cp -R "$CUSTOM_MT_SRC" "$PRODDIR" || exit 1 cp -R "$MT_SRC" "$PRODDIR" || exit 1
END END
} }
else { else {

Loading…
Cancel
Save