From ed8c9c7f3096c626c9a0419626524f477d3ae854 Mon Sep 17 00:00:00 2001
From: Ahmad Samir <ahmad@mageia.org>
Date: Sat, 2 Apr 2011 19:39:51 +0000
Subject: - use 'cannot' instead of 'can not' - use 'LDAP' instead of 'Ldap'

---
 perl-install/common.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'perl-install/common.pm')

diff --git a/perl-install/common.pm b/perl-install/common.pm
index 2806e1103..f88f2767c 100644
--- a/perl-install/common.pm
+++ b/perl-install/common.pm
@@ -109,7 +109,7 @@ sub setVirtual {
 
 sub nonblock {
     my ($F) = @_;
-    fcntl($F, c::F_SETFL(), fcntl($F, c::F_GETFL(), 0) | c::O_NONBLOCK()) or die "can not fcntl F_SETFL: $!";
+    fcntl($F, c::F_SETFL(), fcntl($F, c::F_GETFL(), 0) | c::O_NONBLOCK()) or die "cannot fcntl F_SETFL: $!";
 }
 
 #- return a size in sector
@@ -267,7 +267,7 @@ sub open_file {
 
 sub secured_file {
     my ($f) = @_;
-    c::is_secure_file($f) or die "can not ensure a safe $f";
+    c::is_secure_file($f) or die "cannot ensure a safe $f";
     $f;
 }
 
-- 
cgit v1.2.1