Commit dd29a0b4 authored by Leigh B. Stoller's avatar Leigh B. Stoller

Avoid warnings when node is not allocated and there is no experiment

creator.
parent 75377b0d
......@@ -27,12 +27,12 @@ my ($bossname) = split(" ", `tmcc bossinfo`);
# Might change at some point with multiuser nodes.
#
my (undef,$creator) = split("=", `tmcc creator`);
chop($creator);
if (!defined($creator)) {
print STDERR "Could not determine experiment creator!\n";
exit(1);
}
chop($creator);
(undef,undef,$uid,$gid,undef,undef,undef,undef) = getpwnam($creator);
if (!defined($uid)) {
......
......@@ -27,12 +27,12 @@ my ($bossname) = split(" ", `tmcc bossinfo`);
# Might change at some point with multiuser nodes.
#
my (undef,$creator) = split("=", `tmcc creator`);
chop($creator);
if (!defined($creator)) {
print STDERR "Could not determine experiment creator!\n";
exit(1);
}
chop($creator);
(undef,undef,$uid,$gid,undef,undef,undef,undef) = getpwnam($creator);
if (!defined($uid)) {
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment