Model::Base: remove deprecated / unused functions

[newslash/newslash.git] / src / newslash_web / lib / Newslash / Model / Base.pm

diff --git a/src/newslash_web/lib/Newslash/Model/Base.pm b/src/newslash_web/lib/Newslash/Model/Base.pm
index 9aa8e6d..98651fa 100644 (file)
--- a/src/newslash_web/lib/Newslash/Model/Base.pm
+++ b/src/newslash_web/lib/Newslash/Model/Base.pm
@@ -51,14 +51,6 @@ sub new_instance_of {
     return $new_obj;
 }
 
-# deprecated!
-sub connect_kvs {
-    my $self = shift;
-    my $r = Redis->new(server => $self->{options}->{KeyValueStore}->{host});
-    $r->connect;
-    return $r;
-}
-
 sub logger {
     my $self = shift;
 
@@ -84,16 +76,4 @@ sub fatal { shift->logger->fatal(@_); }
 sub info { shift->logger->info(@_); }
 
 
-sub filter_item {
-    my ($self, $security_level, $faculties, $item) = @_;
-    for my $lv (keys %$faculties) {
-        if ($security_level < $lv) {
-            for my $k (@{$faculties->{$lv}}) {
-                delete $item->{$k} if defined $item->{$k};
-            }
-        }
-    }
-    return $item;
-}
-
 1;