From: Peder Stray <redacted>
Date: Fri, 20 Aug 2021 11:49:58 +0000 (+0200)
Subject: Update chansort to 1.5
X-Git-Url: http://git.99rst.org/?a=commitdiff_plain;h=e6afb9d593deaeb0037af4372d2a46ac9d5efef6;p=irssi-scripts.irssi.org.git

Update chansort to 1.5

Adds netonly config option
---

diff --git a/scripts/chansort.pl b/scripts/chansort.pl
index 82e2c69..81935d7 100644
--- a/scripts/chansort.pl
+++ b/scripts/chansort.pl
@@ -7,7 +7,7 @@ use Irssi;
 use Irssi::Irc;
 
 use vars qw{$VERSION %IRSSI};
-($VERSION) = '$Revision: 1.4 $' =~ / (\d+\.\d+) /;
+($VERSION) = '$Revision: 1.5 $' =~ / (\d+\.\d+) /;
 %IRSSI = (
 	  name        => 'chansort',
 	  authors     => 'Peder Stray',
@@ -27,15 +27,19 @@ sub cmd_chansort {
     my(@windows);
     my($minwin);
 
+    my $netonly = Irssi::settings_get_bool('chansort_netonly');
+
     for my $win (Irssi::windows()) {
 	my $act = $win->{active};
 	my $key;
 
+	my $id = sprintf "%05d", $win->{refnum};
+
 	if ($act->{type} eq 'CHANNEL') {
-	    $key = "C".$act->{server}{tag}.' '.substr($act->{visible_name}, 1);
+	    $key = "C".$act->{server}{tag}.' '.($netonly ? $id : substr($act->{visible_name}, 1));
 	}
 	elsif ($act->{type} eq 'QUERY') {
-	    $key = "Q".$act->{server}{tag}.' '.$act->{visible_name};
+	    $key = "Q".$act->{server}{tag}.' '.($netonly ? $id : $act->{visible_name});
 	}
 	else {
 	    next;
@@ -68,6 +72,7 @@ sub cmd_chansort {
 Irssi::command_bind('chansort', 'cmd_chansort');
 
 Irssi::settings_add_bool('chansort', 'chansort_autosort', 0);
+Irssi::settings_add_bool('chansort', 'chansort_netonly', 0);
 
 Irssi::signal_add_last('window item name changed', 'sig_sort_trigger');
 Irssi::signal_add_last('channel created', 'sig_sort_trigger');