Index: openacs-4/packages/ref-countries/sql/postgresql/ref-countries-drop.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ref-countries/sql/postgresql/ref-countries-drop.sql,v
diff -u -r1.1 -r1.1.22.1
--- openacs-4/packages/ref-countries/sql/postgresql/ref-countries-drop.sql	15 Sep 2001 00:49:28 -0000	1.1
+++ openacs-4/packages/ref-countries/sql/postgresql/ref-countries-drop.sql	5 Sep 2014 16:52:43 -0000	1.1.22.1
@@ -10,16 +10,24 @@
 -- This will probably fail if their is a child table using this.
 -- I can probably make this cleaner also, but ... no time today
 
-create function inline_0() returns integer as '
-declare
+
+
+--
+-- procedure inline_0/0
+--
+CREATE OR REPLACE FUNCTION inline_0(
+
+) RETURNS integer AS $$
+DECLARE
     rec        acs_reference_repositories%ROWTYPE;
-begin
-    for rec in select * from acs_reference_repositories where upper(table_name) like ''COUNTR%'' loop
-	 execute ''drop table '' || rec.table_name;
+BEGIN
+    for rec in select * from acs_reference_repositories where upper(table_name) like 'COUNTR%' loop
+	 execute 'drop table ' || rec.table_name;
          perform acs_reference__delete(rec.repository_id);
     end loop;
     return 0;
-end;' language 'plpgsql';
+END;
+$$ LANGUAGE plpgsql;
 
 select inline_0();
 drop function inline_0();