X-Git-Url: http://git.rot13.org/?p=BackupPC.git;a=blobdiff_plain;f=lib%2FBackupPC%2FCGI%2FEditConfig.pm;h=8309192569348a104055d4279285df1f94a77812;hp=466ab13c9da6d373f83ca40e53806040d328efe7;hb=ca593f66fd6c35764bd8997c6338b781330f019c;hpb=f076585d3ff9dfe6de32292b897e293008efe74e diff --git a/lib/BackupPC/CGI/EditConfig.pm b/lib/BackupPC/CGI/EditConfig.pm index 466ab13..8309192 100644 --- a/lib/BackupPC/CGI/EditConfig.pm +++ b/lib/BackupPC/CGI/EditConfig.pm @@ -10,7 +10,7 @@ # Craig Barratt # # COPYRIGHT -# Copyright (C) 2005-2007 Craig Barratt +# Copyright (C) 2005-2009 Craig Barratt # # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by @@ -28,7 +28,7 @@ # #======================================================================== # -# Version 3.2.0, released 31 Dec 2008. +# Version 3.2.0beta1, released 5 Jan 2010. # # See http://backuppc.sourceforge.net. # @@ -215,6 +215,8 @@ our %ConfigMenu = ( visible => sub { return $_[0]->{XferMethod} eq "ftp"; } }, {name => "FtpPasswd", visible => sub { return $_[0]->{XferMethod} eq "ftp"; } }, + {name => "FtpPassive", + visible => sub { return $_[0]->{XferMethod} eq "ftp"; } }, {name => "FtpBlockSize", visible => sub { return $_[0]->{XferMethod} eq "ftp"; } }, {name => "FtpPort", @@ -223,7 +225,8 @@ our %ConfigMenu = ( visible => sub { return $_[0]->{XferMethod} eq "ftp"; } }, {name => "FtpFollowSymlinks", visible => sub { return $_[0]->{XferMethod} eq "ftp"; } }, - + + ### Archive Settings {text => "CfgEdit_Title_Archive_Settings", visible => sub { return $_[0]->{XferMethod} eq "archive"; } }, @@ -285,6 +288,8 @@ our %ConfigMenu = ( visible => sub { return $_[0]->{XferMethod} eq "rsyncd"; } }, {name => "RsyncArgs", visible => sub { return $_[0]->{XferMethod} =~ /rsync/; } }, + {name => "RsyncArgsExtra", + visible => sub { return $_[0]->{XferMethod} =~ /rsync/; } }, {name => "RsyncRestoreArgs", visible => sub { return $_[0]->{XferMethod} =~ /rsync/; } }, @@ -1023,7 +1028,7 @@ sub fieldEditBuild if ( $level == 0 ) { my $lcVarName = lc($varName); $content .= <$varName +$varName EOF if ( defined($overrideVar) ) { my $override_checked = ""; @@ -1536,6 +1541,10 @@ sub configDiffMesg my $value = $dump->Dump; $value =~ s/\n/\\n/g; $value =~ s/\r/\\r/g; + if ( $p =~ /Passwd/ || $p =~ /Secret/ ) { + $value = "'*'"; + } + $mesg .= eval("qq($Lang->{CfgEdit_Log_Add_param_value})"); } else { my $dump = Data::Dumper->new([$newConf->{$p}]); @@ -1563,6 +1572,10 @@ sub configDiffMesg $valueOld =~ s/\n/\\n/g; $valueNew =~ s/\r/\\r/g; $valueOld =~ s/\r/\\r/g; + if ( $p =~ /Passwd/ || $p =~ /Secret/ ) { + $valueNew = "'*'"; + $valueOld = "'*'"; + } $mesg .= eval("qq($Lang->{CfgEdit_Log_Change_param_value})"); }