X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=lib%2FBackupPC%2FCGI%2FRestoreInfo.pm;h=0d43f240296b5c88b66bb4142419ab6ac98f86de;hb=b81d2da5e16975674f011e4833337ac0fa24e0ea;hp=83583e881948e7507beee8b7d19446106bdc0e97;hpb=329e870f56fb6572fa697998d33676588034c149;p=BackupPC.git diff --git a/lib/BackupPC/CGI/RestoreInfo.pm b/lib/BackupPC/CGI/RestoreInfo.pm index 83583e8..0d43f24 100644 --- a/lib/BackupPC/CGI/RestoreInfo.pm +++ b/lib/BackupPC/CGI/RestoreInfo.pm @@ -28,7 +28,7 @@ # #======================================================================== # -# Version 2.1.0_CVS, released 3 Jul 2003. +# Version 3.0.0beta2, released 11 Nov 2006. # # See http://backuppc.sourceforge.net. # @@ -38,6 +38,7 @@ package BackupPC::CGI::RestoreInfo; use strict; use BackupPC::CGI::Lib qw(:all); +use Encode; sub action { @@ -79,13 +80,17 @@ sub action (my $strippedShareDest = $RestoreReq{shareDest}) =~ s/^\///; substr($targetFile, 0, length($RestoreReq{pathHdrSrc})) = $RestoreReq{pathHdrDest}; + $targetFile =~ s{//+}{/}g; + $strippedShareDest = decode_utf8($strippedShareDest); + $targetFile = decode_utf8($targetFile); + $strippedShareSrc = decode_utf8($strippedShareSrc); + $f = decode_utf8($f); $fileListStr .= <$RestoreReq{hostSrc}:/$strippedShareSrc$f$RestoreReq{hostDest}:/$strippedShareDest$targetFile EOF } - - Header(eval("qq{$Lang->{Restore___num_details_for__host}}")); - print(eval("qq{$Lang->{Restore___num_details_for__host2 }}")); + my $content = eval("qq{$Lang->{Restore___num_details_for__host2}}"); + Header(eval("qq{$Lang->{Restore___num_details_for__host}}"),$content); Trailer(); }