IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Changeset 16184


Ignore:
Timestamp:
Jan 22, 2008, 2:46:06 PM (18 years ago)
Author:
jhoblitt
Message:

fix dangling statement handle in delete_instance()

Location:
trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/Nebulous-Server/lib/Nebulous/Server.pm

    r13311 r16184  
    11# Copyright (c) 2004  Joshua Hoblitt
    22#
    3 # $Id: Server.pm,v 1.45 2007-05-09 00:45:21 jhoblitt Exp $
     3# $Id: Server.pm,v 1.46 2008-01-23 00:46:06 jhoblitt Exp $
    44
    55package Nebulous::Server;
     
    928928
    929929            unless ( $rows > 0 ) {
     930                $query->finish;
    930931                $log->logdie( "no instance is associated with uri" );
    931932            }
     
    933934            $so_id = $query->fetchrow_hashref->{ 'so_id' };
    934935            $query->finish;
     936
    935937        }
    936938
     
    947949            my $query = $db->prepare_cached( $sql->delete_instance );
    948950            my $rows = $query->execute( $uri );
     951            $query->finish;
    949952           
    950953            # if we affected something other then one row something very bad
     
    961964            my $query = $db->prepare_cached( $sql->delete_object );
    962965            my $rows = $query->execute( $so_id );
     966            $query->finish;
    963967
    964968            # if we affected something other then two rows something very bad
  • trunk/Nebulous/lib/Nebulous/Server.pm

    r13311 r16184  
    11# Copyright (c) 2004  Joshua Hoblitt
    22#
    3 # $Id: Server.pm,v 1.45 2007-05-09 00:45:21 jhoblitt Exp $
     3# $Id: Server.pm,v 1.46 2008-01-23 00:46:06 jhoblitt Exp $
    44
    55package Nebulous::Server;
     
    928928
    929929            unless ( $rows > 0 ) {
     930                $query->finish;
    930931                $log->logdie( "no instance is associated with uri" );
    931932            }
     
    933934            $so_id = $query->fetchrow_hashref->{ 'so_id' };
    934935            $query->finish;
     936
    935937        }
    936938
     
    947949            my $query = $db->prepare_cached( $sql->delete_instance );
    948950            my $rows = $query->execute( $uri );
     951            $query->finish;
    949952           
    950953            # if we affected something other then one row something very bad
     
    961964            my $query = $db->prepare_cached( $sql->delete_object );
    962965            my $rows = $query->execute( $so_id );
     966            $query->finish;
    963967
    964968            # if we affected something other then two rows something very bad
Note: See TracChangeset for help on using the changeset viewer.