Commit c260a7da authored by Leigh B. Stoller's avatar Leigh B. Stoller
Browse files

Turn on DB retry to avoid transient error.

parent c57c1fd9
#!/usr/bin/perl -wT #!/usr/bin/perl -wT
# #
# EMULAB-COPYRIGHT # EMULAB-COPYRIGHT
# Copyright (c) 2000-2004 University of Utah and the Flux Group. # Copyright (c) 2000-2005 University of Utah and the Flux Group.
# All rights reserved. # All rights reserved.
# #
use English; use English;
...@@ -63,6 +63,9 @@ delete @ENV{'IFS', 'CDPATH', 'ENV', 'BASH_ENV'}; ...@@ -63,6 +63,9 @@ delete @ENV{'IFS', 'CDPATH', 'ENV', 'BASH_ENV'};
# Turn off line buffering on output # Turn off line buffering on output
$| = 1; $| = 1;
# Be careful not to exit on transient error
$libdb::DBQUERY_MAXTRIES = 30;
# #
# We don't want to run this script unless its the real version. # We don't want to run this script unless its the real version.
# #
......
Supports Markdown
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