Changeset 20202 for trunk/Nebulous-Server/bin/neb-voladm
- Timestamp:
- Oct 16, 2008, 12:24:39 PM (18 years ago)
- File:
-
- 1 edited
-
trunk/Nebulous-Server/bin/neb-voladm (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Nebulous-Server/bin/neb-voladm
r20174 r20202 3 3 # Copyright (C) 2008 Joshua Hoblitt 4 4 # 5 # $Id: neb-voladm,v 1. 9 2008-10-15 20:39:49 jhoblitt Exp $5 # $Id: neb-voladm,v 1.10 2008-10-16 22:24:39 jhoblitt Exp $ 6 6 7 7 use strict; … … 86 86 87 87 if (%set) { 88 my ($q, @bind) = sql_interp("UPDATE volume AS v SET", \%set, "WHERE", \%constraint); 89 warn "$q\n" if $debug; 90 my $query = $dbh->prepare($q); 91 $query->execute(@bind); 88 eval { 89 my ($q, @bind) = sql_interp("UPDATE volume AS v SET", \%set, "WHERE", \%constraint); 90 warn "$q\n" if $debug; 91 my $query = $dbh->prepare($q); 92 $query->execute(@bind); 93 $dbh->do("call getmountedvol"); 94 $dbh->commit; 95 }; 96 if ($@) { 97 $dbh->rollback; 98 die $@; 99 } 92 100 } 93 101
Note:
See TracChangeset
for help on using the changeset viewer.
