X-Git-Url: http://git.rot13.org/?p=BackupPC.git;a=blobdiff_plain;f=lib%2FBackupPC%2FCGI%2FBrowse.pm;h=e0c33463c8b55b3618a97498778800c1cdc3c7ce;hp=3eb7f30ec710eaf675f7c0553f4b4e3982496fc9;hb=e951f787a66c5bd9e9955c3f657a5b44289c0fe1;hpb=a7e968ce327855f2ba2624ca8517069a936c9b5b diff --git a/lib/BackupPC/CGI/Browse.pm b/lib/BackupPC/CGI/Browse.pm index 3eb7f30..e0c3346 100644 --- a/lib/BackupPC/CGI/Browse.pm +++ b/lib/BackupPC/CGI/Browse.pm @@ -28,7 +28,7 @@ # #======================================================================== # -# Version 2.1.0_CVS, released 3 Jul 2003. +# Version 2.1.0, released 20 Jun 2004. # # See http://backuppc.sourceforge.net. # @@ -218,11 +218,7 @@ EOF if ( $gotDir ) { $fileStr .= < -
-  $iconStr - -  $fDisp -
+  $iconStr $fDisp $attrStr @@ -230,11 +226,7 @@ EOF } else { $fileStr .= < -
-  $iconStr - -  $fDisp -
+  $iconStr $fDisp $attrStr @@ -290,23 +282,18 @@ EOF } else { $fileStr = eval("qq{$Lang->{The_directory_is_empty}}"); } - my @otherDirs; my $pathURI = $dir; my $shareURI = $share; $pathURI =~ s/([^\w.\/-])/uc sprintf("%%%02x", ord($1))/eg; $shareURI =~ s/([^\w.\/-])/uc sprintf("%%%02x", ord($1))/eg; - foreach my $i ( $view->backupList($share, $dir) ) { - push(@otherDirs, $i); - } - if ( @otherDirs ) { - my $otherDirs = join(",\n", @otherDirs); - my $inc = 0; - foreach my $value (@otherDirs) { - my $selected = undef; - my $showDate = timeStamp2($Backups[$inc]{startTime}); - $selected = " selected" if ($value == $num); - $otherDirs .= "\n"; - $inc++; + if ( my @otherDirs = $view->backupList($share, $dir) ) { + my $otherDirs; + foreach my $i ( @otherDirs ) { + my $selected; + my $showDate = timeStamp2($Backups[$i]{startTime}); + my $backupNum = $Backups[$i]{num}; + $selected = " selected" if ( $backupNum == $num ); + $otherDirs .= "\n"; } $filledBackup .= eval("qq{$Lang->{Visit_this_directory_in_backup}}"); }