From 0604e627faf2cf61c4af6121fe96baafbb50a843 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Fri, 15 Sep 2006 23:42:23 +0000
Subject: (check_valid_boxname) enable dots in machine names

---
 mdkonline.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'mdkonline.pm')

diff --git a/mdkonline.pm b/mdkonline.pm
index 69f37670..6c4ddfb8 100644
--- a/mdkonline.pm
+++ b/mdkonline.pm
@@ -237,7 +237,7 @@ sub check_valid_email {
 sub check_valid_boxname {
     my $boxname = shift;
     return 0 if length($boxname) >= 40;
-    my $bt = $boxname =~ /^[a-zA-Z][a-zA-Z0-9_]+$/i ? 1 : 0;
+    my $bt = $boxname =~ /^[a-zA-Z][a-zA-Z0-9_.]+$/i ? 1 : 0;
     $bt;
 }
 
-- 
cgit v1.2.1