ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/Deliantra-Client/DC/DB.pm
(Generate patch)

Comparing deliantra/Deliantra-Client/DC/DB.pm (file contents):
Revision 1.24 by root, Tue Dec 11 02:42:38 2007 UTC vs.
Revision 1.27 by root, Wed Dec 26 18:20:46 2007 UTC

22use Config; 22use Config;
23use BDB; 23use BDB;
24 24
25use CFPlus; 25use CFPlus;
26 26
27our $DB_HOME = "$Crossfire::VARDIR/cfplus-" . BDB::VERSION . "-$Config{archname}"; 27our $DBDIR = "cfplus-" . BDB::VERSION . "-$Config{archname}";
28our $DB_HOME = "$Deliantra::VARDIR/$DBDIR";
29
30if (!-e $DB_HOME and -e "$Deliantra::OLDDIR/$DBDIR") {
31 rename "$Deliantra::OLDDIR/$DBDIR", $DB_HOME;
32 print STDERR "INFO: moved old database from $Deliantra::OLDDIR/$DBDIR to $DB_HOME\n";
33}
28 34
29our $DB_ENV; 35our $DB_ENV;
30our $DB_STATE; 36our $DB_STATE;
31our %DB_TABLE; 37our %DB_TABLE;
32 38
387 393
388 eval { 394 eval {
389 Storable::store_fd [die => $error], $fh; 395 Storable::store_fd [die => $error], $fh;
390 }; 396 };
391 397
392 warn $error; 398 warn $error
399 if $error;
393 400
394 CFPlus::_exit 0; 401 CFPlus::_exit 0;
395 } 402 }
396 403
397 close $fh; 404 close $fh;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines