Index: openacs-4/packages/categories/lib/contributions.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/categories/lib/contributions.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/categories/lib/contributions.tcl	6 Oct 2007 13:48:29 -0000	1.3
+++ openacs-4/packages/categories/lib/contributions.tcl	27 Oct 2014 16:41:10 -0000	1.4
@@ -145,7 +145,7 @@
 
        set last_modified [regsub -all { } [util::age_pretty -hours_limit 0 -mode_2_fmt "%X %a" -mode_3_fmt "%x" -timestamp_ansi $last_modified -sysdate_ansi $now] {\ }]
        set user_url [acs_community_member_url -user_id $user_id]
-       if {[catch {set url_one [acs_sc_call -error FtsContentProvider url [list $object_id] $object_type]} errMsg]} {
+       if {[catch {set url_one [acs_sc::invoke -error -contract FtsContentProvider -operation url -call_args [list $object_id] -impl $object_type]} errMsg]} {
            global errorCode
            set url_one $errorCode
        }