Add uninstall script; fix typos

packup

@@ -1,13 +1,16 @@
 #! /usr/bin/env escript
 
 
-main([Version]) ->
+main(_) ->
+    {ok, BV} = file:read_file("zomp/etc/version.txt"),
+    Version = string:strip(binary_to_list(BV), both, $\n),
     Tar = "zomp.tar.gz",
     ok = erl_tar:create(Tar, ["zomp"], [compressed]),
     Zip = "zx-" ++ Version ++ ".zip",
     ZipFiles =
         ["install.escript",
          "install_unix",
+         "uninstall_unix",
          "install_windows.cmd",
          "notify.vbs",
          "README.md",
@@ -17,8 +20,5 @@ main([Version]) ->
          Tar],
     {ok, Zip} = zip:create(Zip, ZipFiles),
     ok = file:delete(Tar),
-    ok = io:format("Wrote ~ts.~n", [Zip]),
-    halt(0);
-main(_) ->
-    ok = io:format("Provide a single version or extension string as an argument.~n"),
-    halt(1).
+    ok = io:format("~ts~n", [Zip]),
+    halt(0).