usage of 'my' in ARS.pm

[<li...@re...>]

Hi all,

When running perl -w on something that 'use's ARS, I get some
warning messages about the lack of parenthesis in ARS.pm.

Here is the diff I did to make these errors go away:

61,65c61,65
<     my $m = shift;
<     my $prepend = shift;
<     my @m = @$m;
<     my @ret, @submenu;
<     my $name, $val;
---
>     my($m) = shift;
>     my($prepend) = shift;
>     my(@m) = @$m;
>     my(@ret, @submenu);
>     my($name, $val);
83,86c83,86
<     my $c = shift;
<     my $schema = shift;
<     my $entry_id = shift;
<     my $field;
---
>     my($c) = shift;
>     my($schema) = shift;
>     my($entry_id) = shift;
>     my($field);


Cheers.

	David Lindes


P.S.  I will be leaving SGI sometime soon (April 12th or 19th),
      so if you have any comments/questions about the SGI port
      of this, please send mail to rem...@co....

-- 
	David Lindes
	li...@sg...
	+1-415/933-4749