From 2c67362f709f8ee35d1df96afcafe55222ed1569 Mon Sep 17 00:00:00 2001 From: Jack Jansen Date: Sun, 18 Jun 1995 20:05:14 +0000 Subject: [PATCH] Added FindFolder interface --- Mac/Modules/macfsmodule.c | 24 ++++++++++++++++++++++++ 1 file changed, 24 insertions(+) diff --git a/Mac/Modules/macfsmodule.c b/Mac/Modules/macfsmodule.c index 0d75d44361c..d85eb719a27 100644 --- a/Mac/Modules/macfsmodule.c +++ b/Mac/Modules/macfsmodule.c @@ -28,6 +28,7 @@ OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. #include #include +#include #include #include @@ -567,6 +568,28 @@ mfs_GetDirectory(self, args) return mkvalue("(Oi)", newmfssobject(&fsdir), ok); } +static object * +mfs_FindFolder(self, args) + object *self; /* Not used */ + object *args; +{ + OSErr err; + short where; + OSType which; + int create; + short refnum; + long dirid; + + if (!newgetargs(args, "hO&i", &where, PyMac_GetOSType, &which, &create) ) + return NULL; + err = FindFolder(where, which, (Boolean)create, &refnum, &dirid); + if ( err ) { + PyErr_Mac(ErrorObject, err); + return NULL; + } + return mkvalue("(ii)", refnum, dirid); +} + /* List of methods defined in the module */ static struct methodlist mfs_methods[] = { @@ -577,6 +600,7 @@ static struct methodlist mfs_methods[] = { {"FSSpec", mfs_FSSpec, 1}, {"RawFSSpec", mfs_RawFSSpec, 1}, {"RawAlias", mfs_RawAlias, 1}, + {"FindFolder", mfs_FindFolder, 1}, {NULL, NULL} /* sentinel */ };