From: Steinar H. Gunderson <sesse@debian.org>
Date: Sun, 24 Jun 2007 18:48:46 +0000 (+0200)
Subject: Unbreak WebDAV listing with the new database structure.
X-Git-Url: https://git.sesse.net/?p=pr0n;a=commitdiff_plain;h=e3ed163a455f8153d52ae1b8e255f92a2e96c060

Unbreak WebDAV listing with the new database structure.
---

diff --git a/perl/Sesse/pr0n/WebDAV.pm b/perl/Sesse/pr0n/WebDAV.pm
index 49be239..25b4408 100644
--- a/perl/Sesse/pr0n/WebDAV.pm
+++ b/perl/Sesse/pr0n/WebDAV.pm
@@ -109,7 +109,7 @@ EOF
 					dberror($r, "Couldn't get events");
 		
 				while (my $ref = $q->fetchrow_hashref()) {
-					my $id = $ref->{'id'};
+					my $id = $ref->{'event'};
 					my $name = $ref->{'name'};
 				
 					$name =~ s/&/\&amp;/g;  # hack :-)