sydney/Autobot
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fixing fails.

Browse Source
This commit is contained in:
Elijah Perrault committed 2011-04-11 23:03:24 -06:00
1 parent dc96422598
commit 516d11a5f7
1 file changed
+3 -3
Download Patch File Download Diff File Expand all files Collapse all files
lib/Core/Cmd.pm
+3 -3
View File
@@ -265,7 +265,7 @@ sub cmd_help
# Help for a specific command was requested. Lets get it. # Help for a specific command was requested. Lets get it.
my $rcm = uc($argv[0]); my $rcm = uc($argv[0]);
if (defined $API::Std::CMDS{$rcm}{help}) { if (exists $API::Std::CMDS{$rcm}{help}) {
# If there is help for this command. # If there is help for this command.
# Check for necessary privileges. # Check for necessary privileges.
@@ -282,13 +282,13 @@ sub cmd_help
# Get the language. # Get the language.
my ($lang, undef) = split('_', $Auto::LOCALE); my ($lang, undef) = split('_', $Auto::LOCALE);
if (defined ${ $API::Std::CMDS{$rcm}{help} }{$lang}) { if (exists ${ $API::Std::CMDS{$rcm}{help} }{$lang}) {
# If help for this command is available in the configured language. # If help for this command is available in the configured language.
notice($src->{svr}, $src->{nick}, "Help for \002".$rcm."\002: ".${ $API::Std::CMDS{$rcm}{help} }{$lang}); notice($src->{svr}, $src->{nick}, "Help for \002".$rcm."\002: ".${ $API::Std::CMDS{$rcm}{help} }{$lang});
} }
else { else {
# If it isn't, default to English. # If it isn't, default to English.
if (defined ${ $API::Std::CMDS{$rcm}{help} }{en}) { if (exists ${ $API::Std::CMDS{$rcm}{help} }{en}) {
# If help for this command is available in English. # If help for this command is available in English.
notice($src->{svr}, $src->{nick}, "Help for \002".$rcm."\002: ".${ $API::Std::CMDS{$rcm}{help} }{en}); notice($src->{svr}, $src->{nick}, "Help for \002".$rcm."\002: ".${ $API::Std::CMDS{$rcm}{help} }{en});
} }