From 401bad2098a7495032015b59099b0a5569d5105b Mon Sep 17 00:00:00 2001
From: Maarten Vanraes <maarten@ba.be>
Date: Sat, 23 Jul 2016 09:41:58 +0200
Subject: get rid of IO

---
 lib/ManaTools/Shared/disk_backend/Plugin/Disk.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/ManaTools/Shared/disk_backend/Plugin/Disk.pm b/lib/ManaTools/Shared/disk_backend/Plugin/Disk.pm
index ba47fc63..6f58d1d7 100644
--- a/lib/ManaTools/Shared/disk_backend/Plugin/Disk.pm
+++ b/lib/ManaTools/Shared/disk_backend/Plugin/Disk.pm
@@ -135,7 +135,8 @@ class_has '+restrictions' => (
 override('label', sub {
     my $self = shift;
     my $label = super;
-    if ($self->out_length() < 1) {
+    my @children = $self->children();
+    if (scalar(@children) < 1) {
         return $label;
     }
     return $label .'('. join(',', sort map { $_->label(); } @children) .')';
-- 
cgit v1.2.1