Author: ericwilhelm
Date: Mon Sep  3 00:25:05 2007
New Revision: 9903

Modified:
   Module-Build/trunk/t/lib/DistGen.pm

Log:
t/lib/DistGen.pm - cleanup the pod a bit


Modified: Module-Build/trunk/t/lib/DistGen.pm
==============================================================================
--- Module-Build/trunk/t/lib/DistGen.pm (original)
+++ Module-Build/trunk/t/lib/DistGen.pm Mon Sep  3 00:25:05 2007
@@ -391,14 +391,23 @@
 
 DistGen - Creates simple distributions for testing.
 
+=head1 SYNOPSIS
 
-=head1 DESCRIPTION
-
+  use DistGen;
 
+  my $dist = DistGen->new(dir => $tmp);
+  ...
+  $dist->add_file('t/some_test.t', $contents);
+  ...
+  $dist->regen;
+
+  chdir($dist->dirname) or die "Cannot chdir to '@{[$dist->dirname]}': $!";
+  ...
+  chdir($cwd) or die "cannot return to $cwd";
+  $dist->remove;
 
 =head1 API
 
-
 =head2 Constructor
 
 =head3 new()
@@ -424,7 +433,6 @@
 
 =back
 
-
 =head2 Manipulating the Distribution
 
 =head3 regen( [OPTIONS] )
@@ -456,7 +464,6 @@
 
 Removes the complete distribution.
 
-
 =head2 Editing Files
 
 Note that all ${filename}s should be specified with unix-style paths,
@@ -477,7 +484,6 @@
 Changes the contents of $filename to $content. No action is performed
 until the distribution is regenerated.
 
-
 =head2 Properties
 
 =head3 name()
@@ -489,3 +495,5 @@
 Returns the directory name where the distribution is created.
 
 =cut
+
+# vim:ts=2:sw=2:et:sta

Reply via email to