Index: openacs-4/packages/acs-subsite/tcl/package-procs-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/package-procs-postgresql.xql,v diff -u -r1.19 -r1.19.2.1 --- openacs-4/packages/acs-subsite/tcl/package-procs-postgresql.xql 30 Mar 2013 19:32:40 -0000 1.19 +++ openacs-4/packages/acs-subsite/tcl/package-procs-postgresql.xql 2 Aug 2014 10:05:47 -0000 1.19.2.1 @@ -209,7 +209,7 @@ perform define_function_args('${package_name}__new','[plpgsql_utility::define_function_args $attribute_list]'); CREATE FUNCTION ${package_name}__new([plpgsql_utility::generate_function_signature $attribute_list]) -RETURNS [plpgsql_utility::table_column_type ${table_name} ${id_column}] AS \$\$ +RETURNS [plpgsql_utility::table_column_type ${table_name} ${id_column}] AS $$ DECLARE [plpgsql_utility::generate_attribute_parameters $attribute_list]; v_$id_column ${table_name}.${id_column}%TYPE; @@ -230,19 +230,19 @@ return v_$id_column; END; -\$\$ LANGUAGE plpgsql; +$$ LANGUAGE plpgsql; CREATE FUNCTION ${package_name}__delete ( p_${id_column} [plpgsql_utility::table_column_type ${table_name} ${id_column}] -) RETURNS integer AS \$\$ +) RETURNS integer AS $$ DECLARE BEGIN perform ${supertype_package_name}__delete( p_${id_column} ); return 1; END; -\$\$ LANGUAGE plpgsql; +$$ LANGUAGE plpgsql; return null; end;