Escaping ' in a function

If I had hair, I would have lost it by now.
I'm trying to create a function that passes a string that will need to be
quoted. I finally figured out how many single quotes I needed and as a
test, I've shown it in v_sql. However, I now need to do the same thing for
my FOR...LOOP query.
The end result should be something like this:

Select * from pg_views where definition ~* 'product_non_master_v'

I've tried numerous variations of quotes, but my return value is always
null. If I output the v_sql variable, it gives me what I need to run a
successful query.
Any help would be greatly appreciated:

CREATE or REPLACE FUNCTION recompileview(varchar) RETURNS varchar AS '

DECLARE
tblname ALIAS FOR $1;
old_view RECORD;
v_sql varchar;

begin
/* This is what I need */
v_sql := ''Select * from pg_views where definition ~* '''''' || tblname ||
'''''''' ;

FOR old_view in Select * from pg_views where definition ~*
''''tblname'''''' LOOP
v_name := v_name || old_view.viewname;
END LOOP;

RETURN v_name;
end;
' LANGUAGE 'plpgsql';

TIA

Patrick Hatcher