|
Revision 2121, 290 bytes
(checked in by pkwi, 4 years ago)
|
|
A hack for win32...
These edits allow us to upgrade perl on Win32, have been running successfully with
perl 5.10, which I have also found PGPLOT and PPD ppm's for.
( http://cpan.uwinnipeg.ca/PPMPackages/10xx/)
The hack is simple: On Win32 we avoid to use Tk::fileevent which is broken with newer
perls and simply let the OS handle backgrounding by means of the 'start' command...
It also gives Win32 users a 'feature': multiple simulations kan be spawned in the
background from the same mcgui...
|
-
Property svn:executable set to
*
|
| Line | |
|---|
| 1 | #!/usr/bin/perl |
|---|
| 2 | # |
|---|
| 3 | # Simple method to provide 'Press any key to exit' when ending our |
|---|
| 4 | # Win32 commands |
|---|
| 5 | # |
|---|
| 6 | |
|---|
| 7 | use Config; |
|---|
| 8 | |
|---|
| 9 | if ($Config{'osname'} eq 'MSWin32') { |
|---|
| 10 | system(join(' ',@ARGV)); |
|---|
| 11 | system('pause'); |
|---|
| 12 | exit 1; |
|---|
| 13 | } else { |
|---|
| 14 | die "This util is only meant for the Win32 platform\n"; |
|---|
| 15 | } |
|---|
| 16 | |
|---|