From ef64a367150c060b49b163db3a4383e68d3d3265 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Tue, 28 Oct 2008 20:54:33 +0000 Subject: move get_media_source_for_nash as method in MDV::Draklive::Media --- lib/MDV/Draklive/Media.pm | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'lib/MDV/Draklive/Media.pm') diff --git a/lib/MDV/Draklive/Media.pm b/lib/MDV/Draklive/Media.pm index 0e3e738..76188d8 100644 --- a/lib/MDV/Draklive/Media.pm +++ b/lib/MDV/Draklive/Media.pm @@ -36,4 +36,13 @@ sub get_media_label { first($media->get_media_setting('source') =~ /^LABEL=(.*)$/); } +sub get_media_source_for_nash { + my ($media) = @_; + my $label = $media->get_media_label; + #- strip vfat labels to 11 chars and upper-case it + $label && $media->get_media_setting('fs') eq 'vfat' ? + 'LABEL=' . uc(substr($label, 0, 11)) : + $media->get_media_setting('source'); +} + 1; -- cgit v1.2.1