perl-win32-gui-cvscommit

[Robert M. <rob...@us...>]

Update of /cvsroot/perl-win32-gui/Win32-GUI/build_tools
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29453/build_tools

Modified Files:
	doPodDocs.pl 
Log Message:
Documentation tidy-up

Index: doPodDocs.pl
===================================================================
RCS file: /cvsroot/perl-win32-gui/Win32-GUI/build_tools/doPodDocs.pl,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** doPodDocs.pl	16 Mar 2006 21:11:12 -0000	1.5
--- doPodDocs.pl	2 Feb 2008 17:03:56 -0000	1.6
***************
*** 30,33 ****
--- 30,44 ----
  $SrcParser::DEBUG = 0;
  
+ my @packages_with_own_pod = qw(
+     Win32::GUI::AxWindow
+     Win32::GUI::BitmapInline
+     Win32::GUI::Constants
+     Win32::GUI::DIBitmap
+     Win32::GUI::DropFiles
+     Win32::GUI::Grid
+     Win32::GUI::GridLayout
+     Win32::GUI::Scintilla
+ );
+ 
  ######################################################################
  # (1) Parse the source fies for documentation.
***************
*** 67,71 ****
    my $packages = "";
  
!   for my $package (SrcParser::get_package_list()) {
      (my $link = $package) =~ s/^Win32::GUI$/Win32::GUI::Reference::Methods/; # special case for Win32::GUI
      BuildTools::macro_set("PKGNAME", $package);
--- 78,82 ----
    my $packages = "";
  
!   for my $package (sort(SrcParser::get_package_list(), @packages_with_own_pod)) {
      (my $link = $package) =~ s/^Win32::GUI$/Win32::GUI::Reference::Methods/; # special case for Win32::GUI
      BuildTools::macro_set("PKGNAME", $package);