git://git.camperquake.de
/
videosite.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
d4895ed
)
videosite: print help if no connector subcommand given, lowercase connector names...
author
Ralf Ertzinger
<ralf@skytale.net>
Wed, 7 Sep 2011 16:21:02 +0000
(18:21 +0200)
committer
Ralf Ertzinger
<ralf@skytale.net>
Wed, 7 Sep 2011 16:21:02 +0000
(18:21 +0200)
videosite.pl
patch
|
blob
|
history
diff --git
a/videosite.pl
b/videosite.pl
index
a5123bc
..
6689929
100644
(file)
--- a/
videosite.pl
+++ b/
videosite.pl
@@
-432,8
+432,7
@@
sub cmd_connector {
my $connconf = $conf->{'videosite'}->{'connectors'};
unless(defined($subcmd)) {
my $connconf = $conf->{'videosite'}->{'connectors'};
unless(defined($subcmd)) {
- write_irssi('No subcommand given');
- return;
+ $subcmd = "help";
}
$subcmd = lc($subcmd);
}
$subcmd = lc($subcmd);
@@
-562,7
+561,7
@@
sub cmd_connector {
delete($connconf->{$conn}->{'schemas'}->{$schema});
} elsif ($subcmd eq 'select') {
delete($connconf->{$conn}->{'schemas'}->{$schema});
} elsif ($subcmd eq 'select') {
- my @connlist = @_;
+ my @connlist =
map { lc }
@_;
if (scalar(@connlist) == 0) {
write_irssi("No connectors given");
if (scalar(@connlist) == 0) {
write_irssi("No connectors given");