diff options
author | Richard W.M. Jones <rjones@redhat.com> | 2008-03-28 17:12:47 +0000 |
---|---|---|
committer | Richard W.M. Jones <rjones@redhat.com> | 2008-03-28 17:12:47 +0000 |
commit | e6cca10e5cf86b9bd280e371fb1195835a96bff0 (patch) | |
tree | f0a25ec87077a1c7f5a22b4f370e5e52b93a73ee /virt-df/virt_df_linux_swap.ml | |
parent | f6cc606a9e87e7cf287ba3bcc8fbfb4063f0bdd7 (diff) | |
download | virt-top-e6cca10e5cf86b9bd280e371fb1195835a96bff0.tar.gz virt-top-e6cca10e5cf86b9bd280e371fb1195835a96bff0.tar.xz virt-top-e6cca10e5cf86b9bd280e371fb1195835a96bff0.zip |
Internationalize virt-df program.
Diffstat (limited to 'virt-df/virt_df_linux_swap.ml')
-rw-r--r--[-rwxr-xr-x] | virt-df/virt_df_linux_swap.ml | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/virt-df/virt_df_linux_swap.ml b/virt-df/virt_df_linux_swap.ml index 4638828..04e22b9 100755..100644 --- a/virt-df/virt_df_linux_swap.ml +++ b/virt-df/virt_df_linux_swap.ml @@ -20,6 +20,8 @@ Support for Linux swap partitions. *) +open Virt_df_gettext.Gettext + (* Int64 operators for convenience. *) let (+^) = Int64.add let (-^) = Int64.sub @@ -28,7 +30,7 @@ let (/^) = Int64.div let probe_swap target part_type fd start size = Virt_df.Swap { - Virt_df.swap_name = "Linux swap"; + Virt_df.swap_name = s_ "Linux swap"; swap_block_size = 4096L; (* XXX *) swap_blocks_total = size *^ 512L /^ 4096L; } |