X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=glafp-utils%2Frunstdtest%2Frunstdtest.prl;fp=glafp-utils%2Frunstdtest%2Frunstdtest.prl;h=e6a3534b1e16f1da67e9ddfcd9b831bfef68dc21;hb=34a7ef9c84fedbbb8d181dd1cfeb8aee5601c206;hp=26ba0cb6382b565282e1cda8786f5f08ae7432e6;hpb=dc7c699d792bf115a1f3192db15179d7bd461957;p=ghc-hetmet.git diff --git a/glafp-utils/runstdtest/runstdtest.prl b/glafp-utils/runstdtest/runstdtest.prl index 26ba0cb..e6a3534 100644 --- a/glafp-utils/runstdtest/runstdtest.prl +++ b/glafp-utils/runstdtest/runstdtest.prl @@ -305,7 +305,7 @@ exit 0; sub grab_arg_arg { local($option, $rest_of_arg) = @_; - if ($rest_of_arg) { + if ($rest_of_arg ne "") { return($rest_of_arg); } elsif ($#ARGV >= 0) { local($temp) = $ARGV[0]; shift(@ARGV);