--- Partition.pm.orig	2009-11-11 05:59:20.000000000 +0100
+++ Partition.pm	2009-11-16 16:12:29.000000000 +0100
@@ -290,7 +290,7 @@
         $DEV{DLETTER}=~s/$DEV{TYPE}//;
         # Get the partition number
         $DEV{PARTNUM}=$DEV{DEVICE};
-        $DEV{PARTNUM}=~s/\/dev\/$DEV{DRIVE}//;
+        $DEV{PARTNUM}=~s/\/dev\/$DEV{DRIVE}p*//;
 
         return %DEV;
 } #parse_dev