[Date Prev][Date Next][Thread Prev][Thread Next][Minivend by date
][Minivend by thread
]
Re: [mv] Regarding locale and patch!
Quoting Frank Miedreich (miedreich@acm.org):
> Data.pm, line 64: File::Basename::fileparse_set_fstype($\0x0F);
> MakeCat.pm, line 260: return undef if $\0x0F =~ /win32/i;
> MakeCat.pm, line 285: return 0 if $\0x0F =~ /win32/i;
> MakeCat.pm, line 298: return 'everybody' if $\0x0F =~ /win32/i;
> MakeCat.pm, line 310: return ('everybody', 'nogroup') if $\0x0F =~ /win32/i;
> MakeCat.pm, line 323: my $Windows = ($\0x0F =~ /win32/i ? 1 : 0);
> Search.pm, line 35: if($\0x0F =~ /win32/i) {
> Server.pm, line 810: #("Running in foreground, OS=$\0x0F,
> debug=$Global::DEBUG\n")
>
> All these should be $_ actually. I CCed this message to Mike.
>
No, they are checking the variable $^O, which holds the OS type
in Perl. Most things in MiniVend that use this relate to Windows
compatibility at this point, as you can see.
$^O is just as easily written out in the characters, though,
and I do that most of the time now. I will change any ^W or ^O
in MV4 to avoid the control characters.
--
Mike Heins http://www.minivend.com/ ___
Internet Robotics |_ _|____
131 Willow Lane, Floor 2 | || _ \
It's a little-known fact Oxford, OH 45056 | || |_) |
that the Y1K problem caused <mikeh@minivend.com> |___| _ <
the Dark Ages. -- unknown 513.523.7621 FAX 7501 |_| \_\
