use vars qw($VERSION %IRSSI);
use strict;
-$VERSION = "1.3";
+$VERSION = "1.4";
%IRSSI = (
authors => "zdleaf",
contact => 'zdleaf@zinc.london',
name => "urlwindow",
description => "Log all urls from #channels and /msgs in a separate window",
license => "Public Domain",
- url => "http://irssi.org/",
);
sub sig_printtext {
if((($dest->{level} & (MSGLEVEL_PUBLIC)) || ($dest->{level} & (MSGLEVEL_MSGS)))
&& ($text =~
qr#((?:(https?|gopher|ftp)://[^\s<>"]+|www\.[-a-z0-9.]+)[^\s.,;<">\):])# ))
- {
+ {
my $window = Irssi::window_find_name('urls');
if ($dest->{level} & MSGLEVEL_PUBLIC) {
my $window = Irssi::window_find_name('urls');
if (!$window) {
- $window = Irssi::Windowitem::window_create('urls', 1);
- $window->set_name('urls');
- }
+ $window = Irssi::Windowitem::window_create('urls', 1);
+ $window->set_name('urls');
+}
Irssi::signal_add('print text', 'sig_printtext');