diff options
Diffstat (limited to 'rt/t/web/command_line_with_unknown_field.t')
-rw-r--r-- | rt/t/web/command_line_with_unknown_field.t | 34 |
1 files changed, 0 insertions, 34 deletions
diff --git a/rt/t/web/command_line_with_unknown_field.t b/rt/t/web/command_line_with_unknown_field.t deleted file mode 100644 index 9a7ec7acd..000000000 --- a/rt/t/web/command_line_with_unknown_field.t +++ /dev/null @@ -1,34 +0,0 @@ -#!/usr/bin/perl -w - -use strict; -use File::Spec (); -use Test::Expect; -use RT::Test tests => 10; -my ($baseurl, $m) = RT::Test->started_ok; -my $rt_tool_path = "$RT::BinPath/rt"; - -$ENV{'RTUSER'} = 'root'; -$ENV{'RTPASSWD'} = 'password'; -$RT::Logger->debug("Connecting to server at ".RT->Config->Get('WebBaseURL')); -$ENV{'RTSERVER'} =RT->Config->Get('WebBaseURL') ; -$ENV{'RTDEBUG'} = '1'; - -expect_run( - command => "$rt_tool_path shell", - prompt => 'rt> ', - quit => 'quit', -); -expect_send(q{create -t ticket set subject='new ticket' add cc=foo@example.com}, "Creating a ticket..."); -expect_like(qr/Ticket \d+ created/, "Created the ticket"); -expect_handle->before() =~ /Ticket (\d+) created/; -my $ticket_id = $1; - -expect_send("edit ticket/$ticket_id set marge=simpson", 'set unknown field'); -expect_like(qr/marge: Unknown field/, 'marge is unknown field'); -expect_like(qr/marge: simpson/, 'the value we set for marge is shown too'); - -expect_send("edit ticket/$ticket_id set homer=simpson", 'set unknown field'); -expect_like(qr/homer: Unknown field/, 'homer is unknown field'); -expect_like(qr/homer: simpson/, 'the value we set for homer is shown too'); - -expect_quit(); |