Re: Current problems

[Derek R. Price]

Akim Demaille wrote:

> # Now do all the work on each file.
> foreach my $am_file (@input_files)
> {
>     if (! -f ($am_file . '.am'))
>     {
>         &am_error ("\`" . $am_file . ".am' does not exist");
>     }
>     else
>     {
>         &generate_makefile ($output_files{$am_file}, $am_file);
>     }
> }
>
> and there is a sub:
>
> # Print an error message and set exit status.
> sub am_error
> {
>     warn "$me: ${am_file}.am: @_\n";
>     $exit_status = 1;
> }

Only a global is going to be seen within a separate function...

Derek

--
Derek Price                      CVS Solutions Architect ( http://CVSHome.org )
mailto:address@hidden     OpenAvenue ( http://OpenAvenue.com )
--
I will not hide behind the Fifth Amendment.
I will not hide behind the Fifth Amendment.
I will not hide behind the Fifth Amendment...

          - Bart Simpson on chalkboard, _The Simpsons_