diff options
Diffstat (limited to 'irssi/scripts/micmot.pl')
| -rw-r--r-- | irssi/scripts/micmot.pl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/irssi/scripts/micmot.pl b/irssi/scripts/micmot.pl index 1ff8f87..527329a 100644 --- a/irssi/scripts/micmot.pl +++ b/irssi/scripts/micmot.pl @@ -30,6 +30,7 @@ $TMUX_FIFO = $ENV{'HOME'}.'/.irssi/micmot-fifo' unless $TMUX_FIFO; my $PANE_NAME = $ENV{'IRSSI_TMUX_PANE'}; $PANE_NAME = 'irssi' unless $PANE_NAME; +my $PANE_MAXLEN = 30; sub set_pane_title { my ( $title ) = @_; @@ -75,7 +76,8 @@ sub activity_to_tmux { } } - set_pane_name( $tmux ? "[" . $tmux =~ s/[^.,#0-9A-Za-z-]+//rg . "]" : + $tmux =~ s/[^.,#0-9A-Za-z-]+//rg; + set_pane_name( $tmux ? "[" . $tmux =~ s/.{$PANE_MAXLEN}\K.*//s . "]" : $PANE_NAME ); if ( $tmux ) { highlight_pane(); |