pc11 -> pc61 upgrade work

[spider.git] / perl / Route.pm

diff --git a/perl/Route.pm b/perl/Route.pm
index a8820ea4fd228510d28f345ecc6913184ee2abd5..99b4b2b1e73d42fd1bc9cdfe2b4b68e43c036dc9 100644 (file)
--- a/perl/Route.pm
+++ b/perl/Route.pm
@@ -423,6 +423,18 @@ sub field_prompt
        return $val->{$ele} || $valid{$ele};
 }
 
+sub write_cache
+{
+       Route::Node::write_cache();
+       Route::User::write_cache();
+}
+
+sub read_cache
+{
+       Route::Node::read_cache();
+       Route::User::read_cache();
+}
+
 #
 # generic AUTOLOAD for accessors
 #