hide route changes, increase sh/ann cache to 130.

[spider.git] / perl / DXProtHandle.pm

diff --git a/perl/DXProtHandle.pm b/perl/DXProtHandle.pm
index 942f6faa61742fa5ace3edcb91630d176eab4b43..c39b52e1da6b004982c92f667faa25d5ffc20705 100644 (file)
--- a/perl/DXProtHandle.pm
+++ b/perl/DXProtHandle.pm
@@ -1603,7 +1603,7 @@ sub _add_thingy
                                $user = DXUser::get($call);
                                unless ($user) {
                                        $user = DXUser->new($call);
-                                       dbg("PCProt::_add_thingy new user $call");
+                                       dbg("PCProt::_add_thingy new user $call") if isdbg('route');
                                }
                        }
                        if ($is_node) {
@@ -1622,7 +1622,7 @@ sub _add_thingy
                                                } else {
                                                        $user->sort('A');
                                                }
-                                               dbg("PCProt::_add_thingy node $call sort updated " . $user->sort);
+                                               dbg("PCProt::_add_thingy node $call sort updated " . $user->sort) if isdbg('route');
                                        }
                                }
                        } else {