zynk/irssi
2
0
Fork 0
mirror of https://github.com/irssi/irssi.git synced 2026-08-08 19:30:15 +02:00
Code Issues Projects Releases Packages Wiki Activity

Updated from scripts.irssi.org

Browse source 
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2999 dbcabf3a-b0e7-0310-adc4-f8d773084564
This commit is contained in:
Timo Sirainen 2002-11-13 09:40:49 +00:00 • committed by cras
commit 3e86ba6bd6
1 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
scripts/scriptassist.pl
View file

@ -6,7 +6,7 @@
use strict; use strict;
use vars qw($VERSION %IRSSI); use vars qw($VERSION %IRSSI);
$VERSION = '2002111001'; $VERSION = '2002111301';
%IRSSI = ( %IRSSI = (
authors => 'Stefan \'tommie\' Tomanek', authors => 'Stefan \'tommie\' Tomanek',
contact => 'stefan@pico.ruhr.de', contact => 'stefan@pico.ruhr.de',
@ -294,8 +294,9 @@ sub install_scripts ($$) {
my ($scripts, $xml) = @_; my ($scripts, $xml) = @_;
my %success; my %success;
#$success{-foo} = 1; #$success{-foo} = 1;
my $dir = Irssi::get_irssi_dir()."/scripts/";
foreach (@{$scripts}) { foreach (@{$scripts}) {
if (get_local_version($_)) { if (get_local_version($_) && (-e $dir.$_.".pl")) {
$success{$_}{installed} = -2; $success{$_}{installed} = -2;
} else { } else {
$success{$_} = download_script($_, $xml); $success{$_} = download_script($_, $xml);