paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-05 11:30:58 +02:00
Code Issues Packages Projects Releases Wiki Activity

* cosmetic fix in netaddrtostr

Browse Source
This commit is contained in:
marco 2005-03-18 10:04:31 +00:00
parent a5ed208457
commit 31f010aa69
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
rtl/inc/sockets.inc
View File

@ -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