[add comment body
·𐑑𐑴𐑕𐑑𐑩𐑤 <toastal@posteo.net>**20260705190447
 Ignore-this: bfbc969a34e7460a7344913ace5437d8c3fade666cda3027e44e761dbb81b14fc8ffd19dc23700fb
] duplicate
hunk ./extra/darcs-hooks2/darcs-hooks2.factor 49
-            [ "comment" tag-named children>string clean-darcs-comment ]
:
hunk ./extra/darcs-hooks2/darcs-hooks2.factor 49
+            [ "comment" tag-named children>string clean-darcs-comment ]
duplicate
hunk ./extra/darcs-hooks2/darcs-hooks2.factor 54
-        4array
+        3array
:
hunk ./extra/darcs-hooks2/darcs-hooks2.factor 54
-        3array
+        4array
duplicate
hunk ./extra/darcs-hooks2/darcs-hooks2.factor 56
-    ! tags-seq: { content title date hash }
-
-    dup [ third ] map supremum
+    ! tags-seq: { title date hash }
+
+    dup [ second ] map supremum
:
hunk ./extra/darcs-hooks2/darcs-hooks2.factor 56
-    ! tags-seq: { title date hash }
-
-    dup [ second ] map supremum
+    ! tags-seq: { content title date hash }
+
+    dup [ third ] map supremum
duplicate
hunk ./extra/darcs-hooks2/darcs-hooks2.factor 61
-    swap [ first4 tag-entry-xml ] map
+    swap [ first3 tag-entry-xml ] map
:
hunk ./extra/darcs-hooks2/darcs-hooks2.factor 61
-    swap [ first3 tag-entry-xml ] map
+    swap [ first4 tag-entry-xml ] map
duplicate
hunk ./extra/darcs-hooks2/util/util.factor 3
-USING: accessors ascii calendar calendar.format combinators kernel math math.order
-math.parser sequences splitting strings xml.syntax ;
+USING: accessors calendar calendar.format combinators kernel math math.order
+math.parser sequences xml.syntax ;
:
hunk ./extra/darcs-hooks2/util/util.factor 3
-USING: accessors calendar calendar.format combinators kernel math math.order
-math.parser sequences xml.syntax ;
+USING: accessors ascii calendar calendar.format combinators kernel math math.order
+math.parser sequences splitting strings xml.syntax ;
duplicate
hunk ./extra/darcs-hooks2/util/util.factor 29
-: clean-darcs-comment ( str -- str' )
-    string-lines [ "Ignore-this:" head? not ] filter "\n" join
-    [ blank? ] trim ;
-
-: tag-entry-xml ( content title date hash -- xml )
+: tag-entry-xml ( title date hash -- xml )
:
hunk ./extra/darcs-hooks2/util/util.factor 29
-: tag-entry-xml ( title date hash -- xml )
+: clean-darcs-comment ( str -- str' )
+    string-lines [ "Ignore-this:" head? not ] filter "\n" join
+    [ blank? ] trim ;
+
+: tag-entry-xml ( content title date hash -- xml )
duplicate
hunk ./extra/darcs-hooks2/util/util.factor 35
-    swap
+    -rot
:
hunk ./extra/darcs-hooks2/util/util.factor 35
-    -rot
+    swap
duplicate
hunk ./extra/darcs-hooks2/util/util.factor 40
-            <content type="text"><-></content>
+            <content type="html"><-></content>
hunk ./extra/darcs-hooks2/util/util.factor 40
-            <content type="html"><-></content>
-            <title type="html"><-></title>
:
hunk ./extra/darcs-hooks2/util/util.factor 40
+            <content type="html"><-></content>
+            <title type="html"><-></title>
duplicate
hunk ./extra/darcs-hooks2/util/util.factor 43
+            <title type="html"><-></title>
:
hunk ./extra/darcs-hooks2/util/util.factor 43
-            <title type="html"><-></title>
duplicate
hunk ./extra/darcs-hooks2/util/util.factor 46
+            <content type="html"></content>
:
hunk ./extra/darcs-hooks2/util/util.factor 46
-            <content type="html"></content>