[synchronicity-commits] SF.net SVN: synchronicity:[1605] trunk/Create Synchronicity

[<cre...@us...>]

Revision: 1605
          http://synchronicity.svn.sourceforge.net/synchronicity/?rev=1605&view=rev
Author:   createsoftware
Date:     2012-02-24 17:06:52 +0000 (Fri, 24 Feb 2012)
Log Message:
-----------
Randomize a part of the write-permissions file name, and add a forgotten line (ToDelete.Add(TestPath)), to actually delete this file.

Modified Paths:
--------------
    trunk/Create Synchronicity/Program settings.vb
    trunk/Create Synchronicity/Revision.vb
    trunk/Create Synchronicity/Syncing structures.vb

Modified: trunk/Create Synchronicity/Program settings.vb
===================================================================
--- trunk/Create Synchronicity/Program settings.vb	2012-02-21 22:39:38 UTC (rev 1604)
+++ trunk/Create Synchronicity/Program settings.vb	2012-02-24 17:06:52 UTC (rev 1605)
@@ -126,8 +126,9 @@
             For Each Folder As String In WriteNeededFolders
                 If Not IO.Directory.Exists(Folder) Then Continue For
 
-                Dim TestPath As String = Folder & ProgramSetting.DirSep & "write-permissions"
+                Dim TestPath As String = Folder & ProgramSetting.DirSep & "write-permissions." & IO.Path.GetRandomFileName()
                 IO.File.Create(TestPath).Close()
+                ToDelete.Add(TestPath)
 
                 If Folder = Application.StartupPath Then Continue For
                 For Each File As String In IO.Directory.GetFiles(Folder)

Modified: trunk/Create Synchronicity/Revision.vb
===================================================================
--- trunk/Create Synchronicity/Revision.vb	2012-02-21 22:39:38 UTC (rev 1604)
+++ trunk/Create Synchronicity/Revision.vb	2012-02-24 17:06:52 UTC (rev 1605)
@@ -1,3 +1,3 @@
 Module Revision
-    Public Const Build As Integer = 1603
+    Public Const Build As Integer = 1604
 End Module

Modified: trunk/Create Synchronicity/Syncing structures.vb
===================================================================
--- trunk/Create Synchronicity/Syncing structures.vb	2012-02-21 22:39:38 UTC (rev 1604)
+++ trunk/Create Synchronicity/Syncing structures.vb	2012-02-24 17:06:52 UTC (rev 1605)
@@ -21,7 +21,6 @@
 
     Dim FilesScanned As Long
 
-
     Dim CreatedFiles As Long
     Dim CreatedFolders As Long
     Dim FilesToCreate As Long

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.