Index: FaceBook.pm
===================================================================
--- FaceBook.pm	(revision 280)
+++ FaceBook.pm	(revision 281)
@@ -111,13 +111,11 @@
 			warn "No access token in response: ".$res->content;
 			return undef;
 		}
-		$keeper->{session}->store_value( facebook_access_token => $access_token );
-		$local_session->{facebook_access_token} = $access_token;
+		$local_session->set( facebook_access_token => $access_token );
 		if( my $expires = $res{expires} ) {
-			$local_session->{facebook_expires} = time + $expires;
-			$keeper->{session}->store_value( facebook_expires => $local_session->{facebook_expires} );
+                        $local_session->set( facebook_expires => time + $expires );
 		} else {
-			#$c->user_session->{'expires'} = time + 3600*24;
+			#$local_session->set( facebook_expires => time + 3600*24 );
 		}
 		warn "FB: requested access token"		if $DEBUG;
 	} else {
@@ -141,8 +139,7 @@
 	warn "Userhash = ".Dumper($info)			if $DEBUG;
 	#warn "facebook: user=$info->{name} / $info->{id} / $info->{gender}";
 
-	$keeper->{session}->delete_key( 'facebook_redirect_url' );
-	delete $local_session->{facebook_redirect_url};
+        $local_session->delete( 'facebook_redirect_url' );
 
 	my @plugins = split (/[\ |\t]+/, $state->{plugins});
 	my $name = Encode::encode('utf-8', $info->{name});
@@ -189,10 +186,7 @@
 			ltime   => time,
 			avatar	=> 'https://graph.facebook.com/'.$info->{username}.'/picture',
 		);
-		$keeper->{session}->store_value ( %data );
-		while ( my ( $key, $value ) = each %data ) {
-			$local_session->{$key} = $value;
-		}
+		$local_session->set( %data );
         } else {
 		my %data = (
 			id	=> $info->{id},
@@ -204,10 +198,7 @@
 			ltime	=> time,
 			avatar	=> 'https://graph.facebook.com/'.$info->{username}.'/picture?type=large',
 		);
-		$keeper->{session}->store_value ( %data );
-		while ( my ( $key, $value ) = each %data ) {
-			$local_session->{$key} = $value;
-		}
+		$local_session->set ( %data );
 	}
 	return $local_session;
 }