Adding debian version 2.4.57-2.debian/2.4.57-2

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>

1 files changed, 16 insertions, 0 deletions

diff --git a/debian/perl-framework/t/htdocs/modules/lua/filters.lua b/debian/perl-framework/t/htdocs/modules/lua/filters.lua
new file mode 100644
index 0000000..4236ecc
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/lua/filters.lua
@@ -0,0 +1,16 @@
+--[[
+    Example output filter that escapes all HTML entities in the output
+]]--
+function output_filter(r)
+    coroutine.yield("prefix\n")
+    while bucket do -- For each bucket, do...
+        if string.len(bucket) > 0 then
+            local output = "bucket:" .. bucket .. "\n"
+            coroutine.yield(output) -- Send converted data down the chain
+        else
+            coroutine.yield("") -- Send converted data down the chain
+        end
+    end
+    coroutine.yield("suffix\n")
+    -- No more buckets available.
+end