From bcb0c884b46815b889e5fd4011226feaba2b3369 Mon Sep 17 00:00:00 2001 From: Tom Feist Date: Wed, 6 Oct 2010 23:51:10 +0100 Subject: added /print_test to check rev. video stuff is behaving. --- prompt_info/prompt_replace.pl | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/prompt_info/prompt_replace.pl b/prompt_info/prompt_replace.pl index 3055afc..7c8ecc1 100644 --- a/prompt_info/prompt_replace.pl +++ b/prompt_info/prompt_replace.pl @@ -46,8 +46,9 @@ sub update_terminal_size { if ($line =~ m/\s*(\d+)\s*rows\s*;\s*(\d+)\s*columns\s*;/) { $term_h = $1; $term_w = $2; + print "terminal size detected as $term_w x $term_h" if DEBUG; } else { - print "Failed to detect terminal size"; + print "Failed to detect terminal size" if DEBUG; } } @@ -85,6 +86,10 @@ sub init { Irssi::command("^BIND ^F /visual toggle"); Irssi::command("^BIND ^G /visual clear"); + Irssi::command_bind 'print_test', + sub { + Irssi::gui_printtext(0, 0, '%8hello there%n'); + }; # redraw interception Irssi::signal_add_last('command redraw', \&augment_redraw); -- cgit v1.2.3