* vfs/extfs/deb.in (mcdebfs_list): Do not skip over directory entries.
Set the locale to C when executing dpkg-deb.
Этот коммит содержится в:
родитель
861c850cfd
Коммит
3c713dfe18
@ -1,3 +1,8 @@
|
|||||||
|
2006-07-18 Egmont Koblinger <egmont@uhulinux.hu>
|
||||||
|
|
||||||
|
* extfs/deb.in (mcdebfs_list): Do not skip over directory entries.
|
||||||
|
Set the locale to C when executing dpkg-deb.
|
||||||
|
|
||||||
2006-07-13 Marcel Pol <mpol@gmx.net>
|
2006-07-13 Marcel Pol <mpol@gmx.net>
|
||||||
|
|
||||||
* extfs/rpm: Remove support for obsoleted RPM tags.
|
* extfs/rpm: Remove support for obsoleted RPM tags.
|
||||||
|
@ -34,7 +34,7 @@ sub mcdebfs_list
|
|||||||
local($archivename)=@_;
|
local($archivename)=@_;
|
||||||
local $qarchivename = quote($archivename);
|
local $qarchivename = quote($archivename);
|
||||||
chop($date=`LC_ALL=C date "+%b %d %H:%M"`);
|
chop($date=`LC_ALL=C date "+%b %d %H:%M"`);
|
||||||
chop($info_size=`dpkg -I $qarchivename | wc -c`);
|
chop($info_size=`LC_ALL=C dpkg -I $qarchivename | wc -c`);
|
||||||
$install_size=length($pressinstall);
|
$install_size=length($pressinstall);
|
||||||
|
|
||||||
print "dr-xr-xr-x 1 root root 0 $date CONTENTS\n";
|
print "dr-xr-xr-x 1 root root 0 $date CONTENTS\n";
|
||||||
@ -73,7 +73,6 @@ sub mcdebfs_list
|
|||||||
$link2=$_[$pathindex++];
|
$link2=$_[$pathindex++];
|
||||||
|
|
||||||
$owgr=~s!/! !;
|
$owgr=~s!/! !;
|
||||||
next if $path=~m!/$!;
|
|
||||||
if($arrow eq 'link')
|
if($arrow eq 'link')
|
||||||
{
|
{
|
||||||
# report hard links as soft links
|
# report hard links as soft links
|
||||||
@ -97,7 +96,7 @@ sub mcdebfs_list
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
if ( open(PIPEIN, "dpkg-deb -I $qarchivename |") )
|
if ( open(PIPEIN, "LC_ALL=C dpkg-deb -I $qarchivename |") )
|
||||||
{
|
{
|
||||||
while(<PIPEIN>)
|
while(<PIPEIN>)
|
||||||
{
|
{
|
||||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user