RE: [PATCH] Shell.pm: pod rewrite and new mini-feature $Shell::raw

> -----Original Message-----
> From: Rafael Garcia-Suarez [mailto:rgarciasuarez@mandrakesoft.com]
> Sent: Tuesday, June 01, 2004 11:22 AM
> To: LAUN Wolfgang
> Cc: 'perl5-porters@perl.org'
> Subject: Re: [PATCH] Shell.pm: pod rewrite and new mini-feature
> $Shell::raw
> 
> 
> LAUN Wolfgang wrote:
> > --- lib/Shell.pm.old	Sun May 23 13:55:13 2004
> > +++ lib/Shell.pm	Mon May 31 18:44:32 2004
> ...
> > @@ -62,7 +62,8 @@
> >  	    } else {
> >  		my \$a;
> >  		my \@arr = \@_;
> > -		if ('$^O' eq 'MSWin32') {
> > +                unless( \$Shell::raw ){
> 
> I assume that's a typo : didn't you meant :
>                 unless( $Shell::raw ){
>

But this is in a here document with substitution on (<<"*END*"),
cf. the other backslashes all over the place.
-W

• [PATCH] Shell.pm: pod rewrite and new mini-feature $Shell::raw by LAUN Wolfgang
• Re: [PATCH] Shell.pm: pod rewrite and new mini-feature $Shell::raw by Rafael Garcia-Suarez
• RE: [PATCH] Shell.pm: pod rewrite and new mini-feature $Shell::raw by LAUN Wolfgang
• Re: [PATCH] Shell.pm: pod rewrite and new mini-feature $Shell::ra w by Rafael Garcia-Suarez