Signed-off-by: Max Carrara <m.carr...@proxmox.com> --- src/PVE/Storage/CIFSPlugin.pm | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/src/PVE/Storage/CIFSPlugin.pm b/src/PVE/Storage/CIFSPlugin.pm index 2184471..18dc017 100644 --- a/src/PVE/Storage/CIFSPlugin.pm +++ b/src/PVE/Storage/CIFSPlugin.pm @@ -13,7 +13,7 @@ use base qw(PVE::Storage::Plugin); # CIFS helper functions -sub cifs_is_mounted : prototype($$) { +my sub cifs_is_mounted : prototype($$) { my ($scfg, $mountdata) = @_; my ($mountpoint, $server, $share) = $scfg->@{'path', 'server', 'share'}; @@ -31,12 +31,12 @@ sub cifs_is_mounted : prototype($$) { return undef; } -sub cifs_cred_file_name { +my sub cifs_cred_file_name { my ($storeid) = @_; return "/etc/pve/priv/storage/${storeid}.pw"; } -sub cifs_delete_credentials { +my sub cifs_delete_credentials { my ($storeid) = @_; if (my $cred_file = get_cred_file($storeid)) { @@ -44,7 +44,7 @@ sub cifs_delete_credentials { } } -sub cifs_set_credentials { +my sub cifs_set_credentials { my ($password, $storeid) = @_; my $cred_file = cifs_cred_file_name($storeid); @@ -55,7 +55,7 @@ sub cifs_set_credentials { return $cred_file; } -sub get_cred_file { +my sub get_cred_file { my ($storeid) = @_; my $cred_file = cifs_cred_file_name($storeid); @@ -66,7 +66,7 @@ sub get_cred_file { return undef; } -sub cifs_mount : prototype($$$$$) { +my sub cifs_mount : prototype($$$$$) { my ($scfg, $storeid, $smbver, $user, $domain) = @_; my ($mountpoint, $server, $share, $options) = $scfg->@{'path', 'server', 'share', 'options'}; -- 2.39.2 _______________________________________________ pve-devel mailing list pve-devel@lists.proxmox.com https://lists.proxmox.com/cgi-bin/mailman/listinfo/pve-devel