Fix Expired option in media list to select Used media

git-svn-id: https://bacula.svn.sourceforge.net/svnroot/bacula/trunk@9097 91ce42f0-d328-0410-95d8-f526ca767f89

diff --git a/gui/bweb/lib/Bweb.pm b/gui/bweb/lib/Bweb.pm
index 6c31a8ba60c43f064cce80132ba4399350d6ded5..c7f0b4d37f0a9e029958a0f101d63a73fbad1619 100644 (file)
--- a/gui/bweb/lib/Bweb.pm
+++ b/gui/bweb/lib/Bweb.pm
@@ -2599,7 +2599,7 @@ sub display_media
     }
     if ($arg->{expired}) {
         $where = " 
-        AND VolStatus = 'Full'
+        AND VolStatus = ('Full', 'Used')
         AND (    $self->{sql}->{UNIX_TIMESTAMP}(Media.LastWritten) 
                + $self->{sql}->{TO_SEC}(Media.VolRetention)
             ) < NOW()  " . $where ;

diff --git a/gui/bweb/technotes-3.0 b/gui/bweb/technotes-3.0
index 6488330f42d27788341e07401a6091a66d5aec80..1a1e11bc661bc20295eec7e60d7d6f672fa8c328 100644 (file)
--- a/gui/bweb/technotes-3.0
+++ b/gui/bweb/technotes-3.0
@@ -1,3 +1,5 @@
+24Jul09
+ebl  Fix Expired option in media list to select Used media
 23Jul09
 ebl  Permit to filter on the directory name as for file
 17Jul09