Fix error message when trying to install a package already installed.

OCamlPro · Sep 28, 2012 · 2856815 · 2856815
1 parent d565187
commit 2856815
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/client.ml b/src/client.ml
@@ -1986,6 +1986,7 @@ let install names =
   (* Display a message if at least one package is already installed *)
   List.iter
     (fun nv ->
+      let nv = find_installed_package_by_name t (NV.name nv) in
       Globals.msg
         "Package %s is already installed (current version is %s)\n"
         (N.to_string (NV.name nv))