aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorTom Feist <shabble@metavore.org>2011-04-01 06:17:35 +0000
committerTom Feist <shabble@metavore.org>2011-04-01 06:17:35 +0000
commit3d8262cff80e0d1cf640feaa3abcf1b09d7c5e2d (patch)
treec7fdc891661657c95514984512b48e408b616b28
parentnotifyquit: fix stupid syntax error in regex. (diff)
downloadirssi-scripts-3d8262cff80e0d1cf640feaa3abcf1b09d7c5e2d.tar.gz
irssi-scripts-3d8262cff80e0d1cf640feaa3abcf1b09d7c5e2d.zip
uberprompt: fix brace handling bug
-rw-r--r--prompt_info/uberprompt.pl8
1 files changed, 5 insertions, 3 deletions
diff --git a/prompt_info/uberprompt.pl b/prompt_info/uberprompt.pl
index 3426711..59dcb65 100644
--- a/prompt_info/uberprompt.pl
+++ b/prompt_info/uberprompt.pl
@@ -285,7 +285,9 @@ sub exp_lbrace() { '{' }
sub exp_rbrace() { '}' }
sub deinit {
- Irssi::expando_destroy('brace');
+ Irssi::expando_destroy('lbrace');
+ Irssi::expando_destroy('rbrace');
+
# remove uberprompt and return the original ones.
print "Removing uberprompt and restoring original";
restore_prompt_items();
@@ -472,8 +474,8 @@ sub _escape_prompt_special {
$str =~ s/\$/\$\$/g;
$str =~ s/\\/\\\\/g;
#$str =~ s/%/%%/g;
- $str =~ s/{/\$lbrace/g;
- $str =~ s/}/\$rbrace/g;
+ $str =~ s/{/\${lbrace}/g;
+ $str =~ s/}/\${rbrace}/g;
return $str;
}