Permalink
Browse files

Cleanups.

  • Loading branch information...
1 parent a8bcbab commit cc5c4b3cfb91df5ab517011c978695c1b5733173 @protz committed Sep 12, 2011
Showing with 8 additions and 3 deletions.
  1. +4 −0 .gitignore
  2. +1 −0 flexlink/_tags
  3. +3 −3 gen_files.ml
View
@@ -0,0 +1,4 @@
+version.nsh
+uninstall_lines.nsi
+*.byte
+_build/
View
@@ -0,0 +1 @@
+true: not_hygienic
View
@@ -29,12 +29,12 @@ let _ =
| (Unix.S_DIR, name) ->
Printf.sprintf "RMDir \"%s\"" name
in
- let install_lines = List.map get_install_line items in
- let uninstall_lines = List.map get_uninstall_line (List.rev items) in
+ (*let install_lines = List.map get_install_line items in
let i_f = open_out "install_lines.nsi" in
output_string i_f (String.concat "\n" install_lines);
output_string i_f "\n";
- close_out i_f;
+ close_out i_f;*)
+ let uninstall_lines = List.map get_uninstall_line (List.rev items) in
let u_f = open_out "uninstall_lines.nsi" in
output_string u_f (String.concat "\n" uninstall_lines);
output_string u_f "\n";

0 comments on commit cc5c4b3

Please sign in to comment.