Mercurial > scansion / changeset

--- a/scansion/stanzacmp.lua	Thu Sep 06 18:28:27 2018 +0100
+++ b/scansion/stanzacmp.lua	Thu Sep 06 19:13:42 2018 +0100
@@ -63,6 +63,7 @@
 			if not match then
 				return false;
 			end
+			stanza2_pos = stanza2_pos + 1;
 		end
 	end
 	return true;

--- a/spec/stanzacmp_spec.lua	Thu Sep 06 18:28:27 2018 +0100
+++ b/spec/stanzacmp_spec.lua	Thu Sep 06 19:13:42 2018 +0100
@@ -122,4 +122,21 @@
 	it("should be possible to disable ordered matching", function ()
 		yes("<foo><one scansion:strict='no'><a/><b/></one></foo>", "<foo><one><b/><a/></one></foo>");
 	end);
+
+	it("should match when there are many children", function ()
+		yes([[<s>
+			<x>
+				<a/>
+				<b/>
+				<c/>
+			</x>
+		</s>]]
+		, [[<s>
+			<x>
+				<a/>
+				<b/>
+				<c/>
+			</x>
+		</s>]]);
+	end);
 end);