Correct documention as pointed out in issue #2

Also add a test to ensure the example code in the SYOPSIS works with the released code.

lib/Log/Any/Adapter/FileHandle.pm

@@ -7,8 +7,10 @@ Log::Any::Adapter::FileHandle - A basic Log::Any::Adapter to forward messages to
 =head1 SYNOPSIS
 
   use Log::Any qw($log);
+  use Log::Any::Adapter;
 
-  $log->set_adapter('FileHandle');
+  # Send all logs to Log::Any::Adapter::FileHandle
+  Log::Any::Adapter->set('FileHandle');
 
   $log->info("Hello world");
  

t/3-synopsis.t

@@ -0,0 +1,24 @@
+use Test::More;
+use IO::File;
+use IO::String;
+
+
+plan tests => 1;
+
+my $buf = IO::String->new();
+# TODO: automatically extract this from the module?
+eval q{ 
+	
+	use Log::Any qw($log);
+	use Log::Any::Adapter;
+
+	# Send all logs to Log::Any::Adapter::FileHandle
+	Log::Any::Adapter->set('FileHandle', fh=>$buf);
+
+	$log->info("Hello world");
+};
+die $@ if $@;
+
+is(${$buf->string_ref},"[info] Hello world\n", "Testing example in SYOPSIS")
+
+