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

[BKNR Commits]

Revision: 3547
Author: ksprotte
URL: http://bknr.net/trac/changeset/3547

fixed bug reported by vivian. 

"fehler bei ueberweisung ohne email

Mir ist im Laufe der Tage folgendes aufgefallen:
wenn ueberweiser keine emailadresse angeben und dann ueber den link
aktiviert werden kommt eine Fehlermeldung die besag could not be
proceeded, must contain domain bla....
Der Sponsor wird aber dann trotzdem als bezahlt eingerichtet und sein
Profil erstellt. Diese Fehlermeldung muss heissen:
"Sponsor processed, but not informed because no mail address" oder so was....."

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

Modified: trunk/projects/bos/m2/mail-generator.lisp
===================================================================
--- trunk/projects/bos/m2/mail-generator.lisp	2008-07-22 08:56:46 UTC (rev 3546)
+++ trunk/projects/bos/m2/mail-generator.lisp	2008-07-22 09:35:08 UTC (rev 3547)
@@ -327,7 +327,7 @@
 						vorname name strasse plz ort email telefon
 						(if want-print "yes" "no")
 						(if donationcert-yearly "yes" "no")
-						*website-url* contract-id email))
+						*website-url* contract-id (or email "")))
 			(make-contract-xml-part contract-id (all-request-params))
 			(make-vcard-part contract-id (make-vcard :sponsor-id sponsor-id
 								 :note (format nil "Paid-by: Manual money transfer