- use int to make SViOK succeded

1 files changed, 4 insertions, 2 deletions

diff --git a/userdrake2 b/userdrake2
index a4d462c..9ce9a9c 100755
--- a/userdrake2
+++ b/userdrake2
@@ -30,6 +30,7 @@ use ugtk2 qw(:all);
 use interactive;
 use POSIX qw(mktime ceil);
 use USER;
+use Devel::Peek;
 
 my $conffile = '/etc/sysconfig/userdrake';
 my $secfile = '/etc/sysconfig/msec';
@@ -649,8 +650,9 @@ sub Edit {
 									     !$error and $userEnt->ShadowExpire($Exp);
 									 } else { $userEnt->ShadowExpire(ceil(-1)) }
 									 if ($us->{o}->{pcheckexpire}->get_active()) {
-									     my $allowed =  $us->{o}->{dbca}->get_text(); my $required =  $us->{o}->{dbcr}->get_text(); 
-									     my $warning =  $us->{o}->{bwbc}->get_text(); my $inactive = $us->{o}->{dbai}->get_text();
+									     my $allowed = int($us->{o}->{dbca}->get_text()); my $required = int($us->{o}->{dbcr}->get_text()); 
+									     my $warning = int($us->{o}->{bwbc}->get_text()); my $inactive = int($us->{o}->{dbai}->get_text());
+									     
 									     $allowed && $required && $warning && $inactive or RaiseError(N("Please specify all field for password aging"));
 									     if(!$error) {
 										$userEnt->ShadowMin($allowed); $userEnt->ShadowMax($required);