Commit 076af646 authored by Leo Gordon's avatar Leo Gordon
Browse files

a typo in comments

parent a81c8863
......@@ -126,7 +126,7 @@ sub CreateNewJob {
or die "Coule not run\n\t$sql\nwith data:\n\t(".join(',', @values).')';
my $job_id;
if($return_code > 0) { # <--- for the same reason we have to be expliticly numeric here:
if($return_code > 0) { # <--- for the same reason we have to be explicitly numeric here:
$job_id = $dbc->db_handle->last_insert_id(undef, undef, 'job', 'job_id');
$sth->finish;
......
......@@ -314,7 +314,7 @@ sub store {
my $return_code = $this_sth->execute( @$values_being_stored )
# using $return_code in boolean context allows to skip the value '0E0' ('no rows affected') that Perl treats as zero but regards as true:
or die "Could not store fields\n\t{$column_key}\nwith data:\n\t(".join(',', @$values_being_stored).')';
if($return_code > 0) { # <--- for the same reason we have to be expliticly numeric here
if($return_code > 0) { # <--- for the same reason we have to be explicitly numeric here
$self->mark_stored($object, $self->dbc->db_handle->last_insert_id(undef, undef, $table_name, $autoinc_id) );
}
}
......
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