[MacPerl] Problem w/SetFileInfo

[Brenda Cannon <bcannon@cmsplatform.com>]

Hi,

I am running Macperl 5.2.0r4 on System 8.0. I would appreciate any
insight as to what I am doing wrong here.  I am trying to set the file
creator and type right before I close three files.  I put the print
statements in to ensure that I was actually using the $Config{'osname'}
correctly. It appears that I am using it correctly--when I run my
program it does print the first debug statement, but the file creator
and type are "MPS " and "TEXT". 


	if ($Config{'osname'} =~ m/^macos/i) {					#for mac os
		&MacPerl::SetFileInfo("MSWD", "TEXT", MCERROR, MCSTATS, MCHEADS);
		
		print MCERROR "\n\n1. This is the os:  ", $Config{'osname'}, "\n\n";
	}
	else {
		print MCERROR "\n\n2. This is the os:  ", $Config{'osname'}, "\n\n";
	}


Any help appreciated.

Brenda

===== Want to unsubscribe from this list?
===== Send mail with body "unsubscribe" to macperl-request@macperl.org