pesky plpgsql

Guess I'm an April Fool.  When I define the following psql returns 
"CREATE":

-- update all galleries that are categories with their skey and rkey 
values
CREATE FUNCTION update_cat_keys() RETURNS integer AS '
declare  v_row         RECORD;
begin for v_row in select gallery_id, 
imagedb_gallery_hierarchy_skey(gallery_id, NULL, '''') as skey, 
imagedb_gallery_hierarchy_rskey(gallery_id, NULL, '''') as rskey from 
imagedb_galleries where category_p = ''t'' loop
    update imagedb_galleries    set skey = v_row.skey, rskey = v_row.rskey    where gallery_id = v_row.gallery_id; end
loop;
return 1;
end;
' LANGUAGE 'plpgsql';

When I call the function I get the following error:

devpps=# select update_cat_keys();
NOTICE:  plpgsql: ERROR during compile of update_cat_keys near line 2
ERROR:  parse error at or near ";"

The select in the loop runs fine in psql.  So I'm stumped...

I'm pretty ignorant about plpgsql, I'm used to pl/sql.

TIA,

Walter