diff options
author | Tom Feist <shabble@metavore.org> | 2010-10-09 17:01:13 +0000 |
---|---|---|
committer | Tom Feist <shabble@metavore.org> | 2010-10-09 17:01:13 +0000 |
commit | 73487a72a5988da26f8a57e80d2fa68dfa9d2a01 (patch) | |
tree | 1e59e3c35f8c88fdc5343a69446b7a2452ec51b5 | |
parent | added some debug logging to catch 'prompt changed' (diff) | |
download | irssi-scripts-73487a72a5988da26f8a57e80d2fa68dfa9d2a01.tar.gz irssi-scripts-73487a72a5988da26f8a57e80d2fa68dfa9d2a01.zip |
moved more functions out into visual.pl, cleaned up some of the formatting.
-rw-r--r-- | prompt_info/uberprompt.pl | 13 | ||||
-rw-r--r-- | prompt_info/visual.pl | 7 |
2 files changed, 7 insertions, 13 deletions
diff --git a/prompt_info/uberprompt.pl b/prompt_info/uberprompt.pl index 6056d3f..bf7380b 100644 --- a/prompt_info/uberprompt.pl +++ b/prompt_info/uberprompt.pl @@ -83,13 +83,11 @@ sub DEBUG () { 1 } #sub DEBUG () { 0 } my $prompt_data = undef; -#my $prompt_item = undef; my $prompt_format = ''; init(); - sub prompt_subcmd_handler { my ($data, $server, $item) = @_; $data =~ s/\s+$//g; # strip trailing whitespace. @@ -211,19 +209,10 @@ sub uberprompt_draw { return $ret; } - sub uberprompt_refresh { Irssi::statusbar_items_redraw('uberprompt'); } - -sub cmd_clear_visual { - _clear_visual_region(); - #refresh_visual_overlay(); - Irssi::statusbar_items_redraw('input'); -} - - sub replace_prompt_items { # remove existing ones. print "Removing original prompt" if DEBUG; @@ -268,8 +257,6 @@ sub _sbar_command { Irssi::command($command); } - - # bit of fakery so things don't complain about the lack of prompt_info (hoepfully) %Irssi::Script::prompt_info:: = (); diff --git a/prompt_info/visual.pl b/prompt_info/visual.pl index 5941fe0..1413d0d 100644 --- a/prompt_info/visual.pl +++ b/prompt_info/visual.pl @@ -95,6 +95,13 @@ sub init { } +sub cmd_clear_visual { + _clear_visual_region(); + #refresh_visual_overlay(); + Irssi::statusbar_items_redraw('input'); +} + + sub augment_redraw { print "Redraw called" if DEBUG; uberprompt_refresh(); |