Check access to home

i-nex · Dec 30, 2013 · f462f45 · f462f45
1 parent 05f9b3d
commit f462f45
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/src/i-nex/.src/MInit.module b/src/i-nex/.src/MInit.module
@@ -1,7 +1,9 @@
 ' Gambas module file
 
 Public Sub _inits()
-
+ If Access("" & User.Home & "/", gb.Write) = False Then
+  Message.Error("Cannot write files to " & User.Home & "/.i-nex")
+ Endif
  If Exist("" & User.Home & "/.i-nex") Then
 
   Print "i-nex in home folder is exist"