also set cur dir for standard get/put file

gvanrossum · gvanrossum · commit bcf3b56ea7c1 · 1995-02-20T23:41:35.000Z
diff --git a/Mac/Compat/chdir.c b/Mac/Compat/chdir.c
@@ -4,6 +4,10 @@
 
 #include "macdefs.h"
 
+/* Last directory used by Standard File */
+#define SFSaveDisk	(*(short *)0x214)
+#define CurDirStore (*(long *)0x398)
+
 /* Change current directory. */
 
 int
@@ -19,5 +23,10 @@ chdir(path)
 		errno= ENOENT;
 		return -1;
 	}
+	if (PBHGetVol(&pb, FALSE) == noErr) {
+		/* Set the Standard File directory */
+		SFSaveDisk= -pb.ioWDVRefNum;
+		CurDirStore= pb.ioWDDirID;
+	}
 	return 0;
 }
