- added scheduled execution

2ab9fd38 · eicom · 9f7c7045 · 2ab9fd38
Commit 2ab9fd38 authored Dec 11, 2007 by eicom
Hide whitespace changes
Inline Side-by-side

Showing with 12 additions and 0 deletions

intranet-ubl-init.tcl tcl/intranet-ubl-init.tcl +12 -0

No files found.
--- a/tcl/intranet-ubl-init.tcl
+++ b/tcl/intranet-ubl-init.tcl
+ad_library {
+    Initialization for im_mail_import
+    @creation-date 10 December 2007
+    @cvs-id $Id$
+}
+
+# Initialize the semaphore
+nsv_set im_ubl_export ubl_export_p 0
+
+# Check every few minutes for new mails
+ad_schedule_proc -thread t 60 im_ubl::export_all_invoices
+