From b574983cb7f02ceedff0999b7e2f2c51a7cc3859 Mon Sep 17 00:00:00 2001
From: Angelo Naselli <anaselli@linux.it>
Date: Fri, 26 Dec 2014 18:27:51 +0100
Subject: Substitute all the chars

---
 lib/AdminPanel/Shared/Services.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'lib')

diff --git a/lib/AdminPanel/Shared/Services.pm b/lib/AdminPanel/Shared/Services.pm
index 809bc21..91284ef 100644
--- a/lib/AdminPanel/Shared/Services.pm
+++ b/lib/AdminPanel/Shared/Services.pm
@@ -932,8 +932,8 @@ sub getUnitProperty {
     my ($self, $unit, $property) = @_;
 
     my $name = $unit . ".service";
-    $name =~ s|-|_2d|;
-    $name =~ s|\.|_2e|;
+    $name =~ s|-|_2d|g;
+    $name =~ s|\.|_2e|g;
     my $service = $self->dbus_systemd1_service;
     my $unit_object = $service->get_object("/org/freedesktop/systemd1/unit/" . $name);
     my $property_value = eval {$unit_object->Get("org.freedesktop.systemd1.Unit", $property)} || "";
-- 
cgit v1.2.1