Updated to 20.1, tagged as 0.9.1.0

GetKl puts kernel download into version specific folder

CHANGELOG.md

@@ -6,9 +6,17 @@ The format is based on [Keep a Changelog](http://keepachangelog.com/)
 
 ## [Unreleased]
 
+## [0.9.1.0] - 2017-05-18
+
 ### Added
 - `Shen.Pack` also spits out `.zip` file for GitHub download.
 
+### Changed
+- Moved `open-socket` and `download` under `shen-sharp.` prefix.
+
+### Removed
+- `ls` and `pwd` functions.
+
 ## [0.9.0.0] - 2017-04-24
 
 ### Added
@@ -87,7 +95,8 @@ Don't remember.
 
 Don't remember.
 
-[Unreleased]: https://github.com/rkoeninger/ShenSharp/compare/v0.9.0.0...HEAD
+[Unreleased]: https://github.com/rkoeninger/ShenSharp/compare/v0.9.1.0...HEAD
+[0.9.1.0]: https://github.com/rkoeninger/ShenSharp/compare/v0.9.0.0...v0.9.1.0
 [0.9.0.0]: https://github.com/rkoeninger/ShenSharp/compare/v0.8.1.0...v0.9.0.0
 [0.8.1.0]: https://github.com/rkoeninger/ShenSharp/compare/v0.8.0.0...v0.8.1.0
 [0.8.0.0]: https://github.com/rkoeninger/ShenSharp/compare/v0.7.0.0...v0.8.0.0

Kl.Get/GetKl.fs

@@ -6,10 +6,9 @@ open System.IO.Compression
 open System.Net
 open ShenSharp.Shared
 
-let url = sprintf "https://github.com/Shen-Language/shen-sources/releases/download/shen-%s/%s-%s.zip" KernelRevision KernelFolderName KernelRevision
+let url = sprintf "https://github.com/Shen-Language/shen-sources/releases/download/shen-%s/%s.zip" KernelRevision KernelFolderName
 let packages = combine [".."; ".."; ".."; "packages"]
-let extractedFolderPath = combine [packages; sprintf "%s-%s" KernelFolderName KernelRevision]
-let kernelFolderPath = combine [packages; KernelFolderName]
+let extractedFolderPath = combine [packages; KernelFolderName]
 let zipPath = combine [packages; Path.GetFileName(Uri(url).LocalPath)]
 
 let safeDelete x = if Directory.Exists x then Directory.Delete(x, true)
@@ -23,7 +22,5 @@ let main _ =
     client.DownloadFile(url, zipPath)
     printfn "Extracting sources package..."
     safeDelete extractedFolderPath
-    safeDelete kernelFolderPath
     ZipFile.ExtractToDirectory(zipPath, packages)
-    Directory.Move(extractedFolderPath, kernelFolderPath)
     0

README.md

@@ -1,4 +1,4 @@
-[![Shen Version](https://img.shields.io/badge/shen-20.0-blue.svg)](https://github.com/Shen-Language)
+[![Shen Version](https://img.shields.io/badge/shen-20.1-blue.svg)](https://github.com/Shen-Language)
 [![Latest Nuget](https://img.shields.io/nuget/v/ShenSharp.svg)](https://www.nuget.org/packages/ShenSharp)
 [![.Net Build Status](https://img.shields.io/appveyor/ci/rkoeninger/ShenSharp/master.svg?label=.net)](https://ci.appveyor.com/project/rkoeninger/shensharp/branch/master)
 [![Mono Build Status](https://img.shields.io/travis/rkoeninger/ShenSharp/master.svg?label=mono)](https://travis-ci.org/rkoeninger/ShenSharp)

Shared.fs

@@ -17,13 +17,13 @@ let Author = "Robert Koeninger"
 let Copyright = "Copyright © 2015-2017 " + Author
 
 [<Literal>]
-let Revision = "0.9.0.0"
+let Revision = "0.9.1.0"
 
 [<Literal>]
-let KernelRevision = "20.0"
+let KernelRevision = "20.1"
 
 [<Literal>]
-let KernelFolderName = "ShenOSKernel"
+let KernelFolderName = "ShenOSKernel-" + KernelRevision
 
 #if DEBUG
 [<Literal>]