Merge branch '1920_deba_debd_vfs_fix'

* 1920_deba_debd_vfs_fix:
  Ticket #1920: Issues with deba and debd VFS
This commit is contained in:
Yury V. Zaytsev 2010-01-02 17:04:50 +01:00
commit 50825505ca
2 changed files with 4 additions and 4 deletions

View File

@ -16,7 +16,7 @@ sub list
{
my($qarchive)=@_;
$qarchive = quote($qarchive);
chop($date=`LC_ALL=C date "+%b %d %Y %H:%M"`);
chop($date=`LC_ALL=C date "+%m-%d-%Y %H:%M"`);
chop($info_size=`apt-cache show $qarchive | wc -c`);
$install_size=length($pressinstall);
$upgrade_size=length($pressupgrade);

View File

@ -109,7 +109,7 @@ sub list
{
my($archive)=@_;
my $qarchive = quote($archive);
chop($date=`LC_ALL=C date "+%b %d %Y %H:%M"`);
chop($date=`LC_ALL=C date "+%m-%d-%Y %H:%M"`);
chop($info_size=`dpkg -s $qarchive | wc -c`);
$repack_size=length($pressrepack);
$reinstall_size=length($pressreinstall);
@ -183,7 +183,7 @@ sub copyout
system("chmod a+x $qdestfile");
}
} elsif($filename =~ /^DEBIAN/) {
$filename=~s!^DEBIAN/!!;
$qfilename=~s!^DEBIAN/!!;
system("cat /var/lib/dpkg/info/$qarchive.$qfilename > $qdestfile");
} elsif($filename eq "DPKG-REMOVE" || $filename eq "APT-REMOVE") {
if ( open(FILEOUT,">$destfile") ) {
@ -251,7 +251,7 @@ sub run
} elsif($filename eq "DPKG-RECONFIGURE") {
system("dpkg-reconfigure $qarchive");
} elsif($filename=~/^DEBIAN/) {
$filename=~s!^DEBIAN!!;
$qfilename=~s!^DEBIAN!!;
system("/var/lib/dpkg/info/$qarchive.$qfilename");
} else {
$qfilename=~s!^CONTENTS!!;