Browse Source

* small typo fix from Mischi

marco 21 years ago
parent
commit
eb5d730d99
1 changed files with 5 additions and 2 deletions
  1. 5 2
      packages/base/inet/inet.pp

+ 5 - 2
packages/base/inet/inet.pp

@@ -514,7 +514,7 @@ Function NetToHost (Net : Longint) : Longint;
 
 begin
 {$ifdef FPC_BIG_ENDIAN}
-  nettohost:=host;
+  nettohost:=net;
 {$else}
   NetToHost:=THostAddr(Net)[4];
   NetToHost:=NetToHost or ( (THostAddr(Net)[3]) shl 8);
@@ -539,7 +539,10 @@ end.
 
 
    $Log$
-   Revision 1.4  2004-04-10 15:37:57  marco
+   Revision 1.5  2004-04-13 09:04:55  marco
+    * small typo fix from Mischi
+
+   Revision 1.4  2004/04/10 15:37:57  marco
     * bug/endianfix to hosttonet nettohost
 
    Revision 1.3  2003/12/10 12:16:14  marco