From: cjwatson <> Date: Thu, 5 Jun 2003 15:54:31 +0000 (-0800) Subject: [project @ 2003-06-05 08:54:31 by cjwatson] X-Git-Tag: release/2.6.0~869 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=12521a4a51c5e082cacf085263f06bf838e0a839;p=debbugs.git [project @ 2003-06-05 08:54:31 by cjwatson] getbuglocation() should find bugs in db-h in preference to bugs in db. This makes migration from older versions easier, since you can just leave the db directory there until everything works. --- diff --git a/scripts/errorlib.in b/scripts/errorlib.in index 32942581..b799bc6e 100755 --- a/scripts/errorlib.in +++ b/scripts/errorlib.in @@ -1,5 +1,5 @@ # -*- perl -*- -# $Id: errorlib.in,v 1.27 2003/05/31 14:24:58 cjwatson Exp $ +# $Id: errorlib.in,v 1.28 2003/06/05 08:54:31 cjwatson Exp $ sub F_SETLK { 6; } sub F_WRLCK{ 1; } $flockstruct= 'sslll'; # And there ought to be something for this too. @@ -30,8 +30,8 @@ sub getbuglocation { my ( $bugnum, $ext ) = @_; my $archdir = sprintf "%02d", $bugnum % 100; return 'archive' if ( -r "$gSpoolDir/archive/$archdir/$bugnum.$ext" ); - return 'db' if ( -r "$gSpoolDir/db/$bugnum.$ext" ); return 'db-h' if ( -r "$gSpoolDir/db-h/$archdir/$bugnum.$ext" ); + return 'db' if ( -r "$gSpoolDir/db/$bugnum.$ext" ); return undef; }