diff --git a/PVE/API2/Storage/Content.pm b/PVE/API2/Storage/Content.pm index f8664af..4da6934 100644 --- a/PVE/API2/Storage/Content.pm +++ b/PVE/API2/Storage/Content.pm @@ -238,7 +238,7 @@ my $real_volume_id = sub { raise_param_exc({ volume => $@ }) if $@; } else { - raise_param_exc({ volume => "no storage speficied - incomplete volume ID" }) + raise_param_exc({ volume => "no storage specified - incomplete volume ID" }) if !$storeid; $volid = "$storeid:$volume"; @@ -435,7 +435,7 @@ __PACKAGE__->register_method ({ if ($vtype eq 'backup' && $path =~ /(.*\/vzdump-\w+-\d+-\d{4}_\d{2}_\d{2}-\d{2}_\d{2}_\d{2})[^\/]+$/) { my $logpath = "$1.log"; - # try to cleanup our backup log file too, if still exisiting, #318 + # try to cleanup our backup log file too, if still existing, #318 unlink($logpath) if -e $logpath; } }; @@ -513,7 +513,7 @@ __PACKAGE__->register_method ({ # do all parameter checks first - # then do all short running task (to raise errors befor we go to background) + # then do all short running task (to raise errors before we go to background) # then start the worker task my $worker = sub { diff --git a/PVE/CephConfig.pm b/PVE/CephConfig.pm index 078477e..83d72fc 100644 --- a/PVE/CephConfig.pm +++ b/PVE/CephConfig.pm @@ -123,7 +123,7 @@ sub get_monaddr_list { my $monhostlist = {}; - # get all ip adresses from mon_host + # get all ip addresses from mon_host my $monhosts = [ split (/[ ,;]+/, $config->{global}->{mon_host} // "") ]; foreach my $monhost (@$monhosts) { diff --git a/PVE/Diskmanage.pm b/PVE/Diskmanage.pm index ca6f0b7..10e1218 100644 --- a/PVE/Diskmanage.pm +++ b/PVE/Diskmanage.pm @@ -251,7 +251,7 @@ sub get_lvm_devices { }; # if something goes wrong, we do not want - # to give up, but indicate an error has occured + # to give up, but indicate an error has occurred warn "$@\n" if $@; my $uuids = { @@ -794,7 +794,7 @@ sub get_blockdev { die "No valid block device\n" if index($dev, $block_dev) == -1; $block_dev = "/dev/$block_dev"; - die "Block device does not exsists\n" if !(-b $block_dev); + die "Block device does not exists\n" if !(-b $block_dev); return $block_dev; } @@ -836,7 +836,7 @@ sub append_partition { my $partition; - # loop again to detect the real partiton device which does not always follow + # loop again to detect the real partition device which does not always follow # a strict $devname$partition scheme like /dev/nvme0n1 -> /dev/nvme0n1p1 dir_glob_foreach("/sys/block/$devname", qr/\Q$devname\E.*$newpartid/, sub { my ($part) = @_; diff --git a/PVE/Storage.pm b/PVE/Storage.pm index ea887a4..ace3340 100755 --- a/PVE/Storage.pm +++ b/PVE/Storage.pm @@ -190,7 +190,7 @@ sub storage_check_enabled { # storage_can_replicate: # return true if storage supports replication -# (volumes alocated with vdisk_alloc() has replication feature) +# (volumes allocated with vdisk_alloc() has replication feature) sub storage_can_replicate { my ($cfg, $storeid, $format) = @_; @@ -1846,7 +1846,7 @@ sub get_bandwidth_limit { my ($operation, $storage_list, $override) = @_; # called for each limit (global, per-storage) with the 'default' and the - # $operation limit and should udpate $override for every limit affecting + # $operation limit and should update $override for every limit affecting # us. my $use_global_limits = 0; my $apply_limit = sub { diff --git a/PVE/Storage/CephFSPlugin.pm b/PVE/Storage/CephFSPlugin.pm index f919ab8..2aaa450 100644 --- a/PVE/Storage/CephFSPlugin.pm +++ b/PVE/Storage/CephFSPlugin.pm @@ -44,7 +44,7 @@ sub systemd_netmount { # don't do default deps, systemd v241 generator produces ordering deps on both # local-fs(-pre) and remote-fs(-pre) targets if we use the required _netdev -# option. Over thre corners this gets us an ordering cycle on shutdown, which +# option. Over three corners this gets us an ordering cycle on shutdown, which # may make shutdown hang if the random cycle breaking hits the "wrong" unit to # delete. my $unit = <<"EOF"; diff --git a/PVE/Storage/GlusterfsPlugin.pm b/PVE/Storage/GlusterfsPlugin.pm index 599bca2..ea4df82 100644 --- a/PVE/Storage/GlusterfsPlugin.pm +++ b/PVE/Storage/GlusterfsPlugin.pm @@ -197,7 +197,7 @@ sub path { sub clone_image { my ($class, $scfg, $storeid, $volname, $vmid, $snap) = @_; - die "storage definintion has no path\n" if !$scfg->{path}; + die "storage definition has no path\n" if !$scfg->{path}; my ($vtype, $basename, $basevmid, undef, undef, $isBase, $format) = $class->parse_volname($volname); diff --git a/PVE/Storage/LVMPlugin.pm b/PVE/Storage/LVMPlugin.pm index b85fb89..fb4acdb 100644 --- a/PVE/Storage/LVMPlugin.pm +++ b/PVE/Storage/LVMPlugin.pm @@ -344,7 +344,7 @@ sub alloc_image { die "unsupported format '$fmt'" if $fmt ne 'raw'; - die "illegal name '$name' - sould be 'vm-$vmid-*'\n" + die "illegal name '$name' - should be 'vm-$vmid-*'\n" if $name && $name !~ m/^vm-$vmid-/; my $vgs = lvm_vgs(); diff --git a/PVE/Storage/LunCmd/LIO.pm b/PVE/Storage/LunCmd/LIO.pm index b98edc2..9264e46 100644 --- a/PVE/Storage/LunCmd/LIO.pm +++ b/PVE/Storage/LunCmd/LIO.pm @@ -358,7 +358,7 @@ my $delete_lun = sub { # step 3: save to be safe ... $execute_remote_command->($scfg, $timeout, $targetcli, 'saveconfig'); - # update interal cache + # update internal cache $free_lu_name->($scfg, $volname); last; diff --git a/PVE/Storage/LvmThinPlugin.pm b/PVE/Storage/LvmThinPlugin.pm index c9e127c..4ba6f90 100644 --- a/PVE/Storage/LvmThinPlugin.pm +++ b/PVE/Storage/LvmThinPlugin.pm @@ -86,7 +86,7 @@ sub alloc_image { die "unsupported format '$fmt'" if $fmt ne 'raw'; - die "illegal name '$name' - sould be 'vm-$vmid-*'\n" + die "illegal name '$name' - should be 'vm-$vmid-*'\n" if $name && $name !~ m/^vm-$vmid-/; my $vgs = PVE::Storage::LVMPlugin::lvm_vgs(); diff --git a/PVE/Storage/PBSPlugin.pm b/PVE/Storage/PBSPlugin.pm index a439dd2..abc6a02 100644 --- a/PVE/Storage/PBSPlugin.pm +++ b/PVE/Storage/PBSPlugin.pm @@ -565,7 +565,7 @@ sub path { my $repo = PVE::PBSClient::get_repository($scfg); - # artifical url - we currently do not use that anywhere + # artificial url - we currently do not use that anywhere my $path = "pbs://$repo/$name"; return ($path, $vmid, $vtype); @@ -758,7 +758,7 @@ sub activate_storage { } } - die "$storeid: Cannot find datastore '$datastore', check permissions and existance!\n"; + die "$storeid: Cannot find datastore '$datastore', check permissions and existence!\n"; } sub deactivate_storage { diff --git a/PVE/Storage/Plugin.pm b/PVE/Storage/Plugin.pm index d330845..15bf916 100644 --- a/PVE/Storage/Plugin.pm +++ b/PVE/Storage/Plugin.pm @@ -134,7 +134,7 @@ my $defaultData = { }, maxfiles => { description => "Deprecated: use 'prune-backups' instead. " . - "Maximal number of backup files per VM. Use '0' for unlimted.", + "Maximal number of backup files per VM. Use '0' for unlimited.", type => 'integer', minimum => 0, optional => 1, @@ -445,7 +445,7 @@ sub parse_config { # Storage implementation # called during addition of storage (before the new storage config got written) -# die to abort additon if there are (grave) problems +# die to abort addition if there are (grave) problems # NOTE: runs in a storage config *locked* context sub on_add_hook { my ($class, $storeid, $scfg, %param) = @_; @@ -553,7 +553,7 @@ sub get_subdir { my $path = $scfg->{path}; - die "storage definintion has no path\n" if !$path; + die "storage definition has no path\n" if !$path; my $subdir = $vtype_subdirs->{$vtype}; @@ -689,7 +689,7 @@ sub clone_image { my ($class, $scfg, $storeid, $volname, $vmid, $snap) = @_; # this only works for file based storage types - die "storage definintion has no path\n" if !$scfg->{path}; + die "storage definition has no path\n" if !$scfg->{path}; my ($vtype, $basename, $basevmid, undef, undef, $isBase, $format) = $class->parse_volname($volname); @@ -1142,7 +1142,7 @@ sub status { my $path = $scfg->{path}; - die "storage definintion has no path\n" if !$path; + die "storage definition has no path\n" if !$path; my $timeout = 2; my $res = PVE::Tools::df($path, $timeout); @@ -1166,7 +1166,7 @@ sub activate_storage { my $path = $scfg->{path}; - die "storage definintion has no path\n" if !$path; + die "storage definition has no path\n" if !$path; # this path test may hang indefinitely on unresponsive mounts my $timeout = 2; diff --git a/PVE/Storage/ZFSPlugin.pm b/PVE/Storage/ZFSPlugin.pm index 63b9551..5b84d85 100644 --- a/PVE/Storage/ZFSPlugin.pm +++ b/PVE/Storage/ZFSPlugin.pm @@ -293,7 +293,7 @@ sub alloc_image { die "unsupported format '$fmt'" if $fmt ne 'raw'; - die "illegal name '$name' - sould be 'vm-$vmid-*'\n" + die "illegal name '$name' - should be 'vm-$vmid-*'\n" if $name && $name !~ m/^vm-$vmid-/; my $volname = $name; diff --git a/test/get_subdir_test.pm b/test/get_subdir_test.pm index 576c475..1e58350 100644 --- a/test/get_subdir_test.pm +++ b/test/get_subdir_test.pm @@ -18,7 +18,7 @@ my $vtype_subdirs = PVE::Storage::Plugin::get_vtype_subdirs(); my $tests = [ # failed matches [ $scfg_with_path, 'none', "unknown vtype 'none'\n" ], - [ {}, 'iso', "storage definintion has no path\n" ], + [ {}, 'iso', "storage definition has no path\n" ], ]; # creates additional positive tests