summaryrefslogtreecommitdiffstats
path: root/rescue/lsparts
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2005-04-21 14:38:20 +0000
committerPascal Rigaux <pixel@mandriva.com>2005-04-21 14:38:20 +0000
commit9ea1a5e407c6fdd3681832259dd29149abc40118 (patch)
treefc655c4f14157c12ed8aeb2313c093551db68b41 /rescue/lsparts
parentb4ec7191cd0b6c724dfd2bbe455096f5b2cd1786 (diff)
downloaddrakx-backup-do-not-use-9ea1a5e407c6fdd3681832259dd29149abc40118.tar
drakx-backup-do-not-use-9ea1a5e407c6fdd3681832259dd29149abc40118.tar.gz
drakx-backup-do-not-use-9ea1a5e407c6fdd3681832259dd29149abc40118.tar.bz2
drakx-backup-do-not-use-9ea1a5e407c6fdd3681832259dd29149abc40118.tar.xz
drakx-backup-do-not-use-9ea1a5e407c6fdd3681832259dd29149abc40118.zip
*** empty log message ***
Diffstat (limited to 'rescue/lsparts')
-rwxr-xr-xrescue/lsparts4
1 files changed, 3 insertions, 1 deletions
diff --git a/rescue/lsparts b/rescue/lsparts
index 1ae61cd20..8dff460d2 100755
--- a/rescue/lsparts
+++ b/rescue/lsparts
@@ -16,7 +16,7 @@
# Detects partition types using signatures
#
-use lib qw(/usr/lib/libDrakX ../perl-install);
+use lib qw(../perl-install /usr/lib/libDrakX);
use common;
use devices;
use fs::type;
@@ -32,6 +32,8 @@ foreach (devices::read_proc_partitions_raw()) {
"Skipping <$_->{dev}> because too little blocks ($_->{size})" :
$_->{dev} !~ /\d$/ ?
"Skipping <$_->{dev}> because doesn't end with a number (e.g. seems to not be a partition)" :
+ $_->{dev} =~ /^loop\d+$/ ?
+ "Skipping <$_->{dev}>" :
'') {
print STDERR "$err\n" if $verbose;
} else {