diff options
author | Tom Feist <shabble@metavore.org> | 2010-10-06 21:34:04 +0000 |
---|---|---|
committer | Tom Feist <shabble@metavore.org> | 2010-10-06 21:34:04 +0000 |
commit | e28d05be15d078b28fa404ca4bc51d0c427eebbc (patch) | |
tree | d973790615224736060a47b3fe445f1242ee45a2 /prompt_info | |
parent | general cleanup and refactoring. Need to figure out how to handle regions going (diff) | |
download | irssi-scripts-e28d05be15d078b28fa404ca4bc51d0c427eebbc.tar.gz irssi-scripts-e28d05be15d078b28fa404ca4bc51d0c427eebbc.zip |
modified the API signal handling to prepend $p by default (as prompt_info sort
of worked).
Diffstat (limited to 'prompt_info')
-rw-r--r-- | prompt_info/prompt_replace.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/prompt_info/prompt_replace.pl b/prompt_info/prompt_replace.pl index 9b5d229..9abf66d 100644 --- a/prompt_info/prompt_replace.pl +++ b/prompt_info/prompt_replace.pl @@ -22,7 +22,7 @@ our %IRSSI = sub DEBUG () { 1 } #sub DEBUG () { 0 } -my $prompt_data = undef; +my $prompt_data = ''; my $prompt_item = undef; my $region_active = 0; @@ -121,6 +121,7 @@ sub init { sub change_prompt_sig { my ($text) = @_; + $text = '$p' . $text; print "Got prompt change sig with: $text" if DEBUG; my $changed = ($prompt_data ne $text); |