From 8659566dfd0c4a181b4562bc171a8f7df933668f Mon Sep 17 00:00:00 2001
From: "Steinar H. Gunderson" <sgunderson@bigfoot.com>
Date: Tue, 13 Jul 2021 14:22:43 +0200
Subject: [PATCH] Fix cache-on-upload.

---
 perl/Sesse/pr0n/Upload.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl/Sesse/pr0n/Upload.pm b/perl/Sesse/pr0n/Upload.pm
index 6f44f7a..0fdce3a 100644
--- a/perl/Sesse/pr0n/Upload.pm
+++ b/perl/Sesse/pr0n/Upload.pm
@@ -97,7 +97,7 @@ sub handler {
 				# Make cache while we're at it.
 				# FIXME: Ideally we'd want to ensure cache of -1x-1 here as well (for NEFs), but that would
 				# preclude mipmapping in its current form.
-				Sesse::pr0n::Common::ensure_cached($r, $filename, $newid, undef, undef, 320, 256);
+				Sesse::pr0n::Common::ensure_cached($r, 0, 0, $filename, $newid, undef, undef, 320, 256);
 				
 				# OK, we got this far, commit
 				$dbh->commit;
-- 
2.39.2