diff options
| author | Richard Jones <rjones@trick.home.annexia.org> | 2009-07-15 14:24:41 +0100 |
|---|---|---|
| committer | Richard Jones <rjones@trick.home.annexia.org> | 2009-07-15 15:30:23 +0100 |
| commit | b3595c5553035798b7b33d05c9326f7e8dd55e69 (patch) | |
| tree | 3edb92d0cba4de6af1c4c630f998880059b21e2c /df | |
| parent | 9449b0fce4145a56df9d43169d61e8b2c4e41b09 (diff) | |
| download | libguestfs-b3595c5553035798b7b33d05c9326f7e8dd55e69.tar.gz libguestfs-b3595c5553035798b7b33d05c9326f7e8dd55e69.tar.xz libguestfs-b3595c5553035798b7b33d05c9326f7e8dd55e69.zip | |
Make Perl strings translatable using perl-libintl.
All Perl strings are now marked as translatable using __"string"
or __x("string {placeholder}", placeholder => $_). Perl strings
now get copied to the PO files.
The po/POTFILES.in file is now updated automagically whenever we
add new *.c, *.pl or *.pm files into the repository.
Diffstat (limited to 'df')
| -rwxr-xr-x | df/virt-df.pl | 21 |
1 files changed, 11 insertions, 10 deletions
diff --git a/df/virt-df.pl b/df/virt-df.pl index 0ccc7a8a..4cac896a 100755 --- a/df/virt-df.pl +++ b/df/virt-df.pl @@ -28,6 +28,7 @@ use Getopt::Long; use Data::Dumper; use File::Temp qw/tempdir/; use XML::Writer; +use Locale::TextDomain 'libguestfs'; =encoding utf8 @@ -254,21 +255,21 @@ sub print_stat sub print_title { - my @cols = ("Virtual Machine", "Filesystem"); + my @cols = (__"Virtual Machine", __"Filesystem"); if (!$inodes) { if (!$human) { - push @cols, "1K-blocks"; + push @cols, __"1K-blocks"; } else { - push @cols, "Size"; + push @cols, __"Size"; } - push @cols, "Used"; - push @cols, "Available"; - push @cols, "Use%"; + push @cols, __"Used"; + push @cols, __"Available"; + push @cols, __"Use%"; } else { - push @cols, "Inodes"; - push @cols, "IUsed"; - push @cols, "IFree"; - push @cols, "IUse%"; + push @cols, __"Inodes"; + push @cols, __"IUsed"; + push @cols, __"IFree"; + push @cols, __"IUse%"; } if (!$csv) { |