From dadb6b434c829d9ec2747cb7d35c49afd799dcbb Mon Sep 17 00:00:00 2001 From: Ian Jackson Date: Tue, 3 Nov 2015 18:57:58 +0000 Subject: [PATCH] Testing: Provide no-login-requiring srcdump test Signed-off-by: Ian Jackson --- tests/srcdump-nologin.at | 28 ++++++++++++++++++++++++++++ 1 file changed, 28 insertions(+) create mode 100644 tests/srcdump-nologin.at diff --git a/tests/srcdump-nologin.at b/tests/srcdump-nologin.at new file mode 100644 index 0000000..792109c --- /dev/null +++ b/tests/srcdump-nologin.at @@ -0,0 +1,28 @@ +# -*- Tcl -*- + +# This is part of CGI::Auth::Flexible, a perl CGI authentication module. +# +# Copyright 2012,2013,2015 Ian Jackson. +# Copyright 2012,2013,2015 Citrix. +# +# This program is free software: you can redistribute it and/or modify +# it under the terms of the GNU Affero General Public License as published by +# the Free Software Foundation, either version 3 of the License, or +# (at your option) any later version, with the "CAF Login Exception" +# as published by Ian Jackson (version 1, or at your option any +# later version) as an Additional Permission. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU Affero General Public License for more details. + +srcdump-prep + +dospawn + +send "B/source available\r" + +submitform-expect "Save file to" + +srcdump-save-check -- 2.30.2