checkReadOnly() is now implemented.

icculus · Oct 2, 2000 · cf83618 · cf83618
1 parent eb4c4e3
commit cf83618
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/BASIClib/FileSystemFunctions.c b/BASIClib/FileSystemFunctions.c
@@ -279,8 +279,7 @@ void _vbpS_kill(PBasicString fileSpec)
 
 static inline __boolean checkReadOnly(struct dirent *pDir)
 {
-#warning write checkReadOnly()!  (How?)
-    return(false);
+    return( (access(pDir->d_name, W_OK) == -1) ? true : false );
 } /* checkReadOnly */