--- messaging/manakai/lib/Message/Markup/Atom.dis	2006/10/03 09:37:36	1.14
+++ messaging/manakai/lib/Message/Markup/Atom.dis	2006/11/04 17:25:07	1.16
@@ -43,7 +43,7 @@
   @DISCore:author: DISCore|Wakaba
   @License: license|Perl+MPL
   @Date:
-    $Date: 2006/10/03 09:37:36 $
+    $Date: 2006/11/04 17:25:07 $
 
   @Require:
     @@Module:
@@ -77,6 +77,8 @@
     http://suika.fam.cx/~wakaba/archive/2004/dom/xdt#
   @DOMMain:
     http://suika.fam.cx/~wakaba/archive/2004/dom/main#
+  @domperl:
+    http://suika.fam.cx/~wakaba/archive/2006/dom/perl/
   @dx:
     http://suika.fam.cx/~wakaba/archive/2005/manakai/Util/Error/DOMException#
   @dxm:
@@ -708,8 +710,8 @@
   @IFQName: AtomImplementation
   @ClsQName: ManakaiAtomImplementation
 
-  @IFISA: c|DOMImplementation
-  @ClsISA: c|ManakaiDOMImplementation
+  @domperl:implementedByObjectsOf: c|DOMImplementation
+  @domperl:classImplementedByObjectsOf: c|ManakaiDOMImplementation
 
   @enDesc:
     The <IF::AtomImplementation> interface provides convenience
@@ -725,8 +727,6 @@
         <IFName::AtomImplementation>,
         <IFName::AtomImplementation||ManakaiDOM|ManakaiDOM>,
         <IFName::c|DOMImplementation>,
-        <IFName::urigen|URIImplementation>,
-        <IFName::f|MinimumImplementation>,
         <IFName::f|GetFeature>,
       ) {
         $test->id ($interface);
@@ -1619,11 +1619,10 @@
   @IFQName: AtomDocument
   @ClsQName: ManakaiAtomDocument
 
-  @IFISA: Document
-  @ClsISA: td|ManakaiDOMDocument
+  @domperl:implementedByObjectsOf: Document
+  @domperl:classImplementedByObjectsOf: td|ManakaiDOMDocument
 
   @f:implements: AtomFeature10
-  @s:rootElementType: AnyAtomElement||ManakaiDOM|all
 
   @enDesc:
     If the <Feature::fe|Atom> feature version <FeatureVer::1.0>
@@ -1651,13 +1650,10 @@
   @IFQName: AtomFeedDocument
   @ClsQName: ManakaiFeedEntryDocument
 
-  @IFISA: AtomDocument
-  @ClsISA: ManakaiAtomDocument
+  @domperl:implementedByObjectsOf: Document
+  @domperl:classImplementedByObjectsOf: td|ManakaiDOMDocument
 
   @f:implements: AtomFeature10
-  @s:rootElementType:
-    @@@: atom|feed
-    @@DISCore:stopISARecursive: 1
 
   @enDesc:
     The <IF::AtomFeedDocument> interface provides convenience
@@ -1689,13 +1685,10 @@
   @IFQName: AtomEntryDocument
   @ClsQName: ManakaiAtomEntryDocument
 
-  @IFISA: AtomDocument
-  @ClsISA: ManakaiAtomDocument
+  @domperl:implementedByObjectsOf: Document
+  @domperl:classImplementedByObjectsOf: td|ManakaiDOMDocument
 
   @f:implements: AtomFeature10
-  @s:rootElementType:
-    @@@: atom|entry
-    @@DISCore:stopISARecursive: 1
 
   @enDesc:
     The <IF::AtomEntryDocument> interface provides convenience