22 lines
810 B
Perl
22 lines
810 B
Perl
--- lib/BackupPC/CGI/View.pm.orig 2015-01-12 00:19:53 UTC
|
|
+++ lib/BackupPC/CGI/View.pm
|
|
@@ -89,7 +89,7 @@ sub action
|
|
$file = $bpc->ConfDir() . "/hosts";
|
|
$linkHosts = 1;
|
|
} elsif ( $type eq "docs" ) {
|
|
- $file = $bpc->InstallDir() . "/doc/BackupPC.html";
|
|
+ $file = "$Conf{CgiImageDir}/BackupPC.html";
|
|
} elsif ( $host ne "" ) {
|
|
if ( !defined($In{num}) ) {
|
|
# get the latest LOG file
|
|
@@ -136,6 +136,10 @@ sub action
|
|
}
|
|
$s =~ s/[\n\r]+//g;
|
|
if ( $s =~ /smb: \\>/
|
|
+ || $s =~ /^tar:\d+\s/
|
|
+ || $s =~ /^ NTLMSSP_/
|
|
+ || $s =~ /^GENSEC backend /
|
|
+ || $s =~ /^doing parameter /
|
|
|| $s =~ /^\s*(\d+) \(\s*\d+\.\d kb\/s\) (.*)$/
|
|
|| $s =~ /^tar: dumped \d+ files/
|
|
|| $s =~ /^\s*added interface/i
|