ViewVC Help
View File | Revision Log | Show Annotations | Root Listing
root/cvsroot/UserCode/OSUT3Analysis/DBTools/scripts/osusub
(Generate patch)

Comparing UserCode/OSUT3Analysis/DBTools/scripts/osusub (file contents):
Revision 1.20 by ahart, Wed Jun 19 13:40:44 2013 UTC vs.
Revision 1.21 by ahart, Tue Jul 2 23:41:12 2013 UTC

# Line 8 | Line 8 | use POSIX;
8   use Term::ANSIColor;
9   use Cwd 'abs_path';
10  
11 + select ((select (STDOUT), $| = 1)[0]);
12 +
13   sub printHelp;
14   sub outputPset;
15   sub outputRunList;
# Line 199 | Line 201 | getLocation
201    if ($results->numrows () == 1)
202      {
203        my @row = $results->fetchrow ();
204 <      return ($row[3], $row[4], $row[5], $row[7]) if $row[7];
205 <      return ($row[3], $row[4], $row[5], $row[6]) if !$row[7];
204 >      $row[7] += 0;
205 >      return ($row[3], $row[4], $row[5], $row[7]) if $row[7] > 0;
206 >      return ($row[3], $row[4], $row[5], $row[6]) if $row[7] <= 0;
207      }
208    if ($results->numrows () == 0)
209      {

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines