--- deliantra/maps/perl/rent.ext	2006/09/18 18:20:11	1.2
+++ deliantra/maps/perl/rent.ext	2006/09/18 18:34:16	1.3
@@ -82,9 +82,9 @@
 sub check_balance {
    my ($pl) = @_;
 
-   pay_balance $pl if $pl->{rent}{balance} < 0;
+   pay_balance $pl if $pl->{rent}{balance} > 0;
 
-   $pl->{rent}{balance} >= 0
+   $pl->{rent}{balance} <= 0
 }
 
 sub find_apartment {