diff options
| author | Timo Sirainen <cras@irssi.org> | 2002-11-13 09:40:49 +0000 |
|---|---|---|
| committer | cras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564> | 2002-11-13 09:40:49 +0000 |
| commit | 3e86ba6bd6e3133716ee57088d48ca2d576b05cf (patch) | |
| tree | d86a09633e1adca00144d3b1512cd0ebc2010420 | |
| parent | b5a13fd80b332ca92b58805426b5e0002400f983 (diff) | |
| download | irssi-3e86ba6bd6e3133716ee57088d48ca2d576b05cf.zip | |
Updated from scripts.irssi.org
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2999 dbcabf3a-b0e7-0310-adc4-f8d773084564
| -rw-r--r-- | scripts/scriptassist.pl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/scripts/scriptassist.pl b/scripts/scriptassist.pl index f4cecbea..25b5ce9d 100644 --- a/scripts/scriptassist.pl +++ b/scripts/scriptassist.pl @@ -6,7 +6,7 @@ use strict; use vars qw($VERSION %IRSSI); -$VERSION = '2002111001'; +$VERSION = '2002111301'; %IRSSI = ( authors => 'Stefan \'tommie\' Tomanek', contact => 'stefan@pico.ruhr.de', @@ -294,8 +294,9 @@ sub install_scripts ($$) { my ($scripts, $xml) = @_; my %success; #$success{-foo} = 1; + my $dir = Irssi::get_irssi_dir()."/scripts/"; foreach (@{$scripts}) { - if (get_local_version($_)) { + if (get_local_version($_) && (-e $dir.$_.".pl")) { $success{$_}{installed} = -2; } else { $success{$_} = download_script($_, $xml); |