[pve-devel] [PATCH 2/2] remove unused functions
Wolfgang Link
w.link at proxmox.com
Thu Oct 15 09:55:56 CEST 2015
---
src/PVE/LXC.pm | 34 ----------------------------------
1 file changed, 34 deletions(-)
diff --git a/src/PVE/LXC.pm b/src/PVE/LXC.pm
index 69bc502..a9a67c1 100644
--- a/src/PVE/LXC.pm
+++ b/src/PVE/LXC.pm
@@ -838,40 +838,6 @@ sub vmstatus {
return $list;
}
-my $parse_size = sub {
- my ($value) = @_;
-
- return undef if $value !~ m/^(\d+(\.\d+)?)([KMG])?$/;
- my ($size, $unit) = ($1, $3);
- if ($unit) {
- if ($unit eq 'K') {
- $size = $size * 1024;
- } elsif ($unit eq 'M') {
- $size = $size * 1024 * 1024;
- } elsif ($unit eq 'G') {
- $size = $size * 1024 * 1024 * 1024;
- }
- }
- return int($size);
-};
-
-my $format_size = sub {
- my ($size) = @_;
-
- $size = int($size);
-
- my $kb = int($size/1024);
- return $size if $kb*1024 != $size;
-
- my $mb = int($kb/1024);
- return "${kb}K" if $mb*1024 != $kb;
-
- my $gb = int($mb/1024);
- return "${mb}M" if $gb*1024 != $mb;
-
- return "${gb}G";
-};
-
sub parse_ct_mountpoint {
my ($data) = @_;
--
2.1.4
More information about the pve-devel
mailing list