Munged merge from trunk
authorMike Rylander <mrylander@gmail.com>
Wed, 20 Apr 2011 16:19:01 +0000 (12:19 -0400)
committerMike Rylander <mrylander@gmail.com>
Wed, 20 Apr 2011 16:19:01 +0000 (12:19 -0400)
1  2 
Open-ILS/src/perlmods/lib/OpenILS/Application/Vandelay.pm
Open-ILS/src/sql/Pg/000.functions.general.sql

@@@ -7,8 -7,14 +7,16 @@@ BEGIN
  
  CREATE SCHEMA evergreen;
  
+ CREATE OR REPLACE FUNCTION evergreen.change_db_setting(setting_name TEXT, settings TEXT[]) RETURNS VOID AS $$
+ BEGIN
+     EXECUTE 'ALTER DATABASE ' || quote_ident(current_database()) || ' SET ' || quote_ident(setting_name) || ' = ' || array_to_string(settings, ',');
+ END;
+ $$ LANGUAGE plpgsql;
+ SELECT evergreen.change_db_setting('search_path', ARRAY['evergreen','public','pg_catalog']);
 +CREATE OR REPLACE FUNCTION evergreen.array_remove_item_by_value(inp ANYARRAY, el ANYELEMENT) RETURNS anyarray AS $$ SELECT ARRAY_ACCUM(x.e) FROM UNNEST( $1 ) x(e) WHERE x.e <> $2; $$ LANGUAGE SQL;
 +
  CREATE OR REPLACE FUNCTION evergreen.lowercase( TEXT ) RETURNS TEXT AS $$
      return lc(shift);
  $$ LANGUAGE PLPERLU STRICT IMMUTABLE;