blob: 328f02290db76382599cb2f0a87e4b2f7f57d03a [file] [log] [blame]
Guido van Rossum2d167031994-09-16 10:54:21 +00001
2/*
3 * macsetfiletype - Set the mac's idea of file type
4 *
5 */
6
Guido van Rossum950d47f1994-10-01 14:24:17 +00007#include "macdefs.h"
Guido van Rossum2d167031994-09-16 10:54:21 +00008
9int
10setfiletype(name, creator, type)
11char *name;
12long creator, type;
13{
14 FInfo info;
15 unsigned char *pname;
16
Jack Jansend50e4e11995-01-18 13:58:04 +000017 pname = (StringPtr) Pstring(name);
Guido van Rossum2d167031994-09-16 10:54:21 +000018 if ( GetFInfo(pname, 0, &info) < 0 )
19 return -1;
20 info.fdType = type;
21 info.fdCreator = creator;
22 return SetFInfo(pname, 0, &info);
23}
24