copy all local hg changes to another folder

copy-hg-changes-to.boo

import System.IO
import Boo.Lang.PatternMatching

targetFolder = argv[0]	
changes = ((statusLine[:1], statusLine[2:]) for statusLine in /\n/.Split(shell("hg", "st")) if len(statusLine) > 0)
for status, file in changes:
   targetFile = Path.Combine(targetFolder, file)
   match status:
      case "M" | "?":
         Directory.CreateDirectory(Path.GetDirectoryName(targetFile))
         File.Copy(file, targetFile, true)
      case "R" | "!":
         File.Delete(targetFile)