Browse Source

* cosmetic fix in netaddrtostr

marco 20 years ago
parent
commit
31f010aa69
1 changed files with 5 additions and 2 deletions
  1. 5 2
      rtl/inc/sockets.inc

+ 5 - 2
rtl/inc/sockets.inc

@@ -233,7 +233,7 @@ begin
    begin
      Str(array4int(j)[i],Dummy);
      NetAddrToStr:=NetAddrToStr+Dummy;
-     If I>1 Then
+     If I<4 Then
        NetAddrToStr:=NetAddrToStr+'.';
    end;
 end;
@@ -402,7 +402,10 @@ end;
 
 {
   $Log$
-  Revision 1.16  2005-02-14 17:13:26  peter
+  Revision 1.17  2005-03-18 10:04:31  marco
+   * cosmetic fix in netaddrtostr
+
+  Revision 1.16  2005/02/14 17:13:26  peter
     * truncate log
 
   Revision 1.15  2005/02/13 19:59:57  marco