mark IPV6TODP for routines that will not work under IPV6

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@1894 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
2008-07-18 13:44:38 +00:00 · 2008-07-18 13:44:38 +00:00 · ffe2b0d16f
commit ffe2b0d16f
parent ac1ea47df4
1 changed files with 1 additions and 1 deletions
--- a/perl-xCAT/xCAT/Utils.pm
+++ b/perl-xCAT/xCAT/Utils.pm
@ -2097,7 +2097,7 @@ sub get_ServiceNode
 #-----------------------------------------------------------------------------
 sub toIP
 {
-
+    # does not support IPV6  IPV6TODO
    if ($_[0] =~ /^(\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3})$/)
    {
        return ([0, $_[0]]);