Index: openacs-4/packages/acs-mail-lite/tcl/maildir-inbound-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-mail-lite/tcl/maildir-inbound-procs.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/acs-mail-lite/tcl/maildir-inbound-procs.tcl	17 Feb 2018 17:25:19 -0000	1.2
+++ openacs-4/packages/acs-mail-lite/tcl/maildir-inbound-procs.tcl	18 Feb 2018 10:41:58 -0000	1.3
@@ -110,7 +110,7 @@
                                         $headers_list subject]
                         if { $su_idx > -1 } {
                             set sun [lindex $headers_list $su_idx]
-                            set hdrs_arr(aml_subject) [ad_quotehtml $hdrs_arr(${sun})]
+                            set hdrs_arr(aml_subject) [ns_quotehtml $hdrs_arr(${sun})]
                         } else {
                             set hdrs_arr(aml_subject) ""
                         }
@@ -119,7 +119,7 @@
                                         $headers_list to]
                         if { ${to_idx} > -1 } {
                             set ton [lindex $headers_list $to_idx]
-                            set hdrs_arr(aml_to) [ad_quotehtml $hdrs_arr(${ton}) ]
+                            set hdrs_arr(aml_to) [ns_quotehtml $hdrs_arr(${ton}) ]
                         } else {
                             set hdrs_arr(aml_to) ""
                         }