From de1d2ccca9838a2deaa4c134d427d96b93aed515 Mon Sep 17 00:00:00 2001
From: scw <scw@63ad8ddf-47c3-0310-b6dd-a9e9d9715204>
Date: Thu, 27 May 2004 03:38:59 +0000
Subject: Anonymous money giving.

git-svn-id: http://opensvn.csie.org/pttbbs/trunk/pttbbs@2024 63ad8ddf-47c3-0310-b6dd-a9e9d9715204
---
 mbbsd/cal.c | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

diff --git a/mbbsd/cal.c b/mbbsd/cal.c
index a59eb9f9..5fda1597 100644
--- a/mbbsd/cal.c
+++ b/mbbsd/cal.c
@@ -376,7 +376,17 @@ p_give()
 	demoney(-money);
 	log_file(FN_MONEY, LOG_CREAT | LOG_VF, "%s\t給%s\t%d\t%s",
                  cuser.userid, id, money - tax, ctime(&now));
-	mail_redenvelop(cuser.userid, id, money - tax, getans("要自行書寫紅包袋嗎？[y/N]"));
+#ifdef PLAY_ANGEL
+	getuser(id);
+	if (!strcmp(xuser.myangel, cuser.userid)){
+	    mail_redenvelop(
+		    getkey("他是你的小主人，是否匿名？[Y/n]") == 'n' ?
+		    cuser.userid : "小天使", id, money - tax,
+			getans("要自行書寫紅包袋嗎？[y/N]"));
+	} else
+#endif
+	mail_redenvelop(cuser.userid, id, money - tax,
+		getans("要自行書寫紅包袋嗎？[y/N]"));
     }
     return 0;
 }
-- 
cgit v1.2.3