]> git.99rst.org Git - irssi-scripts.irssi.org.git/commitdiff
[url] v0.55
authorbw1 <redacted>
Sat, 10 Sep 2022 10:50:40 +0000 (12:50 +0200)
committerbw1 <redacted>
Sat, 10 Sep 2022 10:50:40 +0000 (12:50 +0200)
scripts/url.pl

index a9b6b469a18cbfd98cef20b64e4bd4ad8fbc4151..5a89746cffd721c7145dfc8a438de6b9534f2fc5 100644 (file)
@@ -1,17 +1,18 @@
-# $Id: url.pl,v 1.52 2002/11/21 06:04:52 jylefort Exp $
+use strict;
+use vars qw/$VERSION %IRSSI/;
 
-use Irssi 20020121.2020 ();
-$VERSION = "0.54";
+$VERSION = "0.55";
 %IRSSI = (
          authors     => 'Jean-Yves Lefort',
          contact     => 'jylefort\@brutele.be, decadix on IRCNet',
          name        => 'url',
          description => 'An URL grabber for Irssi',
          license     => 'BSD',
-         url         => 'http://void.adminz.be/',
-         changed     => '$Date: 2002/11/21 06:04:52 $ ',
+         url         => 'https://scripts.irssi.org/',
+         changed     => '2022-09-10',
 );
 
+
 # description:
 #
 #      url.pl grabs URLs in messages and allows you to open them on the fly,
@@ -71,6 +72,10 @@ $VERSION = "0.54";
 #
 # changes:
 #
+#      2022-09-10      release 0.55
+#                      * move to scripts.irssi.org from https://github.com/irssi/scripts.irssi.org
+#                      * use strict; open, vars
+#
 #      2002-11-21      release 0.54
 #                      * added a DTD to the generated HTML file, suggested
 #                        by Hugo Haas <hugo@larve.net>
@@ -247,7 +252,7 @@ sub print_text {
 sub write_file {
   my $file = shift;
 
-  open(FILE, ">$file") or return $!;
+  open(FILE, ">", $file) or return $!;
 
   print FILE <<'EOF' or return $!;
 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
@@ -327,3 +332,5 @@ Irssi::settings_add_str('misc', 'url_file', '~/.irc_url_list.html');
 Irssi::signal_add('print text', \&print_text);
 
 Irssi::command_bind('url', \&url);
+
+# vim:set ts=8 sw=2:
git clone https://git.99rst.org/PROJECT