Index: openacs-4/packages/lars-blogger/tcl/weblogs-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/tcl/weblogs-procs.tcl,v
diff -u -r1.10 -r1.11
--- openacs-4/packages/lars-blogger/tcl/weblogs-procs.tcl	27 Feb 2004 19:16:24 -0000	1.10
+++ openacs-4/packages/lars-blogger/tcl/weblogs-procs.tcl	24 Sep 2015 07:38:34 -0000	1.11
@@ -80,8 +80,8 @@
 
     ns_log debug "lars_blogger::instance::send_pings:"
     foreach ping_url $ping_urls {
-        ns_log debug "lars_blogger::instance::send_pings: call is \n[list xmlrpc::remote_call $ping_url weblogUpdates.ping -string [ad_quotehtml $blog_title] -string [ad_quotehtml $blog_url]]"
-        if { [catch {xmlrpc::remote_call $ping_url weblogUpdates.ping -string [ad_quotehtml $blog_title] -string [ad_quotehtml $blog_url] } errmsg ] } {
+        ns_log debug "lars_blogger::instance::send_pings: call is \n[list xmlrpc::remote_call $ping_url weblogUpdates.ping -string [ns_quotehtml $blog_title] -string [ns_quotehtml $blog_url]]"
+        if { [catch {xmlrpc::remote_call $ping_url weblogUpdates.ping -string [ns_quotehtml $blog_title] -string [ns_quotehtml $blog_url] } errmsg ] } {
             ns_log warning "lars_blogger::instance::send_pings error: $errmsg"
             set success_p 0
         } else {