standardise log level names
authorAdrian Oldham <adriann@visualthought.com.au>
Sat, 16 Mar 2013 00:00:23 +0000 (11:00 +1100)
committerTony Cook <tony@develop-help.com>
Sat, 16 Mar 2013 00:50:43 +0000 (11:50 +1100)
site/cgi-bin/modules/BSE/TB/ArticleFile.pm
site/cgi-bin/modules/BSE/TB/Image.pm
site/cgi-bin/modules/BSE/Util/ValidateHTML.pm

index f254ee7..2d29a36 100644 (file)
@@ -6,7 +6,7 @@ use vars qw/@ISA/;
 @ISA = qw/Squirrel::Row/;
 use Carp 'confess';
 
-our $VERSION = "1.007";
+our $VERSION = "1.008";
 
 sub columns {
   return qw/id articleId displayName filename sizeInBytes description 
@@ -487,7 +487,7 @@ sub update {
     BSE::TB::AuditLog->log
       (
        component => "admin:edit:saveimage",
-       level => "warn",
+       level => "warning",
        object => $self,
        actor => $actor,
        msg => "Error saving file to storage $new_storage: $msg",
@@ -506,7 +506,7 @@ sub update {
       BSE::TB::AuditLog->log
        (
         component => "admin:edit:savefile",
-        level => "warn",
+        level => "warning",
         object => $self,
         actor => $actor,
         msg => "Error saving file to storage $new_storage: $msg",
index c286279..568d4c5 100644 (file)
@@ -7,7 +7,7 @@ use vars qw/@ISA/;
 @ISA = qw/Squirrel::Row BSE::ThumbCommon/;
 use Carp qw(confess);
 
-our $VERSION = "1.005";
+our $VERSION = "1.006";
 
 sub columns {
   return qw/id articleId image alt width height url displayOrder name
@@ -247,7 +247,7 @@ sub update {
     BSE::TB::AuditLog->log
       (
        component => "admin:edit:saveimage",
-       level => "warn",
+       level => "warning",
        object => $image,
        actor => $actor,
        msg => "Error saving image to storage $new_storage: $msg",
@@ -266,7 +266,7 @@ sub update {
       BSE::TB::AuditLog->log
        (
         component => "admin:edit:saveimage",
-        level => "warn",
+        level => "warning",
         object => $image,
         actor => $actor,
         msg => "Error saving image to storage $new_storage: $msg",
index ef1ed63..5b960e7 100644 (file)
@@ -1,7 +1,7 @@
 package BSE::Util::ValidateHTML;
 use strict;
 
-our $VERSION = "1.000";
+our $VERSION = "1.001";
 
 sub validate {
   my ($class, $cfg, $result) = @_;
@@ -20,7 +20,7 @@ sub validate {
       BSE::TB::AuditLog->log
          (
           component => "template:validatehtml:load",
-          level => "critical",
+          level => "crit",
           actor => "S",
           msg => "Could not load $real_class",
           dump => $@,