From 01fde2b197c3d33d33b8814cdb677f8f262044a0 Mon Sep 17 00:00:00 2001 From: Brian Cully Date: Sun, 12 Nov 2017 11:22:24 -0500 Subject: Use qualified stream tag when expecting stream close. --- input | 2 +- xml/signout.expected.xml | 2 +- xml/signout.xml | 2 +- xmpt | 6 +++++- 4 files changed, 8 insertions(+), 4 deletions(-) diff --git a/input b/input index 5effb70..2d508fe 100644 --- a/input +++ b/input @@ -26,4 +26,4 @@ - + diff --git a/xml/signout.expected.xml b/xml/signout.expected.xml index 522b4a3..4ae4038 100644 --- a/xml/signout.expected.xml +++ b/xml/signout.expected.xml @@ -1 +1 @@ - + diff --git a/xml/signout.xml b/xml/signout.xml index 522b4a3..34e306d 100644 --- a/xml/signout.xml +++ b/xml/signout.xml @@ -1 +1 @@ - + diff --git a/xmpt b/xmpt index bae4eee..37af263 100755 --- a/xmpt +++ b/xmpt @@ -245,7 +245,7 @@ sub assert_arg { # Stick actual execution in its own package so you don't accidentally # clobber stuff in main while running templates. -package evalpkg; +package evalpkg; # TODO: Make package name dynamic. use MIME::Base64; @@ -277,3 +277,7 @@ sub resourcepart() { sub plain_auth() { MIME::Base64::encode(join("\0", "", bare_jid(), $env{password})); } + +sub stream() { + main::assert_arg('stream', 'stream:stream'); +} -- cgit v1.2.3