1 files changed, 5 insertions, 0 deletions
diff --git a/tests/getpart.pm b/tests/getpart.pm
index 83e56ca92..1aeedd6dd 100644
--- a/tests/getpart.pm
+++ b/tests/getpart.pm
@@ -124,6 +124,11 @@ sub getpart {
     return @this; #empty!
 }
 
+# Return entire document as list of lines
+sub getall {
+    return @xml;
+}
+
 sub loadtest {
     my ($file)=@_;