[Perl-win32-gui-cvscommit] Win32-GUI/build_tools SrcParser.pm,1.2,1.3 doPodDocs.pl,1.3,1.4

[jw]

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

Modified Files:
        SrcParser.pm doPodDocs.pl 
Log Message:
Reini Urban changes

Index: doPodDocs.pl
===================================================================
RCS file: /cvsroot/perl-win32-gui/Win32-GUI/build_tools/doPodDocs.pl,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** doPodDocs.pl        1 Oct 2005 18:00:40 -0000       1.3
--- doPodDocs.pl        16 Mar 2006 08:57:48 -0000      1.4
***************
*** 41,44 ****
--- 41,45 ----
    # GUI_MessageLoops.cpp
    push @files, "$src_dir/GUI_MessageLoops.cpp";
+   push @files, "$src_dir/CustomDraw.pm";
  
    # and all the XS files
***************
*** 163,167 ****
        BuildTools::macro_set("EVENTNAME", 
SrcParser::get_package_event_name($package, $event));
        BuildTools::macro_set("EVENTPROTO", 
SrcParser::get_package_event_prototype($package, $event));
!       BuildTools::macro_set("EVENTDESCR", 
          fix_description( $package, 
SrcParser::get_package_event_description($package, $event) )
        );
--- 164,168 ----
        BuildTools::macro_set("EVENTNAME", 
SrcParser::get_package_event_name($package, $event));
        BuildTools::macro_set("EVENTPROTO", 
SrcParser::get_package_event_prototype($package, $event));
!       BuildTools::macro_set("EVENTDESCR",
          fix_description( $package, 
SrcParser::get_package_event_description($package, $event) )
        );

Index: SrcParser.pm
===================================================================
RCS file: /cvsroot/perl-win32-gui/Win32-GUI/build_tools/SrcParser.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** SrcParser.pm        3 Aug 2005 21:45:58 -0000       1.2
--- SrcParser.pm        16 Mar 2006 08:57:48 -0000      1.3
***************
*** 163,167 ****
                $pack = "Win32::GUI::" . $pack unless $pack eq '*';
  
!               # The same evnet has multiple legitimate definitions in 
different packages
                # for the same package:
                # for example, Terminate() is described in both  Window.xs and 
MDI.xs,
--- 163,167 ----
                $pack = "Win32::GUI::" . $pack unless $pack eq '*';
  
!               # The same event has multiple legitimate definitions in 
different packages
                # for the same package:
                # for example, Terminate() is described in both  Window.xs and 
MDI.xs,