Compatibility for default_yp_domain.

Rev: lib/7.2/modules/__default.pmod:1.3

lib/7.2/modules/__default.pmod

 // Compatibility module
-// $Id: __default.pmod,v 1.2 2002/10/27 13:52:54 nilsson Exp $
+// $Id: __default.pmod,v 1.3 2002/11/28 06:05:07 nilsson Exp $
 
 #pike 7.2
 
@@ -14,11 +14,15 @@ void sleep(float|int t, void|int abort)
   delay(t, abort);
 }
 
+string default_yp_domain() {
+  return Yp.default_domain();
+}
+
 mapping(string:mixed) all_constants()
 {
   mapping(string:mixed) ret=predef::all_constants()+([]);
-
   ret->all_constants=all_constants;
   ret->dirname=dirname;
+  ret->default_yp_domain=default_yp_domain;
   return ret;
 }