diff options
| author | mh | 2015-12-18 07:12:54 +0100 |
|---|---|---|
| committer | mh | 2015-12-18 07:12:54 +0100 |
| commit | abd0bd37cc3ff87b561474e0cf20151a7ff35651 (patch) | |
| tree | 75e297c820db72db7e77c0e941e8f41abbc60821 | |
| parent | e3b98e1865da782c1ec881dd0a327ee6a9feb316 (diff) | |
| download | scripts.irssi.org-abd0bd37cc3ff87b561474e0cf20151a7ff35651.tar.bz2 | |
mh_sbsplitmode.pl v1.05
provides a statusbar item showing if your server is in splitmode and /splitmode to show details
changes:
added indents to /help
| -rw-r--r-- | scripts/mh_sbsplitmode.pl | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/scripts/mh_sbsplitmode.pl b/scripts/mh_sbsplitmode.pl index ade6baf..c4df06a 100644 --- a/scripts/mh_sbsplitmode.pl +++ b/scripts/mh_sbsplitmode.pl @@ -1,6 +1,6 @@ ############################################################################## # -# mh_sbsplitmode.pl v1.04 (20151210) +# mh_sbsplitmode.pl v1.05 (20151217) # # Copyright (c) 2015 Michael Hansen # @@ -52,6 +52,8 @@ # see '/help statusbar' for more details and do not forget to '/save' # # history: +# v1.05 (20151217) +# added indents to /help # v1.04 (20151210) # added setting _show_details_trend and supporting code # fixed warning about experimental feature (keys($var)) in perl v5.20.2 @@ -80,7 +82,7 @@ use strict; use Irssi 20100403; use Irssi::TextUI; -our $VERSION = '1.04'; +our $VERSION = '1.05'; our %IRSSI = ( 'name' => 'mh_sbsplitmode', @@ -362,11 +364,11 @@ sub command_help Irssi::print('', Irssi::MSGLEVEL_CLIENTCRAP); Irssi::print('SPLITMODE', Irssi::MSGLEVEL_CLIENTCRAP); Irssi::print('', Irssi::MSGLEVEL_CLIENTCRAP); - Irssi::print('Shows the splitmode status of all watched servers.', Irssi::MSGLEVEL_CLIENTCRAP); + Irssi::print('%|Shows the splitmode status of all watched servers.', Irssi::MSGLEVEL_CLIENTCRAP); Irssi::print('', Irssi::MSGLEVEL_CLIENTCRAP); - Irssi::print('Splitmode occurs when a servers users or server links goes below a predefined value.', Irssi::MSGLEVEL_CLIENTCRAP); + Irssi::print('%|Splitmode occurs when a servers users or server links goes below a predefined value.', Irssi::MSGLEVEL_CLIENTCRAP); Irssi::print('', Irssi::MSGLEVEL_CLIENTCRAP); - Irssi::print('See also: SET ' . uc('mh_sbsplitmode') .', STATS', Irssi::MSGLEVEL_CLIENTCRAP); + Irssi::print('See also: %|SET ' . uc('mh_sbsplitmode') .', STATS', Irssi::MSGLEVEL_CLIENTCRAP); Irssi::print('', Irssi::MSGLEVEL_CLIENTCRAP); Irssi::signal_stop(); @@ -497,7 +499,7 @@ Irssi::signal_add_last('setup changed', 'signal_setup_changed_last'); Irssi::command_bind('splitmode', 'command_splitmode', 'mh_sbsplitmode'); Irssi::command_bind('help', 'command_help'); -timeout_request_stats_d(); +Irssi::timeout_add_once(10, 'timeout_request_stats_d', undef); 1; |