[crawl-ref-commits] SF.net SVN: crawl-ref: [1169] trunk/crawl-ref/source/religion.cc

[<dsh...@us...>]

Revision: 1169
          http://svn.sourceforge.net/crawl-ref/?rev=1169&view=rev
Author:   dshaligram
Date:     2007-04-01 08:10:36 -0700 (Sun, 01 Apr 2007)

Log Message:
-----------
Lugonu will not accept a worshipper who has unpaid penance. This prevents the
go to Abyss -> pick Lugonu -> ditch Lugonu -> pick Lugonu again stunt.

Modified Paths:
--------------
    trunk/crawl-ref/source/religion.cc

Modified: trunk/crawl-ref/source/religion.cc
===================================================================
--- trunk/crawl-ref/source/religion.cc	2007-04-01 11:24:15 UTC (rev 1168)
+++ trunk/crawl-ref/source/religion.cc	2007-04-01 15:10:36 UTC (rev 1169)
@@ -2595,6 +2595,13 @@
         return;
     }
 
+    if (which_god == GOD_LUGONU && you.penance[GOD_LUGONU])
+    {
+        simple_god_message(" is most displeased with you!", which_god);
+        lugonu_retribution(which_god);
+        return;
+    }
+
     describe_god( which_god, false );
 
     snprintf( info, INFO_SIZE, "Do you wish to %sjoin this religion?", 


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.