[perl #34117] [PATCH] fix make html

[via RT]

# New Ticket Created by  Markus Amslser 
# Please include the string:  [perl #34117]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/rt3/Ticket/Display.html?id=34117 >


make html failes currently, because the src/test_main.c file was moved 
to examples/c/text_main.c.

Markus

ChangeLog:
   - update search path to find the file test_main.c.
   - warn if a file is not found

Index: lib/Parrot/Distribution.pm
===================================================================
RCS file: /cvs/public/parrot/lib/Parrot/Distribution.pm,v
retrieving revision 1.3
diff -u -w -r1.3 Distribution.pm
--- lib/Parrot/Distribution.pm  27 Mar 2004 22:22:36 -0000      1.3
+++ lib/Parrot/Distribution.pm  12 Feb 2005 16:46:34 -0000
@@ -91,7 +91,8 @@
                $self->directory_with_name('encodings'),
                $self->directory_with_name('io'),
                $self->directory_with_name('pf'),
-               $self->directory_with_name('types'),;
+               $self->directory_with_name('types'),
+               
$self->directory_with_name('examples')->directory_with_name('c'),;
 }
 
 =item C<c_source_file_with_name($name)>
@@ -113,6 +114,7 @@
                        if $dir->file_exists_with_name($name);
        }
        
+       print 'WARNING: ' . __FILE__ . ':' . __LINE__ . ' File not found:' . 
$name ."\n";
        return undef;
 }