Commit 23aea781 authored by Mike Hibler's avatar Mike Hibler

Jeez Mike, how long have you been using perl now?

parent a442fd55
...@@ -533,11 +533,11 @@ sub TBValidUserDir($$;$$$) ...@@ -533,11 +533,11 @@ sub TBValidUserDir($$;$$$)
$sroot = $FSDIR_SCRATCH; $sroot = $FSDIR_SCRATCH;
} }
} elsif ($WITHAMD) { } elsif ($WITHAMD) {
$uroot = $AMDROOT/$USERROOT; $uroot = "$AMDROOT/$USERROOT";
$proot = $AMDROOT/$PROJROOT; $proot = "$AMDROOT/$PROJROOT";
$groot = $AMDROOT/$GROUPROOT; $groot = "$AMDROOT/$GROUPROOT";
if ($FSDIR_SCRATCH) { if ($FSDIR_SCRATCH) {
$sroot = $AMDROOT/$SCRATCHROOT; $sroot = "$AMDROOT/$SCRATCHROOT";
} }
} else { } else {
$uroot = $USERROOT; $uroot = $USERROOT;
......
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