anchor.diff:              info.WorkingDirectory <- source |> FullName
               info.Arguments <- args) System.TimeSpan.MaxValue
                  
  -    if result <> 0 then failwithf "Error during SCP From: %s To: %s" source target+    if result <> 0 then failwithf "Error during SCP. Source: %s Target: %s" source target
positive.code: ﻿[<AutoOpen>]
  module Fake.SCPHelper 
  
  /// The SCP parameter type
  type SCPParams =  { 
      /// Path of the scp.exe 
      ToolPath:string
  
negative.code:     ToolPath = "scp.exe"
      PrivateKeyPath = null }
  
  /// Performs a SCP copy from the given source directory to the target path.
  /// ## Parameters
  ///
  ///  - `setParams` - Function used to manipulate the default SCPParams value.
  ///  - `source` - The source path. Can be something like user@host:directory/SourceFile or a local path.
  ///  - `target` - The target path. Can be something like user@host:directory/TargetFile or a local path.
  ///
  /// ## Sample
  ///
  ///     SCP (fun p -> { p with ToolPath = "tools/scp.exe" }) source target
  let SCP setParams source target =
      let (p:SCPParams) = setParams SCPDefaults
      tracefn "SCP %s %s" source target
  