From 46d3772c9a5cf786fa4fbdb2ba29512580101f32 Mon Sep 17 00:00:00 2001 From: "Richard W.M. Jones" Date: Fri, 28 Mar 2008 17:30:32 +0000 Subject: Internationalize virt-top. --- virt-top/virt_top_main.ml | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) mode change 100755 => 100644 virt-top/virt_top_main.ml (limited to 'virt-top/virt_top_main.ml') diff --git a/virt-top/virt_top_main.ml b/virt-top/virt_top_main.ml old mode 100755 new mode 100644 index ba98e7e..4ab60ad --- a/virt-top/virt_top_main.ml +++ b/virt-top/virt_top_main.ml @@ -21,6 +21,7 @@ open Curses +open Virt_top_gettext.Gettext open Virt_top (* Note: make sure we catch any exceptions and clean up the display. @@ -43,7 +44,7 @@ let error = true | exn -> if not script_mode then endwin (); - prerr_endline ("Error: " ^ Printexc.to_string exn); + prerr_endline (s_ "Error" ^ ": " ^ Printexc.to_string exn); true let () = -- cgit