diff options
author | Yorhel <git@yorhel.nl> | 2009-05-22 09:46:41 +0200 |
---|---|---|
committer | Yorhel <git@yorhel.nl> | 2009-05-22 09:46:41 +0200 |
commit | 6a5b24e04aadbb5a0327c4ce335f37f1506000a1 (patch) | |
tree | 1fa9532911d2dcb0287d9528e1b776239f7d0a9c /lib/VNDB/DB/Releases.pm | |
parent | 1ee636e3a68f9d03509563e2a833e11ed332fccb (diff) |
Added medium filter on /r
Diffstat (limited to 'lib/VNDB/DB/Releases.pm')
-rw-r--r-- | lib/VNDB/DB/Releases.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/VNDB/DB/Releases.pm b/lib/VNDB/DB/Releases.pm index a4db2fc0..3831b0c8 100644 --- a/lib/VNDB/DB/Releases.pm +++ b/lib/VNDB/DB/Releases.pm @@ -9,7 +9,7 @@ use Exporter 'import'; our @EXPORT = qw|dbReleaseGet dbReleaseAdd dbReleaseEdit|; -# Options: id vid rev order unreleased page results what date platforms languages type minage search +# Options: id vid rev order unreleased page results what date media platforms languages type minage search # What: extended changes vn producers platforms media sub dbReleaseGet { my($self, %o) = @_; @@ -42,6 +42,8 @@ sub dbReleaseGet { '(rr.minage !s ? AND rr.minage <> -1)' => [ $o{minage}[0] ? '<=' : '>=', $o{minage}[1] ] ) : (), $o{patch} ? ( 'rr.patch = ?', $o{patch} == 1 ? 1 : 0) : (), + $o{media} ? ( + 'rr.id IN(SELECT irm.rid FROM releases_media irm JOIN releases ir ON ir.latest = irm.rid WHERE irm.medium IN(!l))' => [ $o{media} ] ) : (), ); if($o{search}) { |