--- trunk/lib/Frey/Server.pm	2008/09/07 19:32:38	181
+++ trunk/lib/Frey/Server.pm	2008/09/07 19:44:08	182
@@ -18,6 +18,20 @@
 
 #$repl = Continuity::REPL->new;
 
+=head1 NAME
+
+Frey::Server - Continuity based server for Frey
+
+=head2 DESCRIPTION
+
+This is one of pissible server implementations for Frey. In it's current stage, it's also most complete one.
+
+=head2 run
+
+  $o->run( $optional_port );
+
+=cut
+
 sub run {
 	my ( $self, $port ) = @_;
 	$server = Continuity->new(
@@ -33,9 +47,13 @@
 	$server->loop;
 }
 
-# This is the main entrypoint. We are looking for one of three things -- a
-# pushstream, a sent message, or a request for the main HTML. We delegate each
-# of these cases, none of which will return (they all loop forever).
+=head2 main
+
+This is simple dispatcher for our server. Currently it's in flux and
+documented only in source code.
+
+=cut
+
 sub main {
 	my ($req) = @_;
   
@@ -46,14 +64,6 @@
 
 #	warn $req->request->header('User_Agent');
 
-	sub run_markup {
-		my ( $req, $class ) = @_;
-
-		my %params = $req->params;
-
-	}
-
-
 #	eval {
 	{