From d96b239ef9f62cd95168561059ee918d1d23da80 Mon Sep 17 00:00:00 2001
From: Thomas Backlund <tmb@mageia.org>
Date: Sun, 14 Feb 2016 01:55:17 +0200
Subject: fix up nvme, its nvme + num + 'n' + num + 'p' + num

---
 perl-install/devices.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl-install/devices.pm b/perl-install/devices.pm
index 5b3e4e8ba..40858ff98 100644
--- a/perl-install/devices.pm
+++ b/perl-install/devices.pm
@@ -157,7 +157,7 @@ sub make($) {
 
 sub simple_partition_scan {
     my ($part) = @_;
-    $part->{device} =~ /((?:[hsv]|xv)d[a-z]|mmcblk|nvme\d+p)(\d+)$/;
+    $part->{device} =~ /((?:[hsv]|xv)d[a-z]|mmcblk|(nvme\d+n)\d+p)(\d+)$/;
 }
 sub part_number {
     my ($part) = @_;
-- 
cgit v1.2.1