This patch fixes players not being charged for setting unpaid traps.
This could yield to possible abuse from a player constantly arming
and disarming a trap.

I hope this fix helps. Let me know what you think!
Chris Becker (topher@csh.rit.edu)

More bug fixes and patches can be found at 
http://www.csh.rit.edu/~topher/nethack

diff -aur ..\original\nethack-3.4.3\src\apply.c nethack-3.4.3\src\apply.c
--- ..\original\nethack-3.4.3\src\apply.c	Sun Dec 07 16:39:14 2003
+++ nethack-3.4.3\src\apply.c	Sat Jan 03 12:53:23 2004
@@ -2094,6 +2094,10 @@
 	    if (!trapinfo.force_bungle)
 		You("finish arming %s.",
 			the(defsyms[trap_to_defsym(what_trap(ttyp))].explanation));
+		/* pay for an unpayed trap - Chris Becker (topher@csh.rit.edu) */
+		if (otmp->unpaid) {
+			bill_dummy_object(otmp);	
+		}
 	    if (((otmp->cursed || Fumbling) && (rnl(10) > 5)) || trapinfo.force_bungle)
 		dotrap(ttmp,
 			(unsigned)(trapinfo.force_bungle ? FORCEBUNGLE : 0));