fix trailing whitespaces

Signed-off-by: Dominik Csapak <d.csapak@proxmox.com>

diff --git a/PMG/RuleDB/ContentTypeFilter.pm b/PMG/RuleDB/ContentTypeFilter.pm
index a01d291fe3a24bc907f1ebca1277020c33b6b3cc..796f170fc9d451207d054da355cde08e60184764 100755 (executable)
--- a/PMG/RuleDB/ContentTypeFilter.pm
+++ b/PMG/RuleDB/ContentTypeFilter.pm
@@ -32,13 +32,13 @@ sub oicon {
 
 sub new {
     my ($type, $fvalue, $ogroup) = @_;
-    
+
     my $class = ref($type) || $type;
 
     # translate old values
     if ($fvalue && (my $nt = $oldtypemap->{$fvalue})) {
        $fvalue = $nt;
-    } 
+    }
 
     my $self = $class->SUPER::new('content-type', $fvalue, $ogroup);
 
@@ -47,7 +47,7 @@ sub new {
 
 sub load_attr {
     my ($type, $ruledb, $id, $ogroup, $value) = @_;
-    
+
     my $class = ref($type) || $type;
 
     my $obj = $class->SUPER::load_attr($ruledb, $id, $ogroup, $value);
@@ -84,7 +84,7 @@ sub parse_entity {
            push @$res, $id;
        }
     }
-    
+
     foreach my $part ($entity->parts)  {
        if (my $match = $self->parse_entity ($part)) {
            push @$res, @$match;

diff --git a/PMG/RuleDB/MatchField.pm b/PMG/RuleDB/MatchField.pm
index c7ff12227b6eb36e97e11bce300e0c4bf9060d32..8d3d676706239574ce1280cf54465491af32b6d4 100644 (file)
--- a/PMG/RuleDB/MatchField.pm
+++ b/PMG/RuleDB/MatchField.pm
@@ -32,20 +32,20 @@ sub oicon {
 
 sub new {
     my ($type, $field, $field_value, $ogroup) = @_;
-   
+
     my $class = ref($type) || $type;
 
     my $self = $class->SUPER::new($class->otype(), $ogroup);
 
     $self->{field} = $field;
     $self->{field_value} = $field_value;
-    
+
     return $self;
 }
 
 sub load_attr {
     my ($type, $ruledb, $id, $ogroup, $value) = @_;
-    
+
     my $class = ref($type) || $type;
 
     defined($value) || die "undefined value: ERROR";;
@@ -61,9 +61,9 @@ sub load_attr {
     bless $obj, $class;
 
     $obj->{id} = $id;
-    
+
     $obj->{digest} = Digest::SHA::sha1_hex($id, $field, $field_value, $ogroup);
-    
+
     return $obj;
 }
 
@@ -77,9 +77,9 @@ sub save {
 
     if (defined ($self->{id})) {
        # update
-       
+
        $ruledb->{dbh}->do(
-           "UPDATE Object SET Value = ? WHERE ID = ?", 
+           "UPDATE Object SET Value = ? WHERE ID = ?",
            undef, $new_value, $self->{id});
 
     } else {
@@ -90,10 +90,10 @@ sub save {
            "VALUES (?, ?, ?);");
 
        $sth->execute($self->ogroup, $self->otype, $new_value);
-    
-       $self->{id} = PMG::Utils::lastid($ruledb->{dbh}, 'object_id_seq'); 
+
+       $self->{id} = PMG::Utils::lastid($ruledb->{dbh}, 'object_id_seq');
     }
-       
+
     return $self->{id};
 }
 
@@ -135,7 +135,7 @@ sub what_match {
 
 sub short_desc {
     my $self = shift;
-    
+
     return "$self->{field}=$self->{field_value}";
 }