diff options
| author | Timo Sirainen <cras@irssi.org> | 2002-10-15 07:40:47 +0000 |
|---|---|---|
| committer | cras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564> | 2002-10-15 07:40:47 +0000 |
| commit | d20c8238b7d843a83088c3dc41012c8b06f8ce7a (patch) | |
| tree | fc4afe3e527b1edf9228c46981d96b548e55051f | |
| parent | 80a3674acbf01d1a337bad68ffbbbdae0cdf2efe (diff) | |
| download | irssi-d20c8238b7d843a83088c3dc41012c8b06f8ce7a.zip | |
Updated from scripts.irssi.org
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2959 dbcabf3a-b0e7-0310-adc4-f8d773084564
| -rw-r--r-- | scripts/scriptassist.pl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/scripts/scriptassist.pl b/scripts/scriptassist.pl index 144b2673..3a46593e 100644 --- a/scripts/scriptassist.pl +++ b/scripts/scriptassist.pl @@ -8,7 +8,7 @@ use strict; use vars qw($VERSION %IRSSI); -$VERSION = '2002101401'; +$VERSION = '2002101402'; %IRSSI = ( authors => 'Stefan \'tommie\' Tomanek', contact => 'stefan@pico.ruhr.de', @@ -988,9 +988,9 @@ sub cmd_scripassist ($$$) { bg_do("info ".join(' ', @args)); } elsif ($args[0] eq 'echo') { bg_do("echo"); - } elsif ($args[0] eq 'top' && defined $args[1]) { - shift @args; - bg_do("top ".join(' ', @args)); + } elsif ($args[0] eq 'top') { + my $number = defined $args[1] ? $args[1] : 10; + bg_do("top ".$number); } elsif ($args[0] eq 'cpan' && defined $args[1]) { call_openurl('http://search.cpan.org/search?mode=module&query='.$args[1]); } elsif ($args[0] eq 'autorun' && defined $args[1]) { |