diff options
-rw-r--r-- | Mac/Modules/macfsmodule.c | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/Mac/Modules/macfsmodule.c b/Mac/Modules/macfsmodule.c index 0d75d44..d85eb71 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 <Memory.h> #include <Files.h> +#include <Folders.h> #include <StandardFile.h> #include <Aliases.h> @@ -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 */ }; |