[bknr-cvs] hans changed trunk/projects/bos/m2/mail-generator.lisp

[BKNR Commits]

Revision: 3986
Author: hans
URL: http://bknr.net/trac/changeset/3986

Don't print stuff to the console that might contain non-ASCII characters.

U   trunk/projects/bos/m2/mail-generator.lisp

Modified: trunk/projects/bos/m2/mail-generator.lisp
===================================================================
--- trunk/projects/bos/m2/mail-generator.lisp	2008-10-13 16:34:22 UTC (rev 3985)
+++ trunk/projects/bos/m2/mail-generator.lisp	2008-10-14 08:10:41 UTC (rev 3986)
@@ -80,7 +80,7 @@
 "))
 
 (defun mail-fiscal-certificate-to-office (contract name address country)
-  (format t "mail-fiscal-certificate-to-office: ~a name: ~a address: ~a country: ~a~%" contract name address country))
+  #+(or) (format t "mail-fiscal-certificate-to-office: ~a name: ~a address: ~a country: ~a~%" contract name address country))
 
 (defun mail-template-directory (language)
   "Return the directory where the mail templates are stored"