Index: openacs-4/packages/survey/www/admin/send-mail-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/survey/www/admin/send-mail-oracle.xql,v
diff -u -r1.1.2.1 -r1.1.2.2
--- openacs-4/packages/survey/www/admin/send-mail-oracle.xql	8 Oct 2002 10:38:16 -0000	1.1.2.1
+++ openacs-4/packages/survey/www/admin/send-mail-oracle.xql	23 Oct 2002 14:55:46 -0000	1.1.2.2
@@ -4,9 +4,9 @@
 
     <partialquery name="dotlrn_all">
 	<querytext>
-            select '$sender_email' as from_addr,
-               '$sender_first_names' as sender_first_names,
-               '$sender_last_name' as sender_last_name,
+            select '[db_quote $sender_email]' as from_addr,
+               '[db_quote $sender_first_names]' as sender_first_names,
+               '[db_quote $sender_last_name]' as sender_last_name,
                parties.email,
                decode(acs_objects.object_type,
                       'user',
@@ -28,8 +28,8 @@
                        from persons
                        where person_id = parties.party_id),
                       '') as last_name,
-               '$community_name' as community_name,
-               '$community_url' as community_url
+               '[db_quote $community_name]' as community_name,
+               '[db_quote $community_url]' as community_url
             from party_approved_member_map,
                  parties,
                  acs_objects
@@ -42,9 +42,9 @@
 
     <partialquery name="dotlrn_responded">
 	<querytext>
- 		select '$sender_email' as from_addr,
-               '$sender_first_names' as sender_first_names,
-               '$sender_last_name' as sender_last_name,
+ 		select '[db_quote $sender_email]' as from_addr,
+               '[db_quote $sender_first_names]' as sender_first_names,
+               '[db_quote $sender_last_name]' as sender_last_name,
                parties.email,
                decode(acs_objects.object_type,
                       'user',
@@ -66,8 +66,8 @@
                        from persons
                        where person_id = parties.party_id),
                       '') as last_name,
-               '$community_name' as community_name,
-               '$community_url' as community_url
+               '[db_quote $community_name]' as community_name,
+               '[db-quote $community_url]' as community_url
             from party_approved_member_map,
                  parties,
                  acs_objects
@@ -83,9 +83,9 @@
 
     <partialquery name="dotlrn_not_responded">
 	<querytext>
-		select '$sender_email' as from_addr,
-               '$sender_first_names' as sender_first_names,
-               '$sender_last_name' as sender_last_name,
+		select '[db_quote $sender_email]' as from_addr,
+               '[db_quote $sender_first_names]' as sender_first_names,
+               '[db_quote $sender_last_name]' as sender_last_name,
                parties.email,
                decode(acs_objects.object_type,
                       'user',
@@ -107,8 +107,8 @@
                        from persons
                        where person_id = parties.party_id),
                       '') as last_name,
-               '$community_name' as community_name,
-               '$community_url' as community_url
+               '[db_quote $community_name]' as community_name,
+               '[db_quote $community_url]' as community_url
             from party_approved_member_map,
                  parties,
                  acs_objects
@@ -124,9 +124,9 @@
 
     <partialquery name="responded">
 	<querytext>
- 		select '$sender_email' as from_addr,
-               '$sender_first_names' as sender_first_names,
-               '$sender_last_name' as sender_last_name,
+ 		select '[db_quote $sender_email]' as from_addr,
+               '[db_quote $sender_first_names]' as sender_first_names,
+               '[db_quote $sender_last_name]' as sender_last_name,
                parties.email,
             from parties
             where parties.party_id = acs_objects.object_id