diff options
| author | Tom Feist <shabble@metavore.org> | 2010-10-14 20:00:05 +0000 |
|---|---|---|
| committer | Tom Feist <shabble@metavore.org> | 2010-10-14 20:00:05 +0000 |
| commit | 85ab93558d23470dd7a3f043354980a82226ece7 (patch) | |
| tree | 37d077d213eb6ce8ca91e02dcac5a279c31c1f8b /prompt_info | |
| parent | added list of all signals, including internal ones. (diff) | |
| download | irssi-scripts-85ab93558d23470dd7a3f043354980a82226ece7.tar.gz irssi-scripts-85ab93558d23470dd7a3f043354980a82226ece7.zip | |
uberprompt: hopefully fixed RHS positioning on script autorun
Diffstat (limited to 'prompt_info')
| -rw-r--r-- | prompt_info/uberprompt.pl | 31 |
1 files changed, 28 insertions, 3 deletions
diff --git a/prompt_info/uberprompt.pl b/prompt_info/uberprompt.pl index 76660b2..0581dd3 100644 --- a/prompt_info/uberprompt.pl +++ b/prompt_info/uberprompt.pl @@ -80,6 +80,14 @@ # may cause irssi to crash. See bug report at # http://bugs.irssi.org/index.php?do=details&task_id=772 for details. # +# TODO: +# +# * report failure (somehow) to clients if hte prompt is disabled. +# * fix issue at autorun startup with sbar item doesn't exist. +# +# +# +# # LICENCE: # # Copyright (c) 2010 Tom Feist @@ -114,7 +122,7 @@ our %IRSSI = ( authors => "shabble", contact => 'shabble+irssi@metavore.org, shabble@#irssi/Freenode', - name => "prompt_info", + name => "uberprompt", description => "Helper script for dynamically adding text " . "into the input-bar prompt.", license => "MIT", @@ -131,7 +139,25 @@ my $prompt_data_pos = 'UP_INNER'; my $prompt_last = ''; my $prompt_format = ''; -init(); +pre_init(); + +sub pre_init { + # my $start_time = Irssi::parse_special('$F'); + # my $now = time(); + # my $delta = $now - $start_time; + + # print "Delta is $delta"; + # if ($delta < 2) { + # print "starting a bit later"; + # Irssi::timeout_add_once(5000, \&init, undef); + # } else { + # print "starting immediately"; + + # init(); + # } + Irssi::command('statusbar prompt reset'); + init(); +} sub prompt_subcmd_handler { my ($data, $server, $item) = @_; @@ -146,7 +172,6 @@ sub UNLOAD { } sub init { - Irssi::statusbar_item_register('uberprompt', 0, 'uberprompt_draw'); Irssi::settings_add_str('uberprompt', 'uberprompt_format', '[$*$uber] '); |