From e822b14bab0e0d759c4647c725f94d362e984dbb Mon Sep 17 00:00:00 2001
From: Matteo Pasotti <matteo@mageia.org>
Date: Mon, 7 Jan 2013 19:01:53 +0000
Subject: added trim subroutine

---
 AdminPanel/Shared.pm | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

(limited to 'AdminPanel/Shared.pm')

diff --git a/AdminPanel/Shared.pm b/AdminPanel/Shared.pm
index 503a078..dce5061 100644
--- a/AdminPanel/Shared.pm
+++ b/AdminPanel/Shared.pm
@@ -29,7 +29,8 @@ our @EXPORT = qw(warningMsgBox
          msgBox
          infoMsgBox
          ask_YesOrNo
-         ask_OkCancel);
+         ask_OkCancel
+         trim);
 
 sub warningMsgBox {
     my ($st) = @_;
@@ -141,6 +142,13 @@ sub ask_YesOrNo {
     return $retVal;
 }
 
+sub trim {
+    my ($st) = shift;
+    $st =~s /^\s+//g;
+    $st =~s /\s+$//g;
+    return $st;
+}
+
 1;
 
 =head1 NAME
-- 
cgit v1.2.1