Index: openacs-4/packages/cms/tcl/workflow-procs-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/cms/tcl/Attic/workflow-procs-oracle.xql,v diff -u -r1.1 -r1.2 --- openacs-4/packages/cms/tcl/workflow-procs-oracle.xql 11 Aug 2001 17:41:34 -0000 1.1 +++ openacs-4/packages/cms/tcl/workflow-procs-oracle.xql 24 Aug 2001 14:58:13 -0000 1.2 @@ -37,6 +37,23 @@ + + + + begin + :1 := acs_mail_nt.post_request( + party_from => :user_id, + party_to => :party_id, + expand_group => 'f', + subject => :subject, + message => :message + ); + end; + + + + + @@ -76,6 +93,23 @@ + + + + begin + :1 := acs_mail_nt.post_request( + party_from => -1, + party_to => :admin_id, + expand_group => 'f', + subject => :subject, + message => :message + ); + end; + + + + + @@ -114,6 +148,23 @@ + + + + begin + :1 := acs_mail_nt.post_request( + party_from => -1, + party_to => :admin_id, + expand_group => 'f', + subject => :subject, + message => :message + ); + end; + + + + + Index: openacs-4/packages/cms/tcl/workflow-procs-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/cms/tcl/Attic/workflow-procs-postgresql.xql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/cms/tcl/workflow-procs-postgresql.xql 20 Aug 2001 04:35:42 -0000 1.2 +++ openacs-4/packages/cms/tcl/workflow-procs-postgresql.xql 24 Aug 2001 14:58:13 -0000 1.3 @@ -37,6 +37,24 @@ + + + + begin + return acs_mail_nt__post_request( + :user_id, -- party_from + :party_id, -- party_to + 'f', -- expand_group + :subject, -- subject + :message, -- message + 0 -- max_retries + ); + end; + + + + + @@ -76,6 +94,24 @@ + + + + begin + return acs_mail_nt__post_request( + -1, -- party_from + :admin_id, -- party_to + 'f', -- expand_group + :subject, -- subject + :message, -- message + 0 -- max_retries + ); + end; + + + + + @@ -114,6 +150,24 @@ + + + + begin + return acs_mail_nt__post_request( + -1, -- party_from + :admin_id, -- party_to + 'f', -- expand_group + :subject, -- subject + :message, -- message + 0 -- max_retries + ); + end; + + + + + Index: openacs-4/packages/cms/tcl/workflow-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/cms/tcl/Attic/workflow-procs.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/cms/tcl/workflow-procs.tcl 20 Aug 2001 04:35:42 -0000 1.4 +++ openacs-4/packages/cms/tcl/workflow-procs.tcl 24 Aug 2001 14:58:13 -0000 1.5 @@ -65,7 +65,7 @@ set request_id [db_exec_plsql notify " begin - :1 := nt.post_request( + :1 := acs_mail_nt.post_request( party_from => :user_id, party_to => :party_id, expand_group => 'f', @@ -149,7 +149,7 @@ set request_id [db_exec_plsql notify " begin - :1 := nt.post_request( + :1 := acs_mail_nt.post_request( party_from => -1, party_to => :admin_id, expand_group => 'f', @@ -218,7 +218,7 @@ set request_id [db_exec_plsql notify " begin - :1 := nt.post_request( + :1 := acs_mail_nt.post_request( party_from => -1, party_to => :admin_id, expand_group => 'f',