aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorTom Feist <shabble@cowu.be>2010-08-04 17:52:35 +0000
committerTom Feist <shabble@cowu.be>2010-08-04 17:52:35 +0000
commit011c65a31356c33a8f3b406f6cf57da41e21756e (patch)
tree355fac9ab64a118eada3372c9a33a74950140936
parentinitial add of mirc_colour_popup.pl (diff)
downloadirssi-scripts-011c65a31356c33a8f3b406f6cf57da41e21756e.tar.gz
irssi-scripts-011c65a31356c33a8f3b406f6cf57da41e21756e.zip
some stuff with colour popups
-rwxr-xr-x[-rw-r--r--]colour-popup/colour_popup.pl6
-rw-r--r--docs/Irssi.pod65
-rw-r--r--docs/Signals.pod3
-rw-r--r--history-search/rl_history_search.pl1
-rw-r--r--prompt_info/prompt_info.pl2
-rw-r--r--test/irssi/config7
-rw-r--r--test/irssi/default.theme2
7 files changed, 45 insertions, 41 deletions
diff --git a/colour-popup/colour_popup.pl b/colour-popup/colour_popup.pl
index b12c4f6..037d106 100644..100755
--- a/colour-popup/colour_popup.pl
+++ b/colour-popup/colour_popup.pl
@@ -5,7 +5,7 @@
#
# usage:
#
-# after loading the script, add the statusbar item somewhere convenient:
+# after loading the script, add the statusbar item somewhere convenient:
# /statusbar window add -after barstart colours
#
@@ -21,7 +21,7 @@ $VERSION = "1.0";
name => "mirc_colour_popup",
description => "Shows a mIRC-style colour popup when you hit ^C.",
license => "Public Domain",
- changed => "9.26.2008",
+ changed => "31/7/2010",
);
@@ -36,7 +36,7 @@ sub colours_sb {
if( $vis ) {
$txt = join " ", map { "\%$colours[$_]$_" } 0 .. 15;
}
- $item->default_handler($get_size_only, "{sb $txt}", undef, 1);
+ $item->default_handler($get_size_only, "\%0{sb $txt}", undef, 1);
}
diff --git a/docs/Irssi.pod b/docs/Irssi.pod
index 5fa8413..eba846e 100644
--- a/docs/Irssi.pod
+++ b/docs/Irssi.pod
@@ -2,7 +2,7 @@ __END__
=head1 NAME
-Irssi.pm
+Irssi
=head1 DESCRIPTION
@@ -83,7 +83,6 @@ For example:
=head1 METHODS
-
=head2 Accessors
=head3 C<active_win>
@@ -100,8 +99,12 @@ returns the currently active L<Irssi::Server> in active window.
=head3 C<windows>
+C<my @windows = Irssi::windows();>
returns a list of all L<windows|Irssi::UI::Window>.
+When called in scalar context C<my $win = Irssi::windows();>, only the first
+window is returned.
+
=head3 C<servers>
returns a list of all L<servers|Irssi::Server>.
@@ -383,33 +386,6 @@ Settings are a way to permanently store values that your script may wish to use.
They are also easily manipulable by the user through the C</SET> command, making
them a good way to allow configuration of your script.
-=head3 Creating New Settings
-
-If a setting does not currently exist, it must first be registered with Irssi
-using one of the C<settings_add> functions.
-
-=head4 C<settings_add_str $section, $key, $def>
-
-=head4 C<settings_add_int $section, $key, $def>
-
-=head4 C<settings_add_bool $section, $key, $def>
-
-=head4 C<settings_add_time $section, $key, $def>
-
-=head4 C<settings_add_level $section, $key, $def>
-
-=head4 C<settings_add_size $section, $key, $def>
-
-Each of the above functions operates in the same way, but creates a different
-data type. For each function, C<$section> is a string describing the
-group the entry falls into, C<$key> is the name of the setting. The key must
-be a single string, and typically multiple words are separated by underscores.
-
-The final parameter, C<$def>, is the default value of this setting. It should
-correspond to the type of the setting being created.
-
-B<TODO: move this list to another section?>
-
The following list summarises the data types available:
=over
@@ -444,9 +420,10 @@ B<TODO: can different specifiers be combined?>
The value is stored internally as a number of milliseconds. Since it is stored
as an C<signed int>, it will overflow at 2^31 ms, or approximately 24 days.
-
Times longer than this are considered invalid.
+The default specifier if none are specified is I<seconds>.
+
=item C<level>
An irssi Messagelevel. See C</HELP LEVELS> for a full list and description, or
@@ -461,6 +438,34 @@ scheme, rather than the decimal C<$x * 1000> system.
=back
+=head3 Creating New Settings
+
+If a setting does not currently exist, it must first be registered with Irssi
+using one of the C<settings_add> functions.
+
+=head4 C<settings_add_str $section, $key, $def>
+
+=head4 C<settings_add_int $section, $key, $def>
+
+=head4 C<settings_add_bool $section, $key, $def>
+
+=head4 C<settings_add_time $section, $key, $def>
+
+=head4 C<settings_add_level $section, $key, $def>
+
+=head4 C<settings_add_size $section, $key, $def>
+
+Each of the above functions operates in the same way, but creates a different
+data type. For each function, C<$section> is a string describing the
+group the entry falls into, C<$key> is the name of the setting. The key must
+be a single string, and typically multiple words are separated by underscores.
+
+The final parameter, C<$def>, is the default value of this setting. It should
+correspond to the type of the setting being created.
+
+B<TODO: move this list to another section?>
+
+
=head3 Retrieving Settings
=head4 C<settings_get_str $key>
diff --git a/docs/Signals.pod b/docs/Signals.pod
index f3d18b9..f12dd7f 100644
--- a/docs/Signals.pod
+++ b/docs/Signals.pod
@@ -2089,6 +2089,9 @@ B<TODO: Check ordering of arguments from/to here>
=back
+B<TODO: does this fire if you dont' change windows? (eg: send a switch commandf
+for the window you're already on)
+
=item C<"window changed automatic">
=over
diff --git a/history-search/rl_history_search.pl b/history-search/rl_history_search.pl
index 09493f9..83ff934 100644
--- a/history-search/rl_history_search.pl
+++ b/history-search/rl_history_search.pl
@@ -212,6 +212,7 @@ sub handle_keypress {
}
update_history_matches();
update_history_prompt();
+ update_input();
Irssi::signal_stop();
return;
diff --git a/prompt_info/prompt_info.pl b/prompt_info/prompt_info.pl
index aa52a81..342b62c 100644
--- a/prompt_info/prompt_info.pl
+++ b/prompt_info/prompt_info.pl
@@ -44,6 +44,8 @@ Irssi::expando_create('prompt_additional', \&expando_prompt, {});
sub expando_prompt {
my ($server, $witem, $arg) = @_;
return $prompt_additional_content;
+ #return Irssi::current_theme->format_expand("{sb
+ #$prompt_additional_content}", 0x0f);
}
sub redraw_prompts {
diff --git a/test/irssi/config b/test/irssi/config
index 6b46771..1e0d97c 100644
--- a/test/irssi/config
+++ b/test/irssi/config
@@ -278,13 +278,6 @@ keyboard = (
data = "se print defined(Irssi::gui_input_set(\"hello\"))?1:0";
},
{ key = "meta-x"; id = "command"; data = "history_search "; },
- {
- key = "M-g";
- id = "command";
- data = "se print defined(Irssi::gui_input_set(\"hello\"))?1:0";
- },
{ key = "^Z"; id = "command"; data = "echo moo"; },
- { key = "^O"; id = "command"; data = "echo moo"; },
- { key = "^o"; id = "command"; data = "echo moo"; },
{ key = "^R"; id = "command"; data = "history_search_start "; }
);
diff --git a/test/irssi/default.theme b/test/irssi/default.theme
index 357a98e..a5471c8 100644
--- a/test/irssi/default.theme
+++ b/test/irssi/default.theme
@@ -250,7 +250,7 @@ abstracts = {
# default background for all statusbars. You can also give
# the default foreground color for statusbar items.
- sb_background = "%5%w";
+ sb_background = "%0%w";
# default backround for "default" statusbar group
#sb_default_bg = "%4";