diff options
Diffstat (limited to 'lib/VNDB/DB')
| -rw-r--r-- | lib/VNDB/DB/Releases.pm | 3 | ||||
| -rw-r--r-- | lib/VNDB/DB/Users.pm | 2 |
2 files changed, 3 insertions, 2 deletions
diff --git a/lib/VNDB/DB/Releases.pm b/lib/VNDB/DB/Releases.pm index b2c78d5e..6af2f736 100644 --- a/lib/VNDB/DB/Releases.pm +++ b/lib/VNDB/DB/Releases.pm @@ -3,6 +3,7 @@ package VNDB::DB::Releases; use strict; use warnings; +use POSIX 'strftime'; use Exporter 'import'; our @EXPORT = qw|dbReleaseGet dbReleaseAdd dbReleaseEdit|; @@ -27,7 +28,7 @@ sub dbReleaseGet { $o{vid} ? ( 'rv.vid = ?' => $o{vid} ) : (), defined $o{unreleased} ? ( - q|rr.released !s TO_CHAR('today'::timestamp, 'YYYYMMDD')::integer| => $o{unreleased} ? '>' : '<=' ) : (), + q|rr.released !s ?| => [ $o{unreleased} ? '>' : '<=', strftime('%Y%m%d', gmtime) ] ) : (), ); my @join = ( diff --git a/lib/VNDB/DB/Users.pm b/lib/VNDB/DB/Users.pm index 501bb8bb..6f1a13c6 100644 --- a/lib/VNDB/DB/Users.pm +++ b/lib/VNDB/DB/Users.pm @@ -64,7 +64,7 @@ sub dbUserEdit { my %h; defined $o{$_} && ($h{$_.' = ?'} = $o{$_}) - for (qw| username mail rank show_nsfw show_list |); + for (qw| username mail rank show_nsfw show_list skin |); $h{'passwd = decode(?, \'hex\')'} = $o{passwd} if defined $o{passwd}; |