r551 - ofw/inetv6

Author: lwalter
Date: 2007-08-16 20:57:40 +0200 (Thu, 16 Aug 2007)
New Revision: 551

Modified:
   ofw/inetv6/dns.fth
Log:
Fix dns IPv4/IPv6 resolution order

Modified: ofw/inetv6/dns.fth
===================================================================
--- ofw/inetv6/dns.fth	2007-08-16 18:54:10 UTC (rev 550)
+++ ofw/inetv6/dns.fth	2007-08-16 18:57:40 UTC (rev 551)
@@ -284,8 +284,8 @@
 false value resolve-flag
 : resolvev4  ( hostname$ -- )
    false to resolve-flag
-   2dup ['] resolve-a    catch  if  2drop  else  true to resolve-flag set-dest-ip  then
-        ['] resolve-aaaa catch  if  2drop  else  true to resolve-flag  then
+   2dup ['] resolve-aaaa catch  if  2drop  else  true to resolve-flag  then
+        ['] resolve-a    catch  if  2drop  else  true to resolve-flag set-dest-ip  then
    resolve-flag not  abort" DNS: No answer"
 ;