1 files changed, 0 insertions, 88 deletions
diff --git a/.irssi/scripts/bitlbee_tab_completion.pl b/.irssi/scripts/bitlbee_tab_completion.pl
deleted file mode 100644
index 8d19128..0000000
--- a/.irssi/scripts/bitlbee_tab_completion.pl
+++ /dev/null
@@ -1,88 +0,0 @@
-use strict;
-use vars qw($VERSION %IRSSI);
-
-$VERSION = '1.3';
-
-%IRSSI = (
-    authors     => 'Tijmen "timing" Ruizendaal & Wilmer van der Gaast',
-    contact     => 'tijmen.ruizendaal@gmail.com',
-    name        => 'BitlBee_tab_completion',
-    description => 'Intelligent Tab-completion for BitlBee commands.',
-    license     => 'GPLv2',
-    url         => 'http://the-timing.nl/stuff/irssi-bitlbee',
-    changed     => '2009-08-11',
-);
-
-my $root_nick = 'root';
-my $bitlbee_channel = '&bitlbee';
-my $bitlbee_server_tag = 'localhost';
-my $get_completions = 0;
-
-my @commands;
-
-Irssi::signal_add_last 'channel sync' => sub {
-        my( $channel ) = @_;
-        if( $channel->{topic} eq "Welcome to the control channel. Type \x02help\x02 for help information." ){
-                $bitlbee_server_tag = $channel->{server}->{tag};
-                $bitlbee_channel = $channel->{name};
-		request_completions();
-        }
-};
-
-if (get_channel()) {
-	request_completions();
-}
-
-sub request_completions {
-	$get_completions = 1;
-	Irssi::server_find_tag($bitlbee_server_tag)->send_raw( 'COMPLETIONS' );
-}
-
-sub get_channel {
-        my @channels = Irssi::channels();
-        foreach my $channel(@channels) {
-                if ($channel->{topic} eq "Welcome to the control channel. Type \x02help\x02 for help information.") {
-                        $bitlbee_channel = $channel->{name};
-                        $bitlbee_server_tag = $channel->{server}->{tag};
-			return 1;
-                }
-        }
-	return 0;
-}
-
-sub irc_notice {
-	return unless $get_completions;
-	my( $server, $msg, $from, $address, $target ) = @_;
-	
-	if( $msg =~ s/^COMPLETIONS // )	{
-		$root_nick = $from;
-		if( $msg eq 'OK' ) {
-			@commands = ();
-		}
-		elsif( $msg eq 'END' ) {
-			$get_completions = 0;
-		}
-		@commands = ( @commands, $msg );
-		
-		Irssi::signal_stop();
-	}
-}
-
-sub complete_word {
-	my ($complist, $window, $word, $linestart, $want_space) = @_;
-	my $channel = $window->get_active_name();
-	if ($channel eq $bitlbee_channel or $channel eq $root_nick or $linestart =~ /^\/(msg|query) \Q$root_nick\E */i){
-		$linestart =~ s/^\/(msg|query) \Q$root_nick\E *//i;
-		$linestart =~ s/^\Q$root_nick\E[:,] *//i;
-		foreach my $command(@commands) {	
-			if ($command =~ /^$word/i) {
-				push @$complist, $command;
-		    	}
-		}
-	}
-}
-
-
-Irssi::signal_add_last('complete word', 'complete_word');
-Irssi::signal_add_first('message irc notice', 'irc_notice');
-