Index: openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl,v diff -u -N -r1.139 -r1.140 --- openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl 22 May 2018 08:30:46 -0000 1.139 +++ openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl 22 May 2018 08:48:37 -0000 1.140 @@ -655,21 +655,6 @@ # if root non empty then we had a hostname based subsite and # should not redirect since we got a hostname we know about. - - ### BLOCK NASTY YAHOO START - set headers [ns_conn headers] - set user_agent [ns_set iget $headers User-Agent] - ns_log Debug "rp_filter: user agent is $user_agent" - - if {[string match "*YahooSeeker*" $user_agent] - || [string match ".*Yahoo! Slurp.*" $user_agent] - } { - ns_log Notice "rp_filter: nasty spider $user_agent" - ns_returnredirect "http://www.yahoo.com" - return filter_return - } - ## BLOCK NASTY YAHOO FINISH - if { $root eq "" && [parameter::get -package_id $::acs::kernel_id -parameter ForceHostP -default 0] } {