Paket.Init function replace Copy and fixes #58 (#60)

* \#58 replaced Paket.Copy with Paket.Init

* fixing function definition location #58

src/Forge.Core/Paket.fs

@@ -9,16 +9,15 @@ let getPaketLocation () =
     if Directory.Exists local then local else paketLocation
 
 let getPaket () =
-    let local = directory </> ".paket" </> "paket.exe"
-    if File.Exists local then local else paketLocation </> "paket.exe"
+    getPaketLocation () </> "paket.exe"
 
-
-let Copy folder =
+let copy folder =
     folder </> ".paket" |> Directory.CreateDirectory |> ignore
     Directory.GetFiles location
     |> Seq.iter (fun x ->
-        let fn = Path.GetFileName x
-        File.Copy (x, folder </> ".paket" </> fn, true) )
+        let filename = Path.GetFileName x
+        File.Copy (x, folder </> ".paket" </> filename, true) )
+
 
 let Update () =
     let f = getPaketLocation ()
@@ -30,5 +29,9 @@ let Run args =
     let args' = args |> String.concat " "
     run f args' directory
 
-
+let Init folder =
+    if Directory.GetFiles folder |> Seq.exists (fun n -> n.EndsWith "paket.dependencies") |> not then
+        copy folder
+        Update ()
+        Run ["init"]
 

src/Forge.Core/Templates.fs

@@ -197,9 +197,7 @@ module Project =
             sed "<%= paketPath %>" (relative directory) projectFolder
             sed "<%= packagesPath %>" (relative packagesDirectory) projectFolder
 
-            Paket.Copy directory
-            if Directory.GetFiles directory |> Seq.exists (fun n -> n.EndsWith "paket.dependencies") |> not then
-                Paket.Run ["init"]
+            Paket.Init directory
 
             Directory.GetFiles projectFolder
             |> Seq.tryFind (fun n -> n.EndsWith "paket.references")