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 -r1.2
--- openacs-4/packages/survey/www/admin/send-mail-oracle.xql	16 Sep 2002 00:00:24 -0000	1.1
+++ openacs-4/packages/survey/www/admin/send-mail-oracle.xql	23 Nov 2002 05:18:16 -0000	1.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
@@ -120,20 +120,20 @@
             select survey_response.initial_user_id(response_id)
             from survey_responses_latest where survey_id=$survey_id)
 	</querytext>
-    <partialquery>
+    </partialquery>
 
     <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
 	    and parties.party_id in (
 		select survey_response.initial_user_id(response_id)
 		from survey_responses_latest where survey_id=$survey_id)
 	</querytext>
-    <partialquery>
+    </partialquery>
 
 </queryset>
\ No newline at end of file