From c842aa19de400db3c20267be478e733846292a66 Mon Sep 17 00:00:00 2001 From: betateilchen Date: Fri, 9 Mar 2018 20:59:37 +0000 Subject: [PATCH] deletefile: move to contrib/deprecated git-svn-id: https://svn.fhem.de/fhem/trunk@16365 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/98_deletefile.pm | 46 -------------------------------------- 1 file changed, 46 deletions(-) delete mode 100644 fhem/FHEM/98_deletefile.pm diff --git a/fhem/FHEM/98_deletefile.pm b/fhem/FHEM/98_deletefile.pm deleted file mode 100644 index fcf8783a4..000000000 --- a/fhem/FHEM/98_deletefile.pm +++ /dev/null @@ -1,46 +0,0 @@ -# $Id$ - -package main; -use strict; -use warnings; - -sub Deletefile_Initialize($$) { - - $cmds{deletefile} = { Fn => "CommandDeletefile", - Hlp=>"[filename],delete file"}; -} - -sub CommandDeletefile($$) -{ - my ($cl, $param) = @_; - return "It is not allowed to delete the configuration file fhem.cfg." if ($param =~ m/fhem.cfg/); - - my $file = FW_fileNameToPath($param); - return "File $param not found." unless -f $file; - - eval { unlink $file; }; - return "Error: $@" if $@; - - return "File $file deleted."; -} - -1; - -=pod -=item command -=begin html - - -

deletefile

- - -=end html - -=cut