From 2b5daa0e9fdb42bb52337bf3a3fbfb63ae6df128 Mon Sep 17 00:00:00 2001 From: "Thierry.Vignaud" Date: Wed, 18 Jun 2014 16:16:58 +0200 Subject: (get_dynamic_major) kill it now it's unused --- perl-install/devices.pm | 5 ----- 1 file changed, 5 deletions(-) diff --git a/perl-install/devices.pm b/perl-install/devices.pm index f1764fee2..f06168c1d 100644 --- a/perl-install/devices.pm +++ b/perl-install/devices.pm @@ -52,11 +52,6 @@ sub find_compressed_image { undef; } -sub get_dynamic_major { - my ($name) = @_; - cat_('/proc/devices') =~ /^(\d+) \Q$name\E$/m && $1; -} - sub init_device_mapper() { require modules; eval { modules::load('dm-mod') }; -- cgit v1.2.1