aboutsummaryrefslogtreecommitdiffstats
path: root/testing
diff options
context:
space:
mode:
authorSimon Ruderich <simon@ruderich.org>2011-03-05 01:49:58 +0000
committerSimon Ruderich <simon@ruderich.org>2011-03-05 01:54:22 +0000
commit5df2b67f2cbef974c59c5d91d1937ea6e99b3ae9 (patch)
tree8172d064ab7067279e728c5d1fae5781ef65bca2 /testing
parenttesting: adapted rudi's vim_mode insert test to new format. seems to work fine. (diff)
downloadirssi-scripts-5df2b67f2cbef974c59c5d91d1937ea6e99b3ae9.tar.gz
irssi-scripts-5df2b67f2cbef974c59c5d91d1937ea6e99b3ae9.zip
vim-mode/tests.pl: Add first real tests: h l 0 ^ $ <Space> <BS> f t.
Merge testing/tests/003-vim-mode.t with vim-mode/tests.pl and remove it from testing/.
Diffstat (limited to 'testing')
-rwxr-xr-xtesting/tests/003-vim-mode.t43
1 files changed, 0 insertions, 43 deletions
diff --git a/testing/tests/003-vim-mode.t b/testing/tests/003-vim-mode.t
deleted file mode 100755
index a732f66..0000000
--- a/testing/tests/003-vim-mode.t
+++ /dev/null
@@ -1,43 +0,0 @@
-#!/usr/bin/env perl
-
-# Must be run in a 80x24 terminal unless a fixed POE is released.
-use strict;
-use warnings;
-
-use Test::Irssi;
-
-sub statusbar_mode {
- my ($test, $mode) = @_;
-
- $test->add_pattern_match(qr/^ \[\d{2}:\d{2}\] \[\] \[1\] \[$mode\]\s+$/,
- 'window_sbar', "[$mode] in vim-mode statusbar");
-}
-
-my $tester = Test::Irssi->new
- (irssi_binary => "/opt/stow/repo/irssi-debug/bin/irssi",
- irssi_homedir => $ENV{HOME} . "/projects/tmp/test/irssi-debug");
-
-$tester->run_headless(1);
-$tester->generate_tap(1);
-
-my $test = $tester->new_test('insert-command-mode');
-$test->description("switching between insert and command mode in vim_mode script");
-
-# Make sure irssi is finished - not entirely sure why this is necessary.
-$test->add_delay(2);
-
-# We start in insert mode.
-statusbar_mode($test, 'Insert');
-
-$test->add_input_sequence("\e");
-$test->add_delay(1);
-statusbar_mode($test, 'Command');
-
-$test->add_input_sequence("i");
-$test->add_delay(1);
-statusbar_mode($test, 'Insert');
-
-# Quit irssi, necessary to terminate the test.
-$test->add_input_sequence("\n/quit\n");
-
-$tester->run;