Fix perl syntax in previous commit

svn path=/dists/sid/linux/; revision=21637
This commit is contained in:
Aurelien Jarno 2014-07-27 18:58:01 +00:00
parent 40bf6c52bc
commit f674b7dd80
1 changed files with 2 additions and 3 deletions

View File

@ -551,9 +551,8 @@ else {
# of / are the same as that of /sbin/init. This may fail if not running as
# root or if /proc is not mounted, in which case 2 is returned.
sub detect_chroot {
my $dev1, $ino1, $dev2, $ino2;
($dev1, $ino1) = stat("/") or return 2;
($dev2, $ino2) = stat("/proc/1/root") or return 2;
my ($dev1, $ino1) = stat("/") or return 2;
my ($dev2, $ino2) = stat("/proc/1/root") or return 2;
return ($dev1 != $dev2) || ($ino1 != $ino2);
}