ported to Think C

This commit is contained in:
Guido van Rossum 1995-02-14 01:27:24 +00:00
parent e2aaa9dd61
commit becdbec806
4 changed files with 26 additions and 1 deletions

View file

@ -23,6 +23,7 @@ OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
******************************************************************/
#include "Python.h"
#include "macglue.h"
#include <OSUtils.h> /* for Set(Current)A5 */
@ -401,7 +402,7 @@ PyMac_GetPythonDir()
prefrh = FSpOpenResFile(&dirspec, fsRdWrShPerm);
if ( prefrh == -1 ) {
/* It doesn't exist. Try to create it */
FSpCreateResFile(&dirspec, 'PYTH', 'pref', NULL);
FSpCreateResFile(&dirspec, 'PYTH', 'pref', 0);
prefrh = FSpOpenResFile(&dirspec, fsRdWrShPerm);
if ( prefrh == -1 ) {
cannotmodify = 1;