From bcea1296f1438b453130a126301328189f4fb2ba Mon Sep 17 00:00:00 2001
From: Maarten Vanraes <alien@mageia.org>
Date: Sun, 5 Jun 2016 09:48:58 +0200
Subject: Properties: fix warning when value is undefined

---
 lib/ManaTools/Shared/PropertiesRole.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/ManaTools/Shared/PropertiesRole.pm b/lib/ManaTools/Shared/PropertiesRole.pm
index bf668c81..a7347b69 100644
--- a/lib/ManaTools/Shared/PropertiesRole.pm
+++ b/lib/ManaTools/Shared/PropertiesRole.pm
@@ -170,7 +170,7 @@ sub prop_from_file {
     open F, '<'. $file or return undef;
     my $value = <F>;
     close F;
-    chomp($value);
+    chomp($value) if defined $value;
     return $self->prop($key, $value);
 }
 
-- 
cgit v1.2.1