clean up document

1 files changed, 17 insertions, 44 deletions

diff --git a/fml/lib/FML/Process/Command.pm b/fml/lib/FML/Process/Command.pm
index 999688a8..be7941c7 100644
--- a/fml/lib/FML/Process/Command.pm
+++ b/fml/lib/FML/Process/Command.pm
@@ -17,6 +17,22 @@ use FML::Process::Kernel;
 use FML::Log qw(Log);
 use FML::Config;
 
+=head1 NAME
+
+FML::Process::Command -- fml5 command processor.
+
+=head1 SYNOPSIS
+
+   use FML::Process::Command;
+   ...
+
+See L<FML::Process::Flow> for details of flow.
+
+=head1 DESCRIPTION
+
+=cut
+
+
 require Exporter;
 @ISA = qw(FML::Process::Kernel Exporter);
 
@@ -43,6 +59,7 @@ sub verify_request
     $curproc->verify_sender_credential();
 }
 
+
 sub run
 {
     my ($curproc, $args) = @_;
@@ -79,48 +96,4 @@ sub _evaluate_command
 }
 
 
-=head1 NAME
-
-distribute -- fml5 article distributer program.
-
-=head1 SYNOPSIS
-
-   distribute [-d] config.cf
-
-=head1 DESCRIPTION
-
-libexec/fml.pl, the wrapper, executes this program. For example, The
-incoming mail to elena@fml.org kicks off libexec/distribute via
-libexec/fml.pl, whereas mail to elena-ctl@fml.org kicks off
-libexec/command finally.
-
-   incoming_message =>
-      elena@fml.org       => fml.pl => libexec/distribute
-      elena-ctl@fml.org   => fml.pl => libexec/command
-      elena-admin@fml.org => forwarded to administrator(s)
-                                  OR
-                          => libexec/mead
-
-C<-d>
-    debug on.
-
-=head1 FLOW AROUND COMPONENTS
-
-   |  <=> FML::BaseSystem
-   |      load configuration files
-   |      start logging service
-   |
-   |  STDIN                           => FML::Parse
-   |  $CurProc->{'incoming_message'} <=
-   |  $CurProc->{'credential'}
-   | 
-   |  (lock)
-   |  prepare article
-   |  $CurProc->{'article'} is spooled in.
-   |  $CurProc->{'article'}    <=> Service::SMTP
-   |  (unlock)
-   V
-
-=cut
-
 1;