--- a/doc/PERL-HOWTO.dox Sat Sep 21 21:37:20 2013 +0530 +++ b/doc/PERL-HOWTO.dox Sat Sep 21 22:28:33 2013 +0530 @@ -73,7 +73,7 @@ $plugin = shift; # Testing was done using AIM, but this should work regardless of the protocol chosen - my $protocol = "prpl-aim"; + my $protocol = "aim"; my $account_name = "test"; # Create a new Account @@ -149,7 +149,7 @@ sub plugin_load { my $plugin = shift; - my $protocol = "prpl-aim"; + my $protocol = "aim"; my $account_name = "test"; # This is how we get an account to use in the following tests. You should replace the username @@ -232,7 +232,7 @@ @code sub plugin_load { my $plugin = shift; - my $protocol = "prpl-aim"; + my $protocol = "aim"; my $account_name = "test"; $account = Purple::Accounts::find($account_name, $protocol);