Index: openacs-4/packages/acs-mail-lite/tcl/email-inbound-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-mail-lite/tcl/email-inbound-procs.tcl,v
diff -u -r1.15 -r1.15.2.1
--- openacs-4/packages/acs-mail-lite/tcl/email-inbound-procs.tcl	22 Jun 2018 15:49:30 -0000	1.15
+++ openacs-4/packages/acs-mail-lite/tcl/email-inbound-procs.tcl	16 Jun 2019 11:38:44 -0000	1.15.2.1
@@ -154,7 +154,7 @@
                     max_blob_chars -
                     mpri_min -
                     mpri_max {
-                        set v_p [ad_var_type_check_integer_p $new(${spn})]
+                        set v_p [string is integer -strict $new(${spn})]
                         if { $v_p } {
                             if { $new(${spn}) < 0 } {
                                 set v_p 0