summaryrefslogtreecommitdiff
path: root/util
diff options
context:
space:
mode:
Diffstat (limited to 'util')
-rwxr-xr-xutil/vndb.pl10
1 files changed, 10 insertions, 0 deletions
diff --git a/util/vndb.pl b/util/vndb.pl
index b845cb26..b6056dd4 100755
--- a/util/vndb.pl
+++ b/util/vndb.pl
@@ -46,6 +46,7 @@ TUWF::set(
%O,
pre_request_handler => \&reqinit,
error_404_handler => \&handle404,
+ log_format => \&logformat,
# for compatibility with YAWF
validate_templates => {
mail => { regex => qr/^[^@<>]+@[^@.<>]+(?:\.[^@.<>]+)+$/ },
@@ -124,3 +125,12 @@ sub handle404 {
$self->htmlFooter;
}
+
+# log user IDs (necessary for determining performance issues, user preferences
+# have a lot of influence in this)
+sub logformat {
+ my($self, $uri, $msg) = @_;
+ sprintf "[%s] %s %s: %s\n", scalar localtime(), $uri,
+ $self->authInfo->{id} ? 'u'.$self->authInfo->{id} : '-', $msg;
+}
+