X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=lib%2FBackupPC%2FCGI%2FView.pm;h=ab797e95f4858dc43bd756aaeb832b3005441eaa;hb=refs%2Ftags%2Fv3_0_0;hp=0f5ab9868538915b605ff8cc80f7e7ada1d40dad;hpb=df717077755b9331fa245f72933ef03add7a3710;p=BackupPC.git

diff --git a/lib/BackupPC/CGI/View.pm b/lib/BackupPC/CGI/View.pm
index 0f5ab98..ab797e9 100644
--- a/lib/BackupPC/CGI/View.pm
+++ b/lib/BackupPC/CGI/View.pm
@@ -28,7 +28,7 @@
 #
 #========================================================================
 #
-# Version 3.0.0beta1, released 30 Jul 2006.
+# Version 3.0.0, released 28 Jan 2007.
 #
 # See http://backuppc.sourceforge.net.
 #
@@ -91,6 +91,7 @@ sub action
         if ( !defined($In{num}) ) {
             # get the latest LOG file
             $file = ($bpc->sortedPCLogFiles($host))[0];
+            $file =~ s/\.z$//;
         } else {
             $file = "$TopDir/pc/$host/LOG$ext";
         }
@@ -173,7 +174,7 @@ sub action
 		    last if ( $s eq "" );
 		    $s =~ s/[\n\r]+//g;
 		    $s = ${EscHTML($s)};
-		    $s =~ s/\b([\w-]+)\b/defined($Hosts->{$1})
+		    $s =~ s/\b([\w-.]+)\b/defined($Hosts->{$1})
 					    ? ${HostLink($1)} : $1/eg;
 		    $c .= $s . "\n";
 		}
@@ -199,7 +200,7 @@ sub action
 		    $s =~ s[(\$Conf\{.*?\})][
 			my $c = $1;
 			my $s = lc($c);
-			$s =~ s{(\W)}{sprintf("%%%02x", ord($1) )}gxe;
+			$s =~ s{(\W)}{_}g;
 			"<a href=\"?action=view&type=docs#item_$s\"><tt>$c</tt></a>"
 		    ]eg;
 		    $c .= $s . "\n";