[gimp-perl] Minor doc update.

[Ed J <edj src gnome org>]

commit d27b4c08329e3bd4702a2a8cf0b6be0ccfcf6b41
Author: Ed J <edj src gnome org>
Date:   Thu May 1 21:28:31 2014 +0100

    Minor doc update.

 Gimp.pm                |    2 +-
 examples/example-no-fu |   40 ++++++++++++++++++++++++++++++++++++++++
 2 files changed, 41 insertions(+), 1 deletions(-)
---
diff --git a/Gimp.pm b/Gimp.pm
index 12c7dfa..d10e95d 100644
--- a/Gimp.pm
+++ b/Gimp.pm
@@ -421,7 +421,7 @@ sub become($$)              { bless $_[0], $_[1]; }
 __END__
 =head1 NAME
 
-Gimp - write GIMP extensions/plug-ins/load- and save-handlers in Perl
+Gimp - Write GIMP extensions/plug-ins/load- and save-handlers in Perl
 
 =head1 SYNOPSIS
 
diff --git a/examples/example-no-fu b/examples/example-no-fu
index 39e1573..dfbdb7b 100755
--- a/examples/example-no-fu
+++ b/examples/example-no-fu
@@ -977,6 +977,46 @@ EOF
 };
 
 exit Gimp::main;
+__END__
+
+=head1 NAME
+
+alpha_fade - Fade the alpha channel of a layer from one side to another
+
+=head1 SYNOPSIS
+
+<Image>/Layer/Transparency/Fade...
+
+=head1 DESCRIPTION
+
+This was written as a slightly useful exercise, mostly to learn Gtk's
+excellent perl interface. It was inspired by a mailing list question
+that asked how to do exactly what this does, which is fade the alpha
+from one side to another.
+
+B<Does not use> L<Gimp::Fu>; look at L<fade-alpha> for the version that
+does.
+
+=head1 PARAMETERS
+
+ [PDB_INT32, "run_mode", "Interactive, [non-interactive"],
+ [PDB_IMAGE, "image", "Input image (unused)"],
+ [PDB_DRAWABLE, "drawable", "Input drawable"],
+ [PDB_INT32, "direction", "Direction to fade(0-8)"]
+
+=head1 RETURN VALUES
+
+=head1 IMAGE TYPES
+
+*
+
+=head1 AUTHOR
+
+Seth Burgess
+
+=head1 DATE
+
+2000
 
 =head1 LICENSE