2001-11-22 06:10:39 -05:00
|
|
|
$OpenBSD: patch-anlgform_pl,v 1.2 2001/11/22 11:10:39 form Exp $
|
|
|
|
|
--- anlgform.pl.orig Wed Nov 7 17:06:34 2001
|
|
|
|
|
+++ anlgform.pl Thu Nov 22 17:05:08 2001
|
|
|
|
|
@@ -47,6 +47,8 @@ $lt = localtime;
|
2000-05-31 14:48:37 -04:00
|
|
|
$progname = $0 || 'anlgform.pl';
|
1999-12-13 12:30:30 -05:00
|
|
|
if (($^O =~ /win32/i || $^O =~ /^win/i) && Win32::GetShortPathName($analog)) {
|
|
|
|
|
$analog = Win32::GetShortPathName($analog);
|
|
|
|
|
+} else {
|
2001-11-22 06:10:39 -05:00
|
|
|
+ $analog = "/usr/local/bin/analog";
|
1999-12-13 12:30:30 -05:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
# coerce query keys to caps in a new (key, pointer to array) hash called args
|
